git://git.camperquake.de
/
videosite.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
- Fix typo
[videosite.git]
/
videosite
/
JSLexArrayParser.pm
diff --git
a/videosite/JSLexArrayParser.pm
b/videosite/JSLexArrayParser.pm
index
20e6e0e
..
f250d61
100644
(file)
--- a/
videosite/JSLexArrayParser.pm
+++ b/
videosite/JSLexArrayParser.pm
@@
-6,7
+6,10
@@
# package. Use 'yapp -m videosite::jsarray -s jsarray.yp' to regenerate
#
# package. Use 'yapp -m videosite::jsarray -s jsarray.yp' to regenerate
#
-package videosite::JSArrayParser;
+package videosite::JSLexArrayParser;
+
+use videosite::JSArrayParser;
+@ISA = qw(videosite::JSArrayParser);
use Parse::Lex;
use videosite::jsarray;
use Parse::Lex;
use videosite::jsarray;
@@
-23,10
+26,10
@@
my @tokens = (
sub new {
my $class = shift;
sub new {
my $class = shift;
- my $self =
{
- '_PARSER' => videosite::jsarray->new(),
- '_LEXER' => Parse::Lex->new(@tokens),
-
}
;
+ my $self =
$class->SUPER::new();
+
+ $self->{'_PARSER'} = videosite::jsarray->new();
+
$self->{'_LEXER'} = Parse::Lex->new(@tokens)
;
return bless($self, $class);
}
return bless($self, $class);
}