[svn:parrot] r42037 - in trunk/t: native_pbc pmc

[bacek at svn.parrot.org]

Author: bacek
Date: Fri Oct 23 14:47:55 2009
New Revision: 42037
URL: https://trac.parrot.org/parrot/changeset/42037

Log:
Rebuild native PBC and update packfile tests.

There is no PIC segment in PBC anymore.

Modified:
   trunk/t/native_pbc/annotations.pbc
   trunk/t/native_pbc/integer_1.pbc
   trunk/t/native_pbc/number_1.pbc
   trunk/t/pmc/packfiledirectory.t
   trunk/t/pmc/packfilerawsegment.t

Modified: trunk/t/native_pbc/annotations.pbc
==============================================================================
Binary file (source and/or target). No diff available.

Modified: trunk/t/native_pbc/integer_1.pbc
==============================================================================
Binary file (source and/or target). No diff available.

Modified: trunk/t/native_pbc/number_1.pbc
==============================================================================
Binary file (source and/or target). No diff available.

Modified: trunk/t/pmc/packfiledirectory.t
==============================================================================
--- trunk/t/pmc/packfiledirectory.t	Fri Oct 23 14:13:32 2009	(r42036)
+++ trunk/t/pmc/packfiledirectory.t	Fri Oct 23 14:47:55 2009	(r42037)
@@ -21,7 +21,7 @@
 
 .sub 'main' :main
 .include 'test_more.pir'
-    plan(23)
+    plan(20)
 
     'test_create'()
     'test_typeof'()
@@ -65,7 +65,7 @@
     pf    = _pbc()
     pfdir = pf.'get_directory'()
     $I0   = elements pfdir
-    is($I0, 5, 'PackfileDirectory.elements')
+    is($I0, 4, 'PackfileDirectory.elements')
 .end
 
 
@@ -79,7 +79,6 @@
     expected["BYTECODE"] = 2
     expected["FIXUP"]    = 1
     expected["CONSTANT"] = 1
-    expected["PIC"]      = 1
 
     pf    = _pbc()
     pfdir = pf.'get_directory'()

Modified: trunk/t/pmc/packfilerawsegment.t
==============================================================================
--- trunk/t/pmc/packfilerawsegment.t	Fri Oct 23 14:13:32 2009	(r42036)
+++ trunk/t/pmc/packfilerawsegment.t	Fri Oct 23 14:47:55 2009	(r42037)
@@ -95,7 +95,7 @@
 
   done:
     $I0 = elements hash
-    is($I0, 5, "Got all types of Packfile segments")
+    is($I0, 4, "Got all types of Packfile segments")
 
     # Now create RawSegment and set type.
     $P0 = new ['PackfileRawSegment']