# New Ticket Created by  Nick Glencross 
# Please include the string:  [perl #36119]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org/rt3/Ticket/Display.html?id=36119 >


Folks,

this small patch fixes a current problem with loading dynclasses on 
HP-UX. The libraries are copied from dynclasses/ to 
runtime/parrot/dynext/ but in the process lose their execute flags which 
is one of the prerequisites for dlopen to open it.

Regards,

Nick

p.s. I've been having a look at how the internals of Configure work. I 
like it! It's too early to say, but in the same way that it determines 
if the C compiler is gcc, it may be necessary to do something similar 
for the linker. Too early to say though...

[It looks like most of the initial values for Configure are extracted 
from Perl. I need to find out why it chooses strange values for my 'ld', 
unless we are misinterpreting some of their meanings]
Index: config/gen/makefiles/dynclasses_pl.in
===================================================================
--- config/gen/makefiles/dynclasses_pl.in       (revision 8266)
+++ config/gen/makefiles/dynclasses_pl.in       (working copy)
@@ -140,6 +140,10 @@
 
     foreach (@ungrouped_pmcs, keys %$group_files) {
         copy("$_$LOAD_EXT", $dest) or die "Copy $_$LOAD_EXT failed ($?)\n";
+        if ($^O ne 'MSWin32') {
+            # Execute permissions on libraries is especially important on HP-UX
+            chmod 0755, "$dest/$_$LOAD_EXT"; 
+        }
     }
 }
 else {

Reply via email to