diff options
Diffstat (limited to 'libguile/generalized-arrays.h')
| -rw-r--r-- | libguile/generalized-arrays.h | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/generalized-arrays.h b/libguile/generalized-arrays.h index 130807b29..ec88d651c 100644 --- a/libguile/generalized-arrays.h +++ b/libguile/generalized-arrays.h @@ -34,7 +34,7 @@ #define SCM_VALIDATE_ARRAY(pos, v) \ do { \ - SCM_ASSERT (SCM_HEAP_OBJECT_P (v) \ + SCM_ASSERT (SCM_THOB_P (v) \ && scm_is_true (scm_array_p (v, SCM_UNDEFINED)), \ v, pos, FUNC_NAME); \ } while (0) |