[svn:parrot] r44816 - branches/rm_dynoplibs_make/lib/Parrot/Ops2c

coke at svn.parrot.org coke at svn.parrot.org
Tue Mar 9 15:53:16 UTC 2010


Author: coke
Date: Tue Mar  9 15:53:13 2010
New Revision: 44816
URL: https://trac.parrot.org/parrot/changeset/44816

Log:
Now build src/dynoplibs/*.o

(still have a link failure)

Modified:
   branches/rm_dynoplibs_make/lib/Parrot/Ops2c/Utils.pm

Modified: branches/rm_dynoplibs_make/lib/Parrot/Ops2c/Utils.pm
==============================================================================
--- branches/rm_dynoplibs_make/lib/Parrot/Ops2c/Utils.pm	Tue Mar  9 13:45:01 2010	(r44815)
+++ branches/rm_dynoplibs_make/lib/Parrot/Ops2c/Utils.pm	Tue Mar  9 15:53:13 2010	(r44816)
@@ -123,11 +123,15 @@
     my $source = "src/ops/$base_ops_stub.c.temp";
 
     if ( $flagref->{dynamic} ) {
+        $flagref->{dynamic} = 1;
+
         $source =~ s!src/ops/!!;
         $header = $base_ops_h;
         $base =~ s!^.*[/\\]!!;
-        $include = $base_ops_h;
-        $flagref->{dynamic} = 1;
+
+        # the compiler invocation has -Ipath/to/dir, so only include by name.
+        use File::Basename qw(fileparse);
+        $include = (fileparse($base_ops_h))[0];
     }
 
     my $sym_export =


More information about the parrot-commits mailing list