[svn:parrot] r47219 - trunk/t/compilers/imcc/syn

bacek at svn.parrot.org bacek at svn.parrot.org
Mon May 31 13:39:09 UTC 2010


Author: bacek
Date: Mon May 31 13:39:09 2010
New Revision: 47219
URL: https://trac.parrot.org/parrot/changeset/47219

Log:
Don't use printerr in test to avoid dependency on opsc for dynops.

Modified:
   trunk/t/compilers/imcc/syn/tail.t

Modified: trunk/t/compilers/imcc/syn/tail.t
==============================================================================
--- trunk/t/compilers/imcc/syn/tail.t	Mon May 31 13:22:32 2010	(r47218)
+++ trunk/t/compilers/imcc/syn/tail.t	Mon May 31 13:39:09 2010	(r47219)
@@ -15,7 +15,6 @@
 $ENV{TEST_PROG_ARGS} = '-Oc';
 
 pir_output_is( <<'CODE', <<'OUT', "tail call optimization, final position" );
-.loadlib 'io_ops'
 
 .sub _main :main
     $P1 = new 'Integer'
@@ -57,7 +56,7 @@
     $I33 = defined function
     if $I33 goto doit
 bad_func:
-    printerr "_funcall:  Bad function.\n"
+    print "_funcall:  Bad function.\n"
     exit 0
 doit:
     set_args "0x20", argv
@@ -99,8 +98,6 @@
 
 pir_output_is( <<'CODE', <<'OUT', "tail call optimization, intermediate position" );
 
-.loadlib 'io_ops'
-
 .sub _main :main
     $P1 = new 'Integer'
     $P1 = 20
@@ -138,7 +135,7 @@
 doit:
     .tailcall function(argv :flat)
 bad_func:
-    printerr "_funcall:  Bad function.\n"
+    print "_funcall:  Bad function.\n"
     exit 0
 .end
 
@@ -175,8 +172,6 @@
 
 pir_output_is( <<'CODE', <<'OUT', "tail call optimization, implicit final return" );
 
-.loadlib 'io_ops'
-
 .sub _main :main
 
     $P1 = new 'Integer'
@@ -213,7 +208,7 @@
     $I33 = defined function
     if $I33 goto doit
 bad_func:
-    printerr "_funcall:  Bad function.\n"
+    print "_funcall:  Bad function.\n"
     exit 0
 doit:
     .tailcall function(argv :flat)
@@ -256,8 +251,6 @@
 
 pir_output_is( <<'CODE', <<'OUT', ":flatten in .return" );
 
-.loadlib 'io_ops'
-
 .sub _main :main
 
     $P1 = new 'Integer'
@@ -291,7 +284,7 @@
         print " results]\n"
     .return ($P35 :flat)
 bad_func:
-    printerr "_funcall:  Bad function.\n"
+    print "_funcall:  Bad function.\n"
     exit 0
 .end
 


More information about the parrot-commits mailing list