*.[ch]: Replace GUILE_PROC w/ SCM_DEFINE.
[bpt/guile.git] / libguile / guardians.c
index 66e1e00..403d228 100644 (file)
@@ -149,7 +149,7 @@ guard (SCM cclo, SCM arg)
 
 static SCM guard1;
 
-GUILE_PROC (scm_make_guardian, "make-guardian", 0, 0, 0, 
+SCM_DEFINE (scm_make_guardian, "make-guardian", 0, 0, 0, 
             (),
 "")
 #define FUNC_NAME s_scm_make_guardian