diff options
Diffstat (limited to 'libguile/deprecated.h')
-rw-r--r-- | libguile/deprecated.h | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/libguile/deprecated.h b/libguile/deprecated.h index d1836192b..0c0f6e56b 100644 --- a/libguile/deprecated.h +++ b/libguile/deprecated.h @@ -36,6 +36,14 @@ #define scm_i_jmp_buf scm_i_jmp_buf_GONE__USE_JMP_BUF_INSTEAD +#define SCM_VALIDATE_VECTOR_OR_DVECTOR(pos, v) \ + do { \ + SCM_ASSERT (scm_is_vector (v) || scm_is_true (scm_f64vector_p (v)), \ + v, pos, FUNC_NAME); \ + } while (0) + +#define scm_gc_running_p 0 + void scm_i_init_deprecated (void); #endif |