Author: fperrad
Date: Mon Jan 8 02:05:01 2007
New Revision: 16475
Modified:
trunk/languages/WMLScript/src/wmlsstdlibs.pir
Log:
[WMLScript]
- load_script : fix on linux
Modified: trunk/languages/WMLScript/src/wmlsstdlibs.pir
==============================================================================
--- trunk/languages/WMLScript/src/wmlsstdlibs.pir (original)
+++ trunk/languages/WMLScript/src/wmlsstdlibs.pir Mon Jan 8 02:05:01 2007
@@ -145,6 +145,7 @@
.local pmc pio
.local string content
pio = getclass 'ParrotIO'
+ push_eh _handler
content = pio.'slurp'(filename)
if content goto L1
$S0 = err
@@ -154,6 +155,7 @@
print $S0
print ")\n"
L1:
+_handler:
.return (content)
.end
