guile/guile-core/libguile validate.h

[Marius Vollmer]

CVSROOT:        /cvs
Module name:    guile
Changes by:     Marius Vollmer <address@hidden> 01/01/06 10:46:48

Modified files:
        guile-core/libguile: validate.h 

Log message:
        * validate.h (SCM_VALIDATE_NUMBER): New.

CVSWeb URLs:
http://subversions.gnu.org/cgi-bin/cvsweb/guile/guile-core/libguile/validate.h.diff?r1=1.22&r2=1.23

Patches:
Index: guile/guile-core/libguile/validate.h
diff -u guile/guile-core/libguile/validate.h:1.22 
guile/guile-core/libguile/validate.h:1.23
--- guile/guile-core/libguile/validate.h:1.22   Sat Dec 16 12:25:08 2000
+++ guile/guile-core/libguile/validate.h        Sat Jan  6 10:46:48 2001
@@ -1,4 +1,4 @@
-/* $Id: validate.h,v 1.22 2000/12/16 20:25:08 kei Exp $ */
+/* $Id: validate.h,v 1.23 2001/01/06 18:46:48 mvo Exp $ */
 /*     Copyright (C) 1999, 2000 Free Software Foundation, Inc.
  *
  * This program is free software; you can redistribute it and/or modify
@@ -136,6 +136,8 @@
   } while (0)
 
 #define SCM_VALIDATE_REAL(pos, z) SCM_MAKE_VALIDATE (pos, z, REALP)
+
+#define SCM_VALIDATE_NUMBER(pos, z) SCM_MAKE_VALIDATE (pos, z, NUMBERP)
 
 #define SCM_VALIDATE_NUMBER_COPY(pos, z, cvar) \
   do {                                         \