diff options
| author | Andy Wingo <wingo@pobox.com> | 2009-11-03 22:33:22 +0100 |
|---|---|---|
| committer | Andy Wingo <wingo@pobox.com> | 2009-11-15 20:28:12 +0100 |
| commit | 092d7704bef29a999a6f861fae461e9662b6fb98 (patch) | |
| tree | e09e2ce48ce6d6475511fc42853437da4c6f7327 /libguile/validate.h | |
| parent | b8187a71cb2cdb103aad10e75dc2947b06617ca9 (diff) | |
| download | guile-092d7704bef29a999a6f861fae461e9662b6fb98.tar.gz | |
SCM_VALIDATE_VTABLE tweak
* libguile/validate.h (SCM_VALIDATE_VTABLE): Simply call
scm_struct_vtable_p.
Diffstat (limited to 'libguile/validate.h')
| -rw-r--r-- | libguile/validate.h | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/libguile/validate.h b/libguile/validate.h index 8c7946902..ec32aa6c2 100644 --- a/libguile/validate.h +++ b/libguile/validate.h @@ -377,8 +377,7 @@ #define SCM_VALIDATE_VTABLE(pos, v) \ do { \ - SCM_ASSERT (!SCM_IMP (v) && scm_is_true (scm_struct_vtable_p (v)), \ - v, pos, FUNC_NAME); \ + SCM_ASSERT (scm_is_true (scm_struct_vtable_p (v)), v, pos, FUNC_NAME); \ } while (0) #define SCM_VALIDATE_VECTOR_LEN(pos, v, len) \ |