Author: jisom
Date: Fri Jan 13 16:47:22 2006
New Revision: 11167

Modified:
   trunk/runtime/parrot/library/Getopt/Obj.pir
Log:
Fixed a minor glitch in makeResizable to use $S0 instead of $P0


Modified: trunk/runtime/parrot/library/Getopt/Obj.pir
==============================================================================
--- trunk/runtime/parrot/library/Getopt/Obj.pir (original)
+++ trunk/runtime/parrot/library/Getopt/Obj.pir Fri Jan 13 16:47:22 2006
@@ -363,8 +363,8 @@ and some of the things we do to it need 
     argc = argv
 beginfor:
     unless k < argc goto endfor
-    $P0 = shift argv
-    push argnew, $P0
+    $S0 = shift argv
+    push argnew, $S0
     inc k
     goto beginfor
 endfor:

Reply via email to