[t] fix FPA test plan

parrot · Dec 31, 2010 · c40e82e · c40e82e
1 parent ab1f1f9
commit c40e82e
Show file tree

Hide file tree

Showing 2 changed files with 15 additions and 1 deletion.
diff --git a/t/pmc/fixedpmcarray.t b/t/pmc/fixedpmcarray.t
@@ -18,7 +18,7 @@ out-of-bounds test. Checks INT and PMC keys.
 
 .sub main :main
     .include 'test_more.pir'
-    plan(83)
+    plan(84)
     test_setting_array_size()
     test_assign_from_another()
     test_assign_self()

diff --git a/t/tools/pbc_dump.t b/t/tools/pbc_dump.t
@@ -126,6 +126,20 @@ unlink('inc_a.pir');
 unlink('inc_b.pir');
 unlink('inc_c.pir');
 
+my $annotated_pir = <<'PIR'
+.sub 'main' :main
+  .annotate 'line', 1
+  .annotate 'hello', 'world'
+  .local int i
+  i = 123
+  .annotate 'hello', 'dragon'
+  .annotate 'line', 441
+  dec i
+  .annotate 'goodbye', 'parrot'
+  .annoate 'line', 12
+.end
+PIR
+
 =head1 HELPER SUBROUTINES
 
 =head2 dump_output_like