* * backtrace.c (scm_display_application): New procedure:

[bpt/guile.git] / libguile / scmsigs.h

diff --git a/libguile/scmsigs.h b/libguile/scmsigs.h
index 484b15e..3b8bdc4 100644 (file)
--- a/libguile/scmsigs.h
+++ b/libguile/scmsigs.h
@@ -43,37 +43,18 @@
  * If you do not wish that, delete this exception notice.  
  */
 \f
-
+#include "libguile/__scm.h"
 
 \f
-#ifdef __STDC__
-extern SCM scm_alarm (SCM i);
-extern SCM scm_pause (void);
-extern SCM scm_sleep (SCM i);
-extern SCM scm_raise(SCM sig);
-extern void scm_init_signals (void);
-extern void scm_ignore_signals (void);
-extern void scm_unignore_signals (void);
-extern SCM scm_restore_signals (void);
-extern void scm_init_scmsigs (void);
-
-#else /* STDC */
-extern SCM scm_alarm ();
-extern SCM scm_pause ();
-extern SCM scm_sleep ();
-extern SCM scm_raise();
-extern void scm_init_signals ();
-extern void scm_ignore_signals ();
-extern void scm_unignore_signals ();
-extern SCM scm_restore_signals ();
-extern void scm_init_scmsigs ();
-
-#endif /* STDC */
-
-
-
-
-
 
+extern SCM scm_alarm SCM_P ((SCM i));
+extern SCM scm_pause SCM_P ((void));
+extern SCM scm_sleep SCM_P ((SCM i));
+extern SCM scm_raise SCM_P ((SCM sig));
+extern void scm_init_signals SCM_P ((void));
+extern void scm_ignore_signals SCM_P ((void));
+extern void scm_unignore_signals SCM_P ((void));
+extern SCM scm_restore_signals SCM_P ((void));
+extern void scm_init_scmsigs SCM_P ((void));
 
 #endif  /* SCMSIGSH */