Parent Directory
|
Revision Log
|
Patch
| revision 1.38 by wakaba, Sat Aug 30 13:43:50 2008 UTC | revision 1.40 by wakaba, Sun Sep 14 03:07:58 2008 UTC | |
|---|---|---|
| # | Line 150 for my $file_name (grep {$_} split /\s+/ | Line 150 for my $file_name (grep {$_} split /\s+/ |
| 150 | }; | }; |
| 151 | $p->{prev_char} = [-1, -1, -1]; | $p->{prev_char} = [-1, -1, -1]; |
| 152 | $p->{next_char} = -1; | $p->{next_char} = -1; |
| 153 | ||
| 154 | $p->{read_until} = sub { return 0 }; | |
| 155 | ||
| 156 | $p->{parse_error} = sub { | $p->{parse_error} = sub { |
| 157 | push @token, 'ParseError'; | push @token, 'ParseError'; |
|
||||||||
| [email protected] | ViewVC Help |
| Powered by ViewVC 1.1.24 |