diff options
| author | Adrian M. Enache <enache@rdslink.ro> | 2003-03-15 01:02:42 +0200 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2003-03-14 20:28:20 +0000 |
| commit | 4a202259b5c58b8852cda4ec492b88e9baff32c6 (patch) | |
| tree | f96b724c3eca3b938bad78bfb1426f979cd819a9 /toke.c | |
| parent | c5f9c75a0ab10c124cfd9ab014b49dfd4ad68196 (diff) | |
| download | perl-4a202259b5c58b8852cda4ec492b88e9baff32c6.tar.gz | |
Re: [fix] [perl #21575] Bug with print( followed by a newline
Message-ID: <20030314210242.GA1159@ratsnest.hole>
(with an added test)
p4raw-id: //depot/perl@18986
Diffstat (limited to 'toke.c')
| -rw-r--r-- | toke.c | 1 |
1 files changed, 1 insertions, 0 deletions
@@ -3088,6 +3088,7 @@ Perl_yylex(pTHX) PL_oldbufptr = PL_oldoldbufptr; /* allow print(STDOUT 123) */ else PL_expect = XTERM; + s = skipspace(s); TOKEN('('); case ';': CLINE; |