[svn:parrot] r47220 - trunk/t/op

[bacek at svn.parrot.org]

Author: bacek
Date: Mon May 31 13:44:07 2010
New Revision: 47220
URL: https://trac.parrot.org/parrot/changeset/47220

Log:
Use stdout to avoid dependency on dynops.

Modified:
   trunk/t/op/interp.t

Modified: trunk/t/op/interp.t
==============================================================================
--- trunk/t/op/interp.t	Mon May 31 13:39:09 2010	(r47219)
+++ trunk/t/op/interp.t	Mon May 31 13:44:07 2010	(r47220)
@@ -43,13 +43,10 @@
 OUTPUT
 
 pir_output_is( <<'CODE', <<'OUTPUT', 'runinterp - works with printing' );
-.loadlib 'io_ops'
 .sub 'test' :main
     .local string actual
     .local pmc test_interp
                test_interp = new 'ParrotInterpreter'
-    .local pmc stdout
-               stdout = getstdout
 
     print "uno\n"
     runinterp test_interp, pasm
@@ -71,15 +68,14 @@
 # the test fail.
 pasm_output_like(
     <<'CODE', <<'OUTPUT', "restart trace" );
-    .loadlib 'io_ops'
-    printerr "ok 1\n"
+    print "ok 1\n"
     sweepoff
     set I0, 1
     trace I0
     dec I0
     trace I0
     sweepon
-    printerr "ok 2\n"
+    print "ok 2\n"
     end
 CODE
 /^ok\s1\n
@@ -91,8 +87,7 @@
 pasm_output_is( <<'CODE', 'nada:', 'interp - warnings' );
     new P0, 'Undef'
     set I0, P0
-    .loadlib 'io_ops'
-    printerr "nada:"
+    print "nada:"
     warningson 1
     new P1, 'Undef'
     set I0, P1