diff options
author | Greg J. Badros <gjb@cs.washington.edu> | 1999-12-12 18:30:09 +0000 |
---|---|---|
committer | Greg J. Badros <gjb@cs.washington.edu> | 1999-12-12 18:30:09 +0000 |
commit | 6b5a304f6b006beeb6088d5002c7574e874b28e3 (patch) | |
tree | e8c4739bb0e2e1cb7ccf7b7a5a024d36258073a6 /libguile/srcprop.c | |
parent | 5bff3127b542b14a9f881af0b68d61e21712d9c8 (diff) | |
download | guile-6b5a304f6b006beeb6088d5002c7574e874b28e3.tar.gz |
* *.c, scm_validate.h: Use SCM_VALIDATE_NIM, not SCM_VALIDATE_NIMP
(none of the other validate macros have the trailing P).
Diffstat (limited to 'libguile/srcprop.c')
-rw-r--r-- | libguile/srcprop.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/libguile/srcprop.c b/libguile/srcprop.c index 9c0be93b4..16cfb40dd 100644 --- a/libguile/srcprop.c +++ b/libguile/srcprop.c @@ -169,7 +169,7 @@ GUILE_PROC (scm_source_properties, "source-properties", 1, 0, 0, #define FUNC_NAME s_scm_source_properties { SCM p; - SCM_VALIDATE_NIMP(1,obj); + SCM_VALIDATE_NIM (1,obj); if (SCM_MEMOIZEDP (obj)) obj = SCM_MEMOIZED_EXP (obj); #ifndef SCM_RECKLESS @@ -191,7 +191,7 @@ GUILE_PROC (scm_set_source_properties_x, "set-source-properties!", 2, 0, 0, #define FUNC_NAME s_scm_set_source_properties_x { SCM handle; - SCM_VALIDATE_NIMP(1,obj); + SCM_VALIDATE_NIM (1,obj); if (SCM_MEMOIZEDP (obj)) obj = SCM_MEMOIZED_EXP (obj); #ifndef SCM_RECKLESS @@ -210,7 +210,7 @@ GUILE_PROC (scm_source_property, "source-property", 2, 0, 0, #define FUNC_NAME s_scm_source_property { SCM p; - SCM_VALIDATE_NIMP(1,obj); + SCM_VALIDATE_NIM (1,obj); if (SCM_MEMOIZEDP (obj)) obj = SCM_MEMOIZED_EXP (obj); #ifndef SCM_RECKLESS @@ -243,7 +243,7 @@ GUILE_PROC (scm_set_source_property_x, "set-source-property!", 3, 0, 0, { scm_whash_handle h; SCM p; - SCM_VALIDATE_NIMP(1,obj); + SCM_VALIDATE_NIM (1,obj); if (SCM_MEMOIZEDP (obj)) obj = SCM_MEMOIZED_EXP (obj); #ifndef SCM_RECKLESS |