[Parseperl-discuss] regexp parsing bug

[Chris D. <ch...@cl...>]

I found a bug in the regexp parsing.  I started trying to write the  
test for the regression myself, but I'm unclear on what the correct  
result should be for the t.data/08_regression/*.dump file, so I'm  
posting here instead.

In CVS head, I get the following:

% perl -I lib -MPPI::Dumper -MPPI -e'PPI::Dumper->new(PPI::Document- 
 >new(\"/./ ; print 1"))->print'
PPI::Document
   PPI::Statement
     PPI::Token::Operator        '/'
     PPI::Token::Operator        '.'
     PPI::Token::Regexp::Match   '/ ; print 1'

My guess is that the correct result should be something like

PPI::Document
   PPI::Statement
     PPI::Token::Regexp::Match   '/./'
     PPI::Token::Whitespace      ' '
     PPI::Token::Structure       ';'
   PPI::Token::Whitespace        ' '
   PPI::Statement
     PPI::Token::Word    'print'
     PPI::Token::Whitespace      ' '
     PPI::Token::Number          '1'

If this tree looks right, I'd be happy to write up and commit the  
test as a TODO.

Thanks,
Chris
-- 
Chris Dolan, Software Developer, Clotho Advanced Media Inc.
608-294-7900, fax 294-7025, 1435 E Main St, Madison WI 53703
vCard: http://www.chrisdolan.net/ChrisDolan.vcf

Clotho Advanced Media, Inc. - Creators of MediaLandscape Software  
(http://www.media-landscape.com/) and partners in the revolutionary  
Croquet project (http://www.opencroquet.org/)