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: