diff options
author | Jim Blandy <jimb@red-bean.com> | 1996-09-28 00:04:22 +0000 |
---|---|---|
committer | Jim Blandy <jimb@red-bean.com> | 1996-09-28 00:04:22 +0000 |
commit | d6c7f2deab565e0a82fa7069c94d766a8bacc7c8 (patch) | |
tree | 60e33a3a4fe518b5f88a5819a5aab89fc3c1122e | |
parent | 32f7b3a1b143153c5872c842286f37a4fa35eb1f (diff) | |
download | guile-d6c7f2deab565e0a82fa7069c94d766a8bacc7c8.tar.gz |
* throw.h, throw.c: Use SCM_P instead of #if hair.
-rw-r--r-- | libguile/throw.h | 21 |
1 files changed, 4 insertions, 17 deletions
diff --git a/libguile/throw.h b/libguile/throw.h index b5b80fe2c..a1b0b4572 100644 --- a/libguile/throw.h +++ b/libguile/throw.h @@ -47,21 +47,8 @@ #include "libguile/__scm.h" - - -#ifdef __STDC__ -extern SCM scm_catch (SCM tag, SCM thunk, SCM handler); -extern SCM scm_ithrow (SCM key, SCM args, int noreturn); -extern SCM scm_throw (SCM key, SCM args); -extern void scm_init_throw (void); - -#else /* STDC */ -extern SCM scm_catch (); -extern SCM scm_ithrow (); -extern SCM scm_throw (); -extern void scm_init_throw (); - -#endif /* STDC */ - - +extern SCM scm_catch SCM_P ((SCM tag, SCM thunk, SCM handler)); +extern SCM scm_ithrow SCM_P ((SCM key, SCM args, int noreturn)); +extern SCM scm_throw SCM_P ((SCM key, SCM args)); +extern void scm_init_throw SCM_P ((void)); #endif /* THROWH */ |