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

[svn:parrot] r33827 - trunk/languages/lua/src/lib

From:
fperrad
Date:
December 12, 2008 02:23
Subject:
[svn:parrot] r33827 - trunk/languages/lua/src/lib
Message ID:
20081212102313.3F6E5CB9AF@x12.develooper.com
Author: fperrad
Date: Fri Dec 12 02:23:07 2008
New Revision: 33827

Modified:
   trunk/languages/lua/src/lib/luaio.pir

Log:
[Lua]
- fix test io_33

Modified: trunk/languages/lua/src/lib/luaio.pir
==============================================================================
--- trunk/languages/lua/src/lib/luaio.pir	(original)
+++ trunk/languages/lua/src/lib/luaio.pir	Fri Dec 12 02:23:07 2008
@@ -309,7 +309,8 @@
     unless $I0 goto L1
     .local pmc toclose
     toclose = find_lex 'upvar_toclose'
-    unless toclose goto L1
+    $I0 = toclose
+    unless $I0 goto L1
     aux_close(file)
   L1:
     .return (res)
@@ -605,6 +606,8 @@
 Returns a handle for a temporary file. This file is open in update mode and
 it is automatically removed when the program ends.
 
+TODO: rewrite with a StringHandle
+
 =cut
 
 .sub 'tmpfile'



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