diff options
author | Andy Lester <andy@petdance.com> | 2005-06-16 04:13:42 -0500 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-06-16 13:55:18 +0000 |
commit | a6e20a404b42cad25eb97280fa2bcacffda64cd6 (patch) | |
tree | becab207af03fe0a26c7ec2809551b75b0302163 /toke.c | |
parent | 0dea61d9463d40d400a2f349f672ec0d9dcba752 (diff) | |
download | perl-a6e20a404b42cad25eb97280fa2bcacffda64cd6.tar.gz |
Removing /*SUPPRESS xxx*/
Message-ID: <20050616141342.GA22188@petdance.com>
p4raw-id: //depot/perl@24871
Diffstat (limited to 'toke.c')
-rw-r--r-- | toke.c | 3 |
1 files changed, 0 insertions, 3 deletions
@@ -4342,8 +4342,6 @@ Perl_yylex(pTHX) case KEY___DATA__: case KEY___END__: { GV *gv; - - /*SUPPRESS 560*/ if (PL_rsfp && (!PL_in_eval || PL_tokenbuf[2] == 'D')) { const char *pname = "main"; if (PL_tokenbuf[2] == 'D') @@ -10518,7 +10516,6 @@ S_scan_formline(pTHX_ register char *s) while (!needargs) { if (*s == '.') { - /*SUPPRESS 530*/ #ifdef PERL_STRICT_CR for (t = s+1;SPACE_OR_TAB(*t); t++) ; #else |