From: Roderick Schertler <roderick@argon.org>
Date: Thu, 3 Apr 1997 23:23:43 +0000 (-0500)
Subject: runlevel is I32, not int
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=035902c79e208213cb9362b522626b418fd715ad;p=p5sagit%2Fp5-mst-13.2.git

runlevel is I32, not int

p5p-msgid: 2848.860109823@eeyore.ibcinc.com
---

diff --git a/pp_ctl.c b/pp_ctl.c
index d51569d..4f41374 100644
--- 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
--- 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;