summaryrefslogtreecommitdiff
path: root/util.c
diff options
context:
space:
mode:
Diffstat (limited to 'util.c')
-rw-r--r--util.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/util.c b/util.c
index 99a3273175..0316269d1d 100644
--- a/util.c
+++ b/util.c
@@ -150,7 +150,7 @@ MEM_SIZE size;
/* safe version of free */
-void
+Free_t
safefree(where)
Malloc_t where;
{
@@ -1209,7 +1209,7 @@ die(pat, va_alist)
restartop = die_where(message);
if ((!restartop && was_in_eval) || oldrunlevel > 1)
- Siglongjmp(top_env, 3);
+ JMPENV_JUMP(3);
return restartop;
}
@@ -1264,7 +1264,7 @@ croak(pat, va_alist)
}
if (in_eval) {
restartop = die_where(message);
- Siglongjmp(top_env, 3);
+ JMPENV_JUMP(3);
}
PerlIO_puts(PerlIO_stderr(),message);
(void)PerlIO_flush(PerlIO_stderr());