diff options
Diffstat (limited to 'libguile/list.c')
| -rw-r--r-- | libguile/list.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/libguile/list.c b/libguile/list.c index 82aab8a5d..70bfcb077 100644 --- a/libguile/list.c +++ b/libguile/list.c @@ -40,9 +40,9 @@ /* creating lists */ -#define SCM_I_CONS(cell, x, y) \ - do { \ - cell = scm_cell (SCM_UNPACK (x), SCM_UNPACK (y)); \ +#define SCM_I_CONS(cell, x, y) \ + do { \ + cell = SCM_ADD_PAIR_TAG (scm_cell (SCM_UNPACK (x), SCM_UNPACK (y))); \ } while (0) SCM |