[svn:parrot] r47224 - in trunk/t/pmc: . testlib
bacek at svn.parrot.org
bacek at svn.parrot.org
Mon May 31 13:58:12 UTC 2010
Author: bacek
Date: Mon May 31 13:58:11 2010
New Revision: 47224
URL: https://trac.parrot.org/parrot/changeset/47224
Log:
Remove dependencies on dynops to be able to run tests in coretest
Modified:
trunk/t/pmc/packfile.t
trunk/t/pmc/packfileannotations.t
trunk/t/pmc/testlib/packfile_common.pir
Modified: trunk/t/pmc/packfile.t
==============================================================================
--- trunk/t/pmc/packfile.t Mon May 31 13:56:57 2010 (r47223)
+++ trunk/t/pmc/packfile.t Mon May 31 13:58:11 2010 (r47224)
@@ -298,7 +298,8 @@
.local string filename, first
push_eh load_error
$S0 = '_filename'()
- $P0 = open $S0, 'r'
+ $P0 = new ['FileHandle']
+ $P0.'open'($S0, 'r')
first = $P0.'readall'()
Modified: trunk/t/pmc/packfileannotations.t
==============================================================================
--- trunk/t/pmc/packfileannotations.t Mon May 31 13:56:57 2010 (r47223)
+++ trunk/t/pmc/packfileannotations.t Mon May 31 13:58:11 2010 (r47224)
@@ -41,7 +41,8 @@
.local pmc pf
push_eh load_error
- $P0 = open 't/native_pbc/annotations.pbc'
+ $P0 = new ['FileHandle']
+ $P0.'open'('t/native_pbc/annotations.pbc', 'r')
$P0.'encoding'('binary')
$S0 = $P0.'readall'()
pf = new 'Packfile'
Modified: trunk/t/pmc/testlib/packfile_common.pir
==============================================================================
--- trunk/t/pmc/testlib/packfile_common.pir Mon May 31 13:56:57 2010 (r47223)
+++ trunk/t/pmc/testlib/packfile_common.pir Mon May 31 13:58:11 2010 (r47224)
@@ -7,8 +7,6 @@
# Currently parrot doesn't support system independent PBCs. So, cross your
# fingers and try different filename for binary-dependent tests...
-.loadlib 'io_ops'
-
.sub '_filename'
.local string filename
filename = 't/native_pbc/number.pbc'
@@ -22,9 +20,10 @@
.local pmc pf, pio
pf = new ['Packfile']
$S0 = '_filename'()
- pio = open $S0, 'r'
+ pio = new ['FileHandle']
+ pio.'open'($S0, 'r')
$S0 = pio.'readall'()
- close pio
+ pio.'close'()
pf = $S0
.return(pf)
.end
More information about the parrot-commits
mailing list