* __scm.h (SCM_ASSERT, SCM_WTA_DISPATCH_0, SCM_WTA_DISPATCH_1,
[bpt/guile.git] / libguile / error.h
index 180e70d..ea7d8d2 100644 (file)
@@ -81,7 +81,6 @@ extern void scm_wrong_type_arg_msg (const char *subr, int pos,
 extern void scm_memory_error (const char *subr) SCM_NORETURN;
 extern void scm_misc_error (const char *subr, const char *message,
                             SCM args) SCM_NORETURN;
-extern SCM scm_wta (SCM arg, const char *pos, const char *s_subr);
 extern void scm_init_error (void);
 
 \f
@@ -89,6 +88,7 @@ extern void scm_init_error (void);
 #if (SCM_DEBUG_DEPRECATED == 0)
 
 extern void scm_sysmissing (const char *subr) SCM_NORETURN;
+extern SCM scm_wta (SCM arg, const char *pos, const char *s_subr);
 
 #endif  /* SCM_DEBUG_DEPRECATED == 0 */