summaryrefslogtreecommitdiff
path: root/libguile/dynwind.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/dynwind.c')
-rw-r--r--libguile/dynwind.c18
1 files changed, 3 insertions, 15 deletions
diff --git a/libguile/dynwind.c b/libguile/dynwind.c
index 82ac6d632..4a9424b0f 100644
--- a/libguile/dynwind.c
+++ b/libguile/dynwind.c
@@ -54,16 +54,12 @@
SCM_PROC(s_dynamic_wind, "dynamic-wind", 3, 0, 0, scm_dynamic_wind);
-#ifdef __STDC__
-SCM
-scm_dynamic_wind (SCM thunk1, SCM thunk2, SCM thunk3)
-#else
+
SCM
scm_dynamic_wind (thunk1, thunk2, thunk3)
SCM thunk1;
SCM thunk2;
SCM thunk3;
-#endif
{
SCM ans;
scm_apply (thunk1, SCM_EOL, SCM_EOL);
@@ -74,15 +70,11 @@ scm_dynamic_wind (thunk1, thunk2, thunk3)
return ans;
}
-#ifdef __STDC__
-void
-scm_dowinds (SCM to, long delta)
-#else
+
void
scm_dowinds (to, delta)
SCM to;
long delta;
-#endif
{
tail:
if (scm_dynwinds == to);
@@ -138,13 +130,9 @@ scm_dowinds (to, delta)
}
-#ifdef __STDC__
-void
-scm_init_dynwind (void)
-#else
+
void
scm_init_dynwind ()
-#endif
{
#include "dynwind.x"
}