diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 2000-01-26 19:10:26 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 2000-01-26 19:10:26 +0000 |
| commit | 7d30b5c4c60a798b772f5d7bd3b85d21016359c7 (patch) | |
| tree | ee12691ce71882115a98a9546a7a6b953d0d055a /vms/perly_c.vms | |
| parent | dfdd1393a5b8826d427524003a858b7556c66371 (diff) | |
| download | perl-7d30b5c4c60a798b772f5d7bd3b85d21016359c7.tar.gz | |
s/STOP/CHECK/ blocks
p4raw-id: //depot/perl@4905
Diffstat (limited to 'vms/perly_c.vms')
| -rw-r--r-- | vms/perly_c.vms | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/vms/perly_c.vms b/vms/perly_c.vms index ebc7d57cc3..b17faeade1 100644 --- a/vms/perly_c.vms +++ b/vms/perly_c.vms @@ -1828,7 +1828,7 @@ case 59: #line 338 "perly.y" { STRLEN n_a; char *name = SvPV(((SVOP*)yyvsp[0].opval)->op_sv,n_a); if (strEQ(name, "BEGIN") || strEQ(name, "END") - || strEQ(name, "STOP") || strEQ(name, "INIT")) + || strEQ(name, "INIT") || strEQ(name, "CHECK")) CvSPECIAL_on(PL_compcv); yyval.opval = yyvsp[0].opval; } break; |