--- ./src/test_main.c.old       2004-01-29 15:49:44.000000000 +0100
+++ ./src/test_main.c   2004-09-15 14:47:07.113244016 +0200
@@ -72,7 +72,7 @@
     char *filename;
     Parrot_PackFile pf;
 
-    interpreter = Parrot_new();
+    interpreter = Parrot_new(NULL);
 
     if (!interpreter) {
         return 1;
--- ./docs/tests.pod.old        2004-02-28 01:30:39.000000000 +0100
+++ ./docs/tests.pod    2004-09-15 14:50:18.802102880 +0200
@@ -63,7 +63,7 @@
 
     int main(int argc, char* argv[]) {
         Parrot_Interp interpreter;
-        interpreter = Parrot_new();
+        interpreter = Parrot_new(NULL);
 
         if (!interpreter)
         return 1;
--- ./docs/embed.pod.old        2004-02-28 01:30:39.000000000 +0100
+++ ./docs/embed.pod    2004-09-15 14:49:34.168888160 +0200
@@ -16,7 +16,7 @@
 
         argc--; argv++; /* skip the program name */
         
-        interp=Parrot_new();
+        interp=Parrot_new(NULL);
         Parrot_init(interp);
 
         if(PARROT_JIT_CAPABLE) {
@@ -178,9 +178,10 @@
 
 =over 4
 
-=item C<Parrot_Interp Parrot_new()>
+=item C<Parrot_Interp Parrot_new(Parrot_Interp parent)>
 
-Allocates and returns a new Parrot interpreter.
+Allocates and returns a new Parrot interpreter. C<parent> is NULL for the
+main interpreter that will be destroyed last.
 
 =item C<void Parrot_init(Parrot_Interp)>
 
--- ./build_tools/pbc2c.pl.old  2004-04-23 11:20:13.000000000 +0200
+++ ./build_tools/pbc2c.pl      2004-09-15 14:51:00.498764024 +0200
@@ -231,7 +231,7 @@
     INTVAL i;
     PMC *userargv;
 
-    interpreter = Parrot_new();
+    interpreter = Parrot_new(NULL);
     if (!interpreter) {
         return 1;
     }
@@ -366,4 +366,4 @@
 This program is free software. It is subject to the same license
 as the Parrot interpreter.
 
-=end ADDITIONAL
\ No newline at end of file
+=end ADDITIONAL

Reply via email to