*.[ch]: Replace GUILE_PROC w/ SCM_DEFINE.
[bpt/guile.git] / libguile / gsubr.c
index 3991293..47e4461 100644 (file)
@@ -129,7 +129,7 @@ scm_make_gsubr_with_generic (const char *name,
 }
 
 
-GUILE_PROC(scm_gsubr_apply, "gsubr-apply", 0, 0, 1, 
+SCM_DEFINE(scm_gsubr_apply, "gsubr-apply", 0, 0, 1, 
            (SCM args),
 "")
 #define FUNC_NAME s_scm_gsubr_apply