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

[jquelin]

Author: jquelin
Date: Fri Jan  9 01:47:36 2009
New Revision: 35258

Modified:
   trunk/languages/befunge/befunge.pir
   trunk/languages/befunge/io.pir

Log:
cleaning sub names


Modified: trunk/languages/befunge/befunge.pir
==============================================================================
--- trunk/languages/befunge/befunge.pir (original)
+++ trunk/languages/befunge/befunge.pir Fri Jan  9 01:47:36 2009
@@ -99,8 +99,8 @@
     if char == ':' goto STACK_DUP
 
     # i/o operations
-    if char == 'p' goto IO_GET_VALUE
-    if char == 'p' goto IO_PUT_VALUE
+    if char == 'p' goto IO_VALUE_GET
+    if char == 'p' goto IO_VALUE_PUT
     
     # unknown instruction
     if char == ' ' goto MOVE_PC
@@ -172,11 +172,11 @@
   IO_PUSH_CHAR:
     io__push_char()
     goto MOVE_PC
-  IO_GET_VALUE:
-    io__get_value()
+  IO_VALUE_GET:
+    io__value_get()
     goto MOVE_PC
-  IO_PUT_VALUE:
-    io__put_value()
+  IO_VALUE_PUT:
+    io__value_put()
     goto MOVE_PC
 
     # maths instructions

Modified: trunk/languages/befunge/io.pir
==============================================================================
--- trunk/languages/befunge/io.pir      (original)
+++ trunk/languages/befunge/io.pir      Fri Jan  9 01:47:36 2009
@@ -20,7 +20,7 @@
 
 
 #
-# io__get_value()
+# io__value_get()
 #
 # get a value from the playfield.
 # befunge stack:
@@ -28,7 +28,7 @@
 #   after:      ... i
 # i = value_at(x,y)
 #
-.sub "io__get_value"
+.sub "io__value_get"
     .local int x, y
     y = stack__pop()
     x = stack__pop()
@@ -40,7 +40,7 @@
 
 
 #
-# io__put_value()
+# io__value_put()
 #
 # put a value in the playfield.
 # befunge stack:
@@ -48,7 +48,7 @@
 #   after:      ...
 # value_at(x,y) = i
 #
-.sub "io__put_value"
+.sub "io__value_put"
     .local int x, y, v
     y = stack__pop()
     x = stack__pop()