diff options
Diffstat (limited to 'libguile/debug.c')
-rw-r--r-- | libguile/debug.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/debug.c b/libguile/debug.c index 92fb2e138..5259b4cec 100644 --- a/libguile/debug.c +++ b/libguile/debug.c @@ -421,7 +421,7 @@ GUILE_PROC (scm_procedure_source, "procedure-source", 1, 0, 0, "") #define FUNC_NAME s_scm_procedure_source { - SCM_VALIDATE_NIMP(1,proc); + SCM_VALIDATE_NIM (1,proc); switch (SCM_TYP7 (proc)) { case scm_tcs_closures: { @@ -456,7 +456,7 @@ GUILE_PROC (scm_procedure_environment, "procedure-environment", 1, 0, 0, "") #define FUNC_NAME s_scm_procedure_environment { - SCM_VALIDATE_NIMP(1,proc); + SCM_VALIDATE_NIM (1,proc); switch (SCM_TYP7 (proc)) { case scm_tcs_closures: return SCM_ENV (proc); |