Re: Unable to run perl 6 test under Parrot 0.2.x

[Autrijus Tang]

On Sat, Aug 06, 2005 at 01:51:17AM +0400, Andrew Shitov wrote:
  Parrot 0.2.3 Serenity Released!
 
 Possibly I'm growling again but I cannot run any Perl 6 programme with
 new Parrots.
 
 One-liner test.p6 containing 'print perl 6;' is compiled to test.imc and 
 cause an error:

The README in that directory states:

Status
==
This prototype of the perl6 compiler was abandoned in June 2004. Current
work on the compiler may be found in the development of the Pugs
prototype (www.pugscode.org) and in the Parrot grammar engine (PGE) in
the Parrot repository at compilers/pge. You can track the development of
both on the perl6-compiler mailing list (perl6-compiler@perl.org).

Pugs, however, does work:

$ ./pugs -e 'say perl 6'
perl 6
$ ./pugs -B PIR -e 'say perl 6 (via parrot)'
perl 6 (via parrot)
$ perl perl5/PIL2JS/runjs.pl -e 'say perl 6 (via javascript)'
perl 6 (via javascript)

Thanks,
/Autrijus/


pgp7fMD8i1LhW.pgp
Description: PGP signature

Unable to run perl 6 test under Parrot 0.2.x

[Andrew Shitov]

 Parrot 0.2.3 Serenity Released!

Possibly I'm growling again but I cannot run any Perl 6 programme with
new Parrots.

One-liner test.p6 containing 'print perl 6;' is compiled to test.imc and 
cause an error:

C:\parrot-0.2.3\languages\perl6perl perl6 test.p6
error:imcc:syntax error, unexpected IDENTIFIER, expecting '\n' or COMMA in file 
'test.imc' line 61
Error: 'C:/parrot-0.2.3\parrot.exe -r test.imc ' failed with exit code 18
Stopped at perl6 line 351
main::mydie(4608, 'C:/parrot-0.2.3\parrot.exe -r test.imc ') called at 
perl6 line 844
main::pass4('test.imc', 'test.warn') called at perl6 line 766
main::pass2('test.imc', 'test.warn') called at perl6 line 459
main::output_tree('P6C::prog=ARRAY(0x2c5aa40)', 'test.p6', 'test.warn') 
called at perl6 line 524
main::pass1('Parse::RecDescent=HASH(0x2b2c43c)', 'test.p6', 
'test.warn', 'undef') called at perl6 line 586
main::run() called at perl6 line 231



Line 61 in test.imc is here:

.sub __main @MAIN
new_pad 0
call __setup



pop_pad
end
.end

.sub _main prototyped ### line 61
.param PerlHash Sunknown_named1 # named args
# Argument handling
  if I0 goto L_got_params2
L_got_params2:
# Named locals:

find_lex $P1, print



Thanks in advance.

--
___
Andrew, [EMAIL PROTECTED]
___