[svn:parrot] r38076 - branches/packfile_revamp/t/pmc
bacek at svn.parrot.org
bacek at svn.parrot.org
Sun Apr 12 08:02:21 UTC 2009
Author: bacek
Date: Sun Apr 12 08:02:21 2009
New Revision: 38076
URL: https://trac.parrot.org/parrot/changeset/38076
Log:
Fix packfiledirectory.t
Modified:
branches/packfile_revamp/t/pmc/packfiledirectory.t
Modified: branches/packfile_revamp/t/pmc/packfiledirectory.t
==============================================================================
--- branches/packfile_revamp/t/pmc/packfiledirectory.t Sun Apr 12 08:02:04 2009 (r38075)
+++ branches/packfile_revamp/t/pmc/packfiledirectory.t Sun Apr 12 08:02:21 2009 (r38076)
@@ -95,7 +95,7 @@
$I0 = elements pfdir
$P0 = iter pfdir
$S0 = shift $P0
- pfdir[$S0] = $P0
+ pfdir[$S0] = seg
$I1 = elements pfdir
is($I0, $I1, "Segment with old name was added")
goto done
@@ -104,7 +104,7 @@
add_new:
seg = new [ 'PackfileRawSegment' ]
$S0 = 'BYTECODE_foo'
- pfdir[$S0] = $P0
+ pfdir[$S0] = seg
$I1 = elements pfdir
inc $I0
is($I0, $I1, "New segment added")
More information about the parrot-commits
mailing list