diff options
Diffstat (limited to 'libguile/dynwind.c')
-rw-r--r-- | libguile/dynwind.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/dynwind.c b/libguile/dynwind.c index 8b6fedd70..be2084af7 100644 --- a/libguile/dynwind.c +++ b/libguile/dynwind.c @@ -156,7 +156,7 @@ typedef struct guardsmem { #define SCM_BEFORE_GUARD(obj) (SCM_GUARDSMEM (obj)->before) #define SCM_AFTER_GUARD(obj) (SCM_GUARDSMEM (obj)->after) #define SCM_GUARD_DATA(obj) (SCM_GUARDSMEM (obj)->data) -#define SCM_GUARDSP(obj) (SCM_CAR (obj) == tc16_guards) +#define SCM_GUARDSP(obj) (SCM_NIMP(obj) && (SCM_CAR (obj) == tc16_guards)) static long tc16_guards; |