summaryrefslogtreecommitdiff
path: root/libguile/dynwind.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/dynwind.c')
-rw-r--r--libguile/dynwind.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/dynwind.c b/libguile/dynwind.c
index 54323a568..ef0a144ce 100644
--- a/libguile/dynwind.c
+++ b/libguile/dynwind.c
@@ -201,11 +201,11 @@ scm_swap_bindings (SCM glocs, SCM vals)
}
void
-scm_dowinds (SCM to, long delta)
+scm_dowinds (SCM to, scm_bits_t delta)
{
tail:
if (SCM_EQ_P (to, scm_dynwinds));
- else if (0 > delta)
+ else if (delta < 0)
{
SCM wind_elt;
SCM wind_key;