From da7b4a6db5ee52b208a2df58d59156e178e94387 Mon Sep 17 00:00:00 2001
From: Francois Perrad <francois.perrad@gadz.org>
Date: Fri, 28 May 2010 15:40:28 +0200
Subject: [PATCH] fix build after ops_massacre

---
 t/helpers.pir                   | 10 ++++++----
 wmls2pbc.pir                    |  1 +
 wmls2pir.pir                    |  1 +
 wmlscript/WMLScript.pir         |  1 +
 wmlscript/library/wmlsfloat.pir |  2 ++
 wmlsd.pir                       |  1 +
 wmlsi.pir                       |  1 +
 7 files changed, 13 insertions(+), 4 deletions(-)

diff --git a/t/helpers.pir b/t/helpers.pir
index 2d00858..6b4e8b8 100644
--- a/t/helpers.pir
+++ b/t/helpers.pir
@@ -40,9 +40,10 @@
     cmd .= " "
     cmd .= params
   L3:
-    $P0 = open cmd, 'rp'
+    $P0 = new 'FileHandle'
+    $P0.'open'(cmd, 'rp')
     $S0 = $P0.'readall'()
-    close $P0
+    $P0.'close'()
     is($S0, expected, desc)
 .end
 
@@ -86,9 +87,10 @@
     cmd .= " "
     cmd .= params
   L3:
-    $P0 = open cmd, 'rp'
+    $P0 = new 'FileHandle'
+    $P0.'open'(cmd, 'rp')
     $S0 = $P0.'readall'()
-    close $P0
+    $P0.'close'()
     like($S0, pattern, desc)
 .end
 
diff --git a/wmls2pbc.pir b/wmls2pbc.pir
index 67079c3..5d38306 100644
--- a/wmls2pbc.pir
+++ b/wmls2pbc.pir
@@ -18,6 +18,7 @@ wmlsd, wmls2pir, wmlsi
 =cut
 
 .HLL 'wmlscript'
+.loadlib 'io_ops'
 
 .sub 'main' :main
     .param pmc argv
diff --git a/wmls2pir.pir b/wmls2pir.pir
index 1ea87c6..621fb83 100644
--- a/wmls2pir.pir
+++ b/wmls2pir.pir
@@ -18,6 +18,7 @@ wmlsd, wmls2pbc, wmlsi
 =cut
 
 .HLL 'wmlscript'
+.loadlib 'io_ops'
 
 .sub 'main' :main
     .param pmc argv
diff --git a/wmlscript/WMLScript.pir b/wmlscript/WMLScript.pir
index 348f600..276f1a9 100644
--- a/wmlscript/WMLScript.pir
+++ b/wmlscript/WMLScript.pir
@@ -2,6 +2,7 @@
 # $Id$
 
 .HLL 'wmlscript'
+.loadlib 'io_ops'
 .loadlib 'wmls_group'
 .loadlib 'wmls_ops'
 
diff --git a/wmlscript/library/wmlsfloat.pir b/wmlscript/library/wmlsfloat.pir
index effd216..5d15af7 100644
--- a/wmlscript/library/wmlsfloat.pir
+++ b/wmlscript/library/wmlsfloat.pir
@@ -15,8 +15,10 @@ See "WMLScript Standard Libraries Specification", section 8 "Float".
 =cut
 
 .HLL 'wmlscript'
+.loadlib 'io_ops'
 .loadlib 'wmls_group'
 .loadlib 'wmls_ops'
+.loadlib 'trans_ops'
 
 
 .sub 'getFloat'
diff --git a/wmlsd.pir b/wmlsd.pir
index 6042540..93c0816 100644
--- a/wmlsd.pir
+++ b/wmlsd.pir
@@ -18,6 +18,7 @@ parrot-wmlsi
 =cut
 
 .HLL 'wmlscript'
+.loadlib 'io_ops'
 
 .sub 'main' :main
     .param pmc argv
diff --git a/wmlsi.pir b/wmlsi.pir
index df1894e..7c34e06 100644
--- a/wmlsi.pir
+++ b/wmlsi.pir
@@ -19,6 +19,7 @@ parrot-wmlsd
 =cut
 
 .HLL 'wmlscript'
+.loadlib 'io_ops'
 
 .sub 'main' :main
     .param pmc argv