diff options
Diffstat (limited to 'libguile/options.c')
-rw-r--r-- | libguile/options.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/options.c b/libguile/options.c index a727403dc..0242c62ed 100644 --- a/libguile/options.c +++ b/libguile/options.c @@ -185,7 +185,7 @@ scm_options (SCM arg, scm_option options[], int n, const char *s) goto cont; case SCM_OPTION_SCM: new_mode = SCM_CDR (new_mode); - flags[i] = SCM_UNPACK_CAR (new_mode); + flags[i] = SCM_UNPACK (SCM_CAR (new_mode)); goto cont; } #ifndef SCM_RECKLESS |