summaryrefslogtreecommitdiff
path: root/perly.y
diff options
context:
space:
mode:
authorMalcolm Beattie <mbeattie@sable.ox.ac.uk>1997-09-03 12:28:05 +0000
committerMalcolm Beattie <mbeattie@sable.ox.ac.uk>1997-09-03 12:28:05 +0000
commit7d07dbc24d4d5bd5fee59acddff905153f4258bd (patch)
tree4d26b5c42df68de932b69fc007fba8417ea1ad2d /perly.y
parent72aaf6313309039c851862ad50ee168cb9cdf42b (diff)
downloadperl-7d07dbc24d4d5bd5fee59acddff905153f4258bd.tar.gz
Rename RESTART to INIT and associated changes
p4raw-id: //depot/perl@49
Diffstat (limited to 'perly.y')
-rw-r--r--perly.y2
1 files changed, 1 insertions, 1 deletions
diff --git a/perly.y b/perly.y
index be3d0c7763..5996527331 100644
--- a/perly.y
+++ b/perly.y
@@ -290,7 +290,7 @@ startformsub: /* NULL */ /* start a format subroutine scope */
subname : WORD { char *name = SvPV(((SVOP*)$1)->op_sv, na);
if (strEQ(name, "BEGIN") || strEQ(name, "END")
- || strEQ(name, "RESTART"))
+ || strEQ(name, "INIT"))
CvUNIQUE_on(compcv);
$$ = $1; }
;