Parent Directory
| 
Revision Log
| 
Patch
| revision 1.39 by wakaba, Sun Sep 14 01:51:08 2008 UTC | revision 1.40 by wakaba, Sun Sep 14 03:07:58 2008 UTC | |
|---|---|---|
| # | Line 151 for my $file_name (grep {$_} split /\s+/ | Line 151 for my $file_name (grep {$_} split /\s+/ |
| 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->{getc_until} = sub { return undef }; | $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 |