Subject: | Can't use string ("A blessed rule is in a grammar w"...) as an ARRAY ref |
Hello,
With the test program in attachement, there is this error:
% perl bug.pl
Uncaught exception from user code:
Can't use string ("A blessed rule is in a grammar w"...) as an
ARRAY ref while "strict refs" in use at
/usr/local/lib/perl/5.14.2/Marpa/R2/Value.pm line 363.
at /usr/local/lib/perl/5.14.2/Marpa/R2/Value.pm line 363
Marpa::R2::Internal::Recognizer::semantics_set('Marpa::R2::Recognizer=ARRAY(0x92ff930)',
'ARRAY(0x92ff5fc)', 'ARRAY(0x8ea0764)') called at
/usr/local/lib/perl/5.14.2/Marpa/R2/Value.pm line 59
Marpa::R2::Recognizer::semantics_set('Marpa::R2::Recognizer=ARRAY(0x92ff930)')
called at /usr/local/lib/perl/5.14.2/Marpa/R2/Scanless.pm line 1348
Marpa::R2::Scanless::R::new('Marpa::R2::Scanless::R',
'HASH(0x8e0195c)') called at bug.pl line 14
Regards, Jean-Damien.
Subject: | bug.pl |
#!env perl
use strict;
use diagnostics;
use Marpa::R2;
my $grammar = Marpa::R2::Scanless::G->new(
{
action_object => 'test',
source => \(<<'END_OF_SOURCE'),
:start ::= string
string ::= 'string' bless => blessed
END_OF_SOURCE
}
);
my $recce = Marpa::R2::Scanless::R->new( { grammar => $grammar } );