[svn:parrot] r34359 - in trunk: compilers/ncigen/src ext/SQLite3

[tewk]

Author: tewk
Date: Thu Dec 25 13:40:12 2008
New Revision: 34359

Modified:
   trunk/compilers/ncigen/src/NCIGENAST.pir
   trunk/ext/SQLite3/gen_sqlite3.pl

Log:
[ncigen] fix due to move to Capture pmc I believe


Modified: trunk/compilers/ncigen/src/NCIGENAST.pir
==============================================================================
--- trunk/compilers/ncigen/src/NCIGENAST.pir    (original)
+++ trunk/compilers/ncigen/src/NCIGENAST.pir    Thu Dec 25 13:40:12 2008
@@ -34,6 +34,10 @@
     .return ($P0)
 .end
 
+.sub 'item' :method
+    .return (self)
+.end
+
 =head1 NCIGENAST Node types
 
 =head2 NCIGENAST::Node

Modified: trunk/ext/SQLite3/gen_sqlite3.pl
==============================================================================
--- trunk/ext/SQLite3/gen_sqlite3.pl    (original)
+++ trunk/ext/SQLite3/gen_sqlite3.pl    Thu Dec 25 13:40:12 2008
@@ -15,7 +15,7 @@
 
 print preamble();
 
-for (parse_ast($fn).kv) -> $k,$v {
+for (parse_ast($fn).hash().kv) -> $k,$v {
     #dump_node($v);
     if ($v.WHAT eq "FuncDecl") {
         my @result = pir($v);