diff options
author | Dirk Herrmann <dirk@dirk-herrmanns-seiten.de> | 2004-05-15 15:39:27 +0000 |
---|---|---|
committer | Dirk Herrmann <dirk@dirk-herrmanns-seiten.de> | 2004-05-15 15:39:27 +0000 |
commit | 2ff084057191db308547cc77a976564b185452b4 (patch) | |
tree | ba2a3519bc4aa2a2a51598483bd85a0311b08578 /libguile/dynl.c | |
parent | 89afb9cd52357fc56a0bbad8696f7351944ab72f (diff) | |
download | guile-2ff084057191db308547cc77a976564b185452b4.tar.gz |
* dynl.c (SET_DYNL_HANDLE): Add cast to scm_t_bits to make
explicit what happens.
* guardians.c (TCONC_IN): Use SCM_SET_CELL_OBJECT_x rather than
SCM_SET_CELL_WORD_x when writing scheme objets to cell elements.
Diffstat (limited to 'libguile/dynl.c')
-rw-r--r-- | libguile/dynl.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/dynl.c b/libguile/dynl.c index dbb7ae905..d6175a76c 100644 --- a/libguile/dynl.c +++ b/libguile/dynl.c @@ -113,7 +113,7 @@ scm_t_bits scm_tc16_dynamic_obj; #define DYNL_FILENAME SCM_SMOB_OBJECT #define DYNL_HANDLE(x) ((void *) SCM_SMOB_DATA_2 (x)) -#define SET_DYNL_HANDLE(x, v) (SCM_SET_SMOB_DATA_2 ((x), (v))) +#define SET_DYNL_HANDLE(x, v) (SCM_SET_SMOB_DATA_2 ((x), (scm_t_bits) (v))) static SCM |