[svn:parrot] r37811 - trunk/t/library
barney at svn.parrot.org
barney at svn.parrot.org
Sun Mar 29 10:49:30 UTC 2009
Author: barney
Date: Sun Mar 29 10:49:29 2009
New Revision: 37811
URL: https://trac.parrot.org/parrot/changeset/37811
Log:
[t] remove some 'library/' in load_bytecode arguments,
that should help with running tests with an installed parrot
Modified:
trunk/t/library/md5.t
trunk/t/library/mt19937ar.t
trunk/t/library/p6object.t
trunk/t/library/pcre.t
trunk/t/library/tcl_glob.t
trunk/t/library/tcl_lib.t
trunk/t/library/test_builder_tester.t
trunk/t/library/test_more.t
trunk/t/library/uuid.t
trunk/t/library/yaml_parser_syck.t
Modified: trunk/t/library/md5.t
==============================================================================
--- trunk/t/library/md5.t Sun Mar 29 10:03:15 2009 (r37810)
+++ trunk/t/library/md5.t Sun Mar 29 10:49:29 2009 (r37811)
@@ -34,7 +34,7 @@
pir_output_is( <<'CODE', <<'OUT', "Miscellaneous words" );
.sub _main
- load_bytecode "library/Digest/MD5.pbc"
+ load_bytecode "Digest/MD5.pbc"
$P0 = _md5sum ("Hello")
_md5_print ($P0)
print "\n"
@@ -62,7 +62,7 @@
pir_output_is( <<'CODE', <<'OUT', "Funny chars" );
.sub _main
- load_bytecode "library/Digest/MD5.pbc"
+ load_bytecode "Digest/MD5.pbc"
$P0 = _md5sum ("\n\n\n\n\t")
_md5_print ($P0)
print "\n"
@@ -200,7 +200,7 @@
pir_output_is( <<CODE, <<'OUT', "String lengths" );
.sub _main
- load_bytecode "library/Digest/MD5.pbc"
+ load_bytecode "Digest/MD5.pbc"
$code
end
.end
@@ -323,7 +323,7 @@
pir_output_is( <<CODE, <<'OUT', "REALLY long string" );
.sub _main
- load_bytecode "library/Digest/MD5.pbc"
+ load_bytecode "Digest/MD5.pbc"
\$P0 = _md5sum ("$text")
_md5_print (\$P0)
print "\\n"
@@ -351,7 +351,7 @@
pir_output_is( <<'CODE', <<'OUT', "recursive md5sum (1)" );
.sub _main
- load_bytecode "library/Digest/MD5.pbc"
+ load_bytecode "Digest/MD5.pbc"
$S0 = "Hello World!"
$I0 = 0
@@ -589,7 +589,7 @@
pir_output_is( <<'CODE', <<'OUT', "recursive md5sum (2)" );
.sub _main
- load_bytecode "library/Digest/MD5.pbc"
+ load_bytecode "Digest/MD5.pbc"
$S0 = "Hello World!"
$I0 = 0
Modified: trunk/t/library/mt19937ar.t
==============================================================================
--- trunk/t/library/mt19937ar.t Sun Mar 29 10:03:15 2009 (r37810)
+++ trunk/t/library/mt19937ar.t Sun Mar 29 10:49:29 2009 (r37811)
@@ -20,7 +20,7 @@
pir_output_is( << 'CODE', << 'OUTPUT', 'MT typeof' );
.sub test :main
- load_bytecode 'library/Math/Random/mt19937ar.pbc'
+ load_bytecode 'Math/Random/mt19937ar.pbc'
.local pmc mt
mt = new [ 'Math'; 'Random'; 'MT' ]
$S0 = typeof mt
@@ -34,7 +34,7 @@
pir_output_is( << 'CODE', << 'OUTPUT', 'MT can init_genrand' );
.sub test :main
- load_bytecode 'library/Math/Random/mt19937ar.pbc'
+ load_bytecode 'Math/Random/mt19937ar.pbc'
.local pmc mt
mt = new [ 'Math'; 'Random'; 'MT' ]
$I0 = can mt, 'init_genrand'
@@ -48,7 +48,7 @@
pir_output_is( << 'CODE', << 'OUTPUT', 'MT can init_by_array' );
.sub test :main
- load_bytecode 'library/Math/Random/mt19937ar.pbc'
+ load_bytecode 'Math/Random/mt19937ar.pbc'
.local pmc mt
mt = new [ 'Math'; 'Random'; 'MT' ]
$I0 = can mt, 'init_by_array'
@@ -62,7 +62,7 @@
pir_output_is( << 'CODE', << 'OUTPUT', 'MT can genrand_int32' );
.sub test :main
- load_bytecode 'library/Math/Random/mt19937ar.pbc'
+ load_bytecode 'Math/Random/mt19937ar.pbc'
.local pmc mt
mt = new [ 'Math'; 'Random'; 'MT' ]
$I0 = can mt, 'genrand_int32'
@@ -76,7 +76,7 @@
pir_output_is( << 'CODE', << 'OUTPUT', 'MT can genrand_int31' );
.sub test :main
- load_bytecode 'library/Math/Random/mt19937ar.pbc'
+ load_bytecode 'Math/Random/mt19937ar.pbc'
.local pmc mt
mt = new [ 'Math'; 'Random'; 'MT' ]
$I0 = can mt, 'genrand_int31'
@@ -90,7 +90,7 @@
pir_output_is( << 'CODE', << 'OUTPUT', 'MT can genrand_real1' );
.sub test :main
- load_bytecode 'library/Math/Random/mt19937ar.pbc'
+ load_bytecode 'Math/Random/mt19937ar.pbc'
.local pmc mt
mt = new [ 'Math'; 'Random'; 'MT' ]
$I0 = can mt, 'genrand_real1'
@@ -104,7 +104,7 @@
pir_output_is( << 'CODE', << 'OUTPUT', 'MT can genrand_real2' );
.sub test :main
- load_bytecode 'library/Math/Random/mt19937ar.pbc'
+ load_bytecode 'Math/Random/mt19937ar.pbc'
.local pmc mt
mt = new [ 'Math'; 'Random'; 'MT' ]
$I0 = can mt, 'genrand_real2'
@@ -118,7 +118,7 @@
pir_output_is( << 'CODE', << 'OUTPUT', 'MT can genrand_real3' );
.sub test :main
- load_bytecode 'library/Math/Random/mt19937ar.pbc'
+ load_bytecode 'Math/Random/mt19937ar.pbc'
.local pmc mt
mt = new [ 'Math'; 'Random'; 'MT' ]
$I0 = can mt, 'genrand_real3'
@@ -132,7 +132,7 @@
pir_output_is( << 'CODE', << 'OUTPUT', 'MT can genrand_res53' );
.sub test :main
- load_bytecode 'library/Math/Random/mt19937ar.pbc'
+ load_bytecode 'Math/Random/mt19937ar.pbc'
.local pmc mt
mt = new [ 'Math'; 'Random'; 'MT' ]
$I0 = can mt, 'genrand_res53'
@@ -147,7 +147,7 @@
my $out = Parrot::Test::slurp_file(File::Spec->catfile( 't', 'library', 'mt19937ar.txt' ));
pir_output_is( << 'CODE', $out, 'mt19937ar output' );
.sub test :main
- load_bytecode 'library/Math/Random/mt19937ar.pbc'
+ load_bytecode 'Math/Random/mt19937ar.pbc'
.local pmc mt
mt = new [ 'Math'; 'Random'; 'MT' ]
.local pmc init
Modified: trunk/t/library/p6object.t
==============================================================================
--- trunk/t/library/p6object.t Sun Mar 29 10:03:15 2009 (r37810)
+++ trunk/t/library/p6object.t Sun Mar 29 10:49:29 2009 (r37811)
@@ -17,7 +17,7 @@
=cut
.sub 'main' :main
- load_bytecode 'library/Test/More.pbc'
+ load_bytecode 'Test/More.pbc'
.local pmc exports, curr_namespace, test_namespace
curr_namespace = get_namespace
Modified: trunk/t/library/pcre.t
==============================================================================
--- trunk/t/library/pcre.t Sun Mar 29 10:03:15 2009 (r37810)
+++ trunk/t/library/pcre.t Sun Mar 29 10:49:29 2009 (r37811)
@@ -61,7 +61,7 @@
include_paths = lib_paths[2]
unshift include_paths, '$pcre_libpath'
- load_bytecode "library/pcre.pir"
+ load_bytecode "pcre.pir"
.local pmc func
.local pmc lib
Modified: trunk/t/library/tcl_glob.t
==============================================================================
--- trunk/t/library/tcl_glob.t Sun Mar 29 10:03:15 2009 (r37810)
+++ trunk/t/library/tcl_glob.t Sun Mar 29 10:49:29 2009 (r37811)
@@ -15,7 +15,7 @@
=cut
.sub 'main' :main
- load_bytecode 'library/Test/More.pbc'
+ load_bytecode 'Test/More.pbc'
.local pmc exports, curr_namespace, test_namespace
curr_namespace = get_namespace
Modified: trunk/t/library/tcl_lib.t
==============================================================================
--- trunk/t/library/tcl_lib.t Sun Mar 29 10:03:15 2009 (r37810)
+++ trunk/t/library/tcl_lib.t Sun Mar 29 10:49:29 2009 (r37811)
@@ -17,7 +17,7 @@
.const int TESTS = 1
.sub 'main' :main
- load_bytecode 'library/Test/More.pbc'
+ load_bytecode 'Test/More.pbc'
.local pmc exports, curr_namespace, test_namespace
curr_namespace = get_namespace
Modified: trunk/t/library/test_builder_tester.t
==============================================================================
--- trunk/t/library/test_builder_tester.t Sun Mar 29 10:03:15 2009 (r37810)
+++ trunk/t/library/test_builder_tester.t Sun Mar 29 10:49:29 2009 (r37811)
@@ -3,7 +3,7 @@
# $Id$
.sub _main :main
- load_bytecode 'library/Test/Builder/Tester.pir'
+ load_bytecode 'Test/Builder/Tester.pir'
.local pmc tb_args
tb_args = new 'Hash'
Modified: trunk/t/library/test_more.t
==============================================================================
--- trunk/t/library/test_more.t Sun Mar 29 10:03:15 2009 (r37810)
+++ trunk/t/library/test_more.t Sun Mar 29 10:49:29 2009 (r37811)
@@ -3,8 +3,8 @@
# $Id$
.sub _main :main
- load_bytecode 'library/Test/Builder/Tester.pir'
- load_bytecode 'library/Test/More.pir'
+ load_bytecode 'Test/Builder/Tester.pir'
+ load_bytecode 'Test/More.pir'
.local pmc tb_args
tb_args = new 'Hash'
Modified: trunk/t/library/uuid.t
==============================================================================
--- trunk/t/library/uuid.t Sun Mar 29 10:03:15 2009 (r37810)
+++ trunk/t/library/uuid.t Sun Mar 29 10:49:29 2009 (r37811)
@@ -20,7 +20,7 @@
pir_output_is( << 'CODE', << 'OUTPUT', 'generate' );
.sub test :main
- load_bytecode 'library/uuid.pbc'
+ load_bytecode 'uuid.pbc'
$P0 = get_global ['uuid'], 'generate'
$P1 = $P0()
$S1 = typeof $P1
@@ -34,7 +34,7 @@
pir_output_like( << 'CODE', << 'OUTPUT', 'generate' );
.sub test :main
- load_bytecode 'library/uuid.pbc'
+ load_bytecode 'uuid.pbc'
$P0 = get_global ['uuid'], 'generate'
$P1 = $P0()
print $P1
@@ -46,7 +46,7 @@
pir_output_like( << 'CODE', << 'OUTPUT', 'generate_random' );
.sub test :main
- load_bytecode 'library/uuid.pbc'
+ load_bytecode 'uuid.pbc'
$P0 = get_global ['uuid'], 'generate_random'
$P1 = $P0()
print $P1
@@ -58,7 +58,7 @@
pir_output_like( << 'CODE', << 'OUTPUT', 'generate_time' );
.sub test :main
- load_bytecode 'library/uuid.pbc'
+ load_bytecode 'uuid.pbc'
$P0 = get_global ['uuid'], 'generate_time'
$P1 = $P0()
print $P1
@@ -70,7 +70,7 @@
pir_output_is( << 'CODE', << 'OUTPUT', 'parse' );
.sub test :main
- load_bytecode 'library/uuid.pbc'
+ load_bytecode 'uuid.pbc'
$P0 = get_global ['uuid'], 'parse'
($I0, $P1) = $P0("84949cc5-4701-4a84-895b-354c584a981b")
print $I0
@@ -87,7 +87,7 @@
pir_output_is( << 'CODE', << 'OUTPUT', 'parse' );
.sub test :main
- load_bytecode 'library/uuid.pbc'
+ load_bytecode 'uuid.pbc'
$P0 = get_global ['uuid'], 'parse'
$I0 = $P0("84949cc5-4701-4a84-895b-354c584a981b")
print $I0
@@ -140,7 +140,7 @@
pir_output_is( << 'CODE', << 'OUTPUT', 'time' );
.sub test :main
- load_bytecode 'library/uuid.pbc'
+ load_bytecode 'uuid.pbc'
$P0 = get_global ['uuid'], 'parse'
($I0, $P1) = $P0("84949cc5-4701-4a84-895b-354c584a981b")
$I1 = $P1.'time'()
@@ -154,7 +154,7 @@
pir_output_is( << 'CODE', << 'OUTPUT', 'type' );
.sub test :main
- load_bytecode 'library/uuid.pbc'
+ load_bytecode 'uuid.pbc'
$P0 = get_global ['uuid'], 'generate'
$P1 = $P0()
$I0 = $P1.'type'()
@@ -168,7 +168,7 @@
pir_output_is( << 'CODE', << 'OUTPUT', 'variant' );
.sub test :main
- load_bytecode 'library/uuid.pbc'
+ load_bytecode 'uuid.pbc'
$P0 = get_global ['uuid'], 'generate'
$P1 = $P0()
$I0 = $P1.'variant'()
Modified: trunk/t/library/yaml_parser_syck.t
==============================================================================
--- trunk/t/library/yaml_parser_syck.t Sun Mar 29 10:03:15 2009 (r37810)
+++ trunk/t/library/yaml_parser_syck.t Sun Mar 29 10:49:29 2009 (r37811)
@@ -29,8 +29,8 @@
pir_output_is( << 'CODE', << 'OUT', "basic parsing" );
-.include "library/YAML/Parser/Syck.pir"
-.include "library/dumper.pir"
+.include "YAML/Parser/Syck.pir"
+.include "dumper.pir"
.sub test :main
.local pmc loaded
More information about the parrot-commits
mailing list