diff options
author | Julian Graham <julian@transmetropolitan.(none)> | 2009-06-02 09:35:02 -0400 |
---|---|---|
committer | Julian Graham <julian@transmetropolitan.(none)> | 2009-06-02 09:35:02 -0400 |
commit | 2f9ae9b1040e1b9339bb0bc8b0013a5346622c44 (patch) | |
tree | 8dc3105cc05ddd5509edc4559a69d32d2acddfab /libguile/validate.h | |
parent | 922d417bf4a7c4eb7d956d340161ad6407545ae7 (diff) | |
parent | 938d46a35d39ec5d7b5fa858a8783136ce24d10d (diff) | |
download | guile-2f9ae9b1040e1b9339bb0bc8b0013a5346622c44.tar.gz |
Merge branch 'master' of git://git.savannah.gnu.org/guile
Diffstat (limited to 'libguile/validate.h')
-rw-r--r-- | libguile/validate.h | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/libguile/validate.h b/libguile/validate.h index e05b7dd83..c362c02f3 100644 --- a/libguile/validate.h +++ b/libguile/validate.h @@ -3,7 +3,7 @@ #ifndef SCM_VALIDATE_H #define SCM_VALIDATE_H -/* Copyright (C) 1999,2000,2001, 2002, 2004, 2006, 2007 Free Software Foundation, Inc. +/* Copyright (C) 1999,2000,2001, 2002, 2004, 2006, 2007, 2009 Free Software Foundation, Inc. * * This library is free software; you can redistribute it and/or * modify it under the terms of the GNU Lesser General Public @@ -150,6 +150,9 @@ cvar = scm_to_bool (flag); \ } while (0) +#define SCM_VALIDATE_BYTEVECTOR(_pos, _obj) \ + SCM_VALIDATE_SMOB ((_pos), (_obj), bytevector) + #define SCM_VALIDATE_CHAR(pos, scm) SCM_MAKE_VALIDATE_MSG (pos, scm, CHARP, "character") #define SCM_VALIDATE_CHAR_COPY(pos, scm, cvar) \ |