summaryrefslogtreecommitdiff
path: root/run.c
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>1997-11-10 22:41:31 +0000
committerGurusamy Sarathy <gsar@cpan.org>1997-11-10 22:41:31 +0000
commit7c06b590c066c6b354b0347a68bd9817268651b8 (patch)
tree7ebb9bb01c5686f835c5be10b41fb97be1f5c295 /run.c
parent32f822de0a58c2cc8f1a23844b97246c433bb418 (diff)
downloadperl-7c06b590c066c6b354b0347a68bd9817268651b8.tar.gz
Remove runlevel. It was used to count how many runops() calls
we were in the process of executing, and longjmp() to the topmost one (if not already there). We use a null top_env->je_prev to distinguish that now. p4raw-id: //depot/win32/perl@223
Diffstat (limited to 'run.c')
-rw-r--r--run.c5
1 files changed, 0 insertions, 5 deletions
diff --git a/run.c b/run.c
index 1e1001d4ad..87633d1804 100644
--- a/run.c
+++ b/run.c
@@ -22,8 +22,6 @@ dEXT char *watchok;
int
runops_standard() {
dTHR;
- SAVEI32(runlevel);
- runlevel++;
while ( op = (*op->op_ppaddr)(ARGS) ) ;
@@ -42,9 +40,6 @@ runops_debug() {
return 0;
}
- SAVEI32(runlevel);
- runlevel++;
-
do {
if (debug) {
if (watchaddr != 0 && *watchaddr != watchok)