mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-14 07:30:32 +02:00
Code Activity

* *.c, scm_validate.h: Use SCM_VALIDATE_NIM, not SCM_VALIDATE_NIMP

Browse source 
(none of the other validate macros have the trailing P).
This commit is contained in:
Greg J. Badros 1999-12-12 18:30:09 +00:00
parent 5bff3127b5
commit 6b5a304f6b
11 changed files with 38 additions and 32 deletions
Download patch file Download diff file Expand all files Collapse all files

4
libguile/debug.c
View file

@ -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);