[svn:parrot] r39447 - in trunk: t/native_pbc tools/dev

[Infinoid at svn.parrot.org]

Author: Infinoid
Date: Mon Jun  8 01:13:09 2009
New Revision: 39447
URL: https://trac.parrot.org/parrot/changeset/39447

Log:
[tools] Regenerate annotations.pbc as part of the mk_native_pbc run.

Modified:
   trunk/t/native_pbc/annotations.pbc
   trunk/tools/dev/mk_native_pbc

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

Modified: trunk/tools/dev/mk_native_pbc
==============================================================================
--- trunk/tools/dev/mk_native_pbc	Mon Jun  8 00:47:58 2009	(r39446)
+++ trunk/tools/dev/mk_native_pbc	Mon Jun  8 01:13:09 2009	(r39447)
@@ -139,6 +139,18 @@
     perl t/harness t/native_pbc/number.t && \
     perl t/harness t/native_pbc/string.t
 
+./parrot -o t/native_pbc/annotations.pbc - <<EOF
+.sub 'main'
+.annotate "file", "annotations.pir"
+.annotate "creator", "Parrot Foundation"
+.annotate "line", 1
+    say "Hi"
+    say "line"
+.annotate "line", 2
+    .return ()
+.end
+EOF
+
 if [ "$enable_long_double" = "1" ]; then
     if [ "$1" = "--noconf" ]; then
       echo "Hmm. You have no long double, and we want to try --floatval=long double"