projects
/
platform
/
upstream
/
perl.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
9f89dd8
)
runlevel is I32, not int
author
Roderick Schertler
<roderick@argon.org>
Thu, 3 Apr 1997 23:23:43 +0000
(18:23 -0500)
committer
Chip Salzenberg
<chip@atlantic.net>
Wed, 2 Apr 1997 22:03:25 +0000
(10:03 +1200)
p5p-msgid: 2848.
860109823
@eeyore.ibcinc.com
pp_ctl.c
patch
|
blob
|
history
util.c
patch
|
blob
|
history
diff --git
a/pp_ctl.c
b/pp_ctl.c
index
d51569d
..
4f41374
100644
(file)
--- a/
pp_ctl.c
+++ b/
pp_ctl.c
@@
-1963,14
+1963,14
@@
docatch(o)
OP *o;
{
int ret;
-
int
oldrunlevel = runlevel;
+
I32
oldrunlevel = runlevel;
OP *oldop = op;
dJMPENV;
op = o;
#ifdef DEBUGGING
assert(CATCH_GET == TRUE);
- DEBUG_l(deb("(Setting up local jumplevel, runlevel = %
d)\n",
runlevel+1));
+ DEBUG_l(deb("(Setting up local jumplevel, runlevel = %
ld)\n", (long)
runlevel+1));
#endif
JMPENV_PUSH(ret);
switch (ret) {
diff --git
a/util.c
b/util.c
index
0316269
..
6e5ef47
100644
(file)
--- a/
util.c
+++ b/
util.c
@@
-1159,7
+1159,7
@@
die(pat, va_alist)
{
va_list args;
char *message;
-
int
oldrunlevel = runlevel;
+
I32
oldrunlevel = runlevel;
int was_in_eval = in_eval;
HV *stash;
GV *gv;