when (/array_table/) {
$self->pop_keys;
- $self->parse_array_table($token);
+ @_ = ($self, $token);
+ goto \&parse_array_table;
}
when (/table/) {
$self->pop_keys;
- $self->parse_table($token);
+ @_ = ($self, $token);
+ goto \&parse_table;
}
default{
when (/array_table/) {
$self->pop_keys;
- $self->parse_array_table($token);
+ @_ = ($self, $token);
+ goto \&parse_array_table;
}
when (/table/) {
$self->pop_keys;
- $self->parse_table($token);
+ @_ = ($self, $token);
+ goto \&parse_table;
}
default{