diff --git a/wmls2pbc.pir b/wmls2pbc.pir
index 5d38306..a37090b 100644
--- a/wmls2pbc.pir
+++ b/wmls2pbc.pir
@@ -18,7 +18,6 @@ wmlsd, wmls2pir, wmlsi
 =cut
 
 .HLL 'wmlscript'
-.loadlib 'io_ops'
 
 .sub 'main' :main
     .param pmc argv
@@ -50,7 +49,9 @@ wmlsd, wmls2pir, wmlsi
   L1:
     end
   USAGE:
-    printerr "Usage: parrot wmls2pbc.pir filename\n"
+    .local pmc stderr
+    stderr = getstderr
+    print stderr, "Usage: parrot wmls2pbc.pir filename\n"
     exit -1
   _handler:
     .local pmc e
diff --git a/wmls2pir.pir b/wmls2pir.pir
index 621fb83..84f0790 100644
--- a/wmls2pir.pir
+++ b/wmls2pir.pir
@@ -18,7 +18,6 @@ wmlsd, wmls2pbc, wmlsi
 =cut
 
 .HLL 'wmlscript'
-.loadlib 'io_ops'
 
 .sub 'main' :main
     .param pmc argv
@@ -46,7 +45,9 @@ wmlsd, wmls2pbc, wmlsi
   L1:
     end
   USAGE:
-    printerr "Usage: parrot wmls2pir.pir filename\n"
+    .local pmc stderr
+    stderr = getstderr
+    print stderr, "Usage: parrot wmls2pir.pir filename\n"
     exit -1
   _handler:
     .local pmc e
diff --git a/wmlscript/WMLScript.pir b/wmlscript/WMLScript.pir
index 276f1a9..348f600 100644
--- a/wmlscript/WMLScript.pir
+++ b/wmlscript/WMLScript.pir
@@ -2,7 +2,6 @@
 # $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 5d15af7..13296c2 100644
--- a/wmlscript/library/wmlsfloat.pir
+++ b/wmlscript/library/wmlsfloat.pir
@@ -15,7 +15,6 @@ See "WMLScript Standard Libraries Specification", section 8 "Float".
 =cut
 
 .HLL 'wmlscript'
-.loadlib 'io_ops'
 .loadlib 'wmls_group'
 .loadlib 'wmls_ops'
 .loadlib 'trans_ops'
diff --git a/wmlscript/wmlsstdlibs.pir b/wmlscript/wmlsstdlibs.pir
index 1a4313c..6555523 100644
--- a/wmlscript/wmlsstdlibs.pir
+++ b/wmlscript/wmlsstdlibs.pir
@@ -138,7 +138,9 @@ helper for CALL_URL* opcodes.
     $S1 = err
     $S0 .= $S1
     $S0 .= ")\n"
-    printerr $S0
+    .local pmc stderr
+    stderr = getstderr
+    print stderr, $S0
     .return ('')
 .end
 
diff --git a/wmlsd.pir b/wmlsd.pir
index 93c0816..b461a72 100644
--- a/wmlsd.pir
+++ b/wmlsd.pir
@@ -18,7 +18,6 @@ parrot-wmlsi
 =cut
 
 .HLL 'wmlscript'
-.loadlib 'io_ops'
 
 .sub 'main' :main
     .param pmc argv
@@ -44,7 +43,9 @@ parrot-wmlsi
   L1:
     end
   USAGE:
-    printerr "Usage: parrot wmlsd.pbc filename\n"
+    .local pmc stderr
+    stderr = getstderr
+    print stderr, "Usage: parrot wmlsd.pbc filename\n"
     exit -1
   _handler:
     .local pmc e
diff --git a/wmlsi.pir b/wmlsi.pir
index 7c34e06..2937784 100644
--- a/wmlsi.pir
+++ b/wmlsi.pir
@@ -19,7 +19,6 @@ parrot-wmlsd
 =cut
 
 .HLL 'wmlscript'
-.loadlib 'io_ops'
 
 .sub 'main' :main
     .param pmc argv
@@ -75,7 +74,9 @@ parrot-wmlsd
   L1:
     end
   USAGE:
-    printerr "Usage: parrot wmlsi.pbc filename entry\n"
+    .local pmc stderr
+    stderr = getstderr
+    print stderr, "Usage: parrot wmlsi.pbc filename entry\n"
     exit -1
   _handler:
     .local pmc e