develooper Front page | perl.cvs.parrot | Postings from December 2008

[svn:parrot] r34332 - trunk/languages/squaak/src/parser

From:
bernhard
Date:
December 24, 2008 04:30
Subject:
[svn:parrot] r34332 - trunk/languages/squaak/src/parser
Message ID:
20081224123036.22717CBA12@x12.develooper.com
Author: bernhard
Date: Wed Dec 24 04:30:33 2008
New Revision: 34332

Modified:
   trunk/languages/squaak/src/parser/actions.pm

Log:
[squaak] isdecl() is more happy with a simple integer.


Modified: trunk/languages/squaak/src/parser/actions.pm
==============================================================================
--- trunk/languages/squaak/src/parser/actions.pm	(original)
+++ trunk/languages/squaak/src/parser/actions.pm	Wed Dec 24 04:30:33 2008
@@ -157,7 +157,7 @@
 
     ## get the exception identifier;
     my $exc := $( $<exception> );
-    $exc.isdecl( PAST::Val.new( :value(1) ) );
+    $exc.isdecl(1);
     $exc.scope('lexical');
     $exc.viviself( PAST::Val.new( :value(0) ) );
 



nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About