summaryrefslogtreecommitdiff
path: root/libguile/dynl.c
diff options
context:
space:
mode:
authorDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2004-05-15 15:39:27 +0000
committerDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2004-05-15 15:39:27 +0000
commit2ff084057191db308547cc77a976564b185452b4 (patch)
treeba2a3519bc4aa2a2a51598483bd85a0311b08578 /libguile/dynl.c
parent89afb9cd52357fc56a0bbad8696f7351944ab72f (diff)
downloadguile-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.c2
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