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

[svn:parrot] r34339 - trunk/languages/befunge

From:
rurban
Date:
December 24, 2008 10:13
Subject:
[svn:parrot] r34339 - trunk/languages/befunge
Message ID:
20081224181253.5AD6FCBA12@x12.develooper.com
Author: rurban
Date: Wed Dec 24 10:12:52 2008
New Revision: 34339

Modified:
   trunk/languages/befunge/debug.pasm

Log:
[befunge] fix syntax error
new dot => 'string'


Modified: trunk/languages/befunge/debug.pasm
==============================================================================
--- trunk/languages/befunge/debug.pasm	(original)
+++ trunk/languages/befunge/debug.pasm	Wed Dec 24 10:12:52 2008
@@ -7,10 +7,10 @@
 #         when reaching it, or a location "y,x", or a column "c:nn"
 #         or a row "r:nn"
 DEBUG_INITIALIZE:
-        new P3, .ResizablePMCArray
+        new P3, 'ResizablePMCArray'
         set P3[0], 1          # Stop at first step.
         repeat S10, "0", 128  # No char to break on.
-        new P4, .Hash
+        new P4, 'Hash'
         set P3[1], P4         # The breakpoints.
         ret
 



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