I noticed that in Inline::CPP version .25 with ENABLE => PRINT_INFO it no 
longer printed what was getting bound to perl.  I dug into it a bit, and 
finally found that Inline::CPP::info calls parse, without calling preprocess 
first, so the $o->{ILSM}{code} is not defined yet.  So I simpley added a call 
to preprocess in info() to fix this.

Now for the Farmer example in the doc we get:

Your module is already compiled. It is located at:
/tmp/_Inline/lib/auto/farmer_pl_9716/farmer_pl_9716.so

The following classes have been bound to Perl:
        class Farmer {
          Farmer::Farmer(char * name, int age);
          void Farmer::do_chores(int howlong);
          int Farmer::how_long();
          int Farmer::how_tired();
          Farmer::~Farmer();
        };

Thanks
-Cory
--- CPP.pm.bak	2003-08-30 02:15:43.000000000 -0700
+++ CPP.pm	2003-08-30 02:15:48.000000000 -0700
@@ -104,6 +104,7 @@
     my $o = shift;
     my $info = "";
 
+    $o->preprocess;
     $o->parse unless $o->{ILSM}{parser};
     my $data = $o->{ILSM}{parser}{data};
 

Reply via email to