summaryrefslogtreecommitdiff
path: root/run.c
diff options
context:
space:
mode:
authorMalcolm Beattie <mbeattie@sable.ox.ac.uk>1997-09-29 16:44:16 +0000
committerMalcolm Beattie <mbeattie@sable.ox.ac.uk>1997-09-29 16:44:16 +0000
commit8f95159f0f6f551c08c5f6e1a4d8807b332bc21a (patch)
tree74361aedc5a1372fab26b8d5802ff1d156440208 /run.c
parent07b7370725c6ec32f15c00e2d8d38d18f4b75a2d (diff)
parent7cb3fdbc2b45d54cfc6aac117f89b42d632cb3ed (diff)
downloadperl-8f95159f0f6f551c08c5f6e1a4d8807b332bc21a.tar.gz
Start merge with maint-5.004 branch by creating an ancestral
branch point via a fake resolution with the maint-merge branch. See Perforce Tech Note 9 for details. p4raw-id: //depot/perl@77
Diffstat (limited to 'run.c')
-rw-r--r--run.c9
1 files changed, 6 insertions, 3 deletions
diff --git a/run.c b/run.c
index 1e1001d4ad..2f8d8fa971 100644
--- a/run.c
+++ b/run.c
@@ -19,8 +19,10 @@
dEXT char **watchaddr = 0;
dEXT char *watchok;
+#ifndef DEBUGGING
+
int
-runops_standard() {
+runops() {
dTHR;
SAVEI32(runlevel);
runlevel++;
@@ -31,11 +33,12 @@ runops_standard() {
return 0;
}
-#ifdef DEBUGGING
+#else
+
static void debprof _((OP*o));
int
-runops_debug() {
+runops() {
dTHR;
if (!op) {
warn("NULL OP IN RUN");