ruby-perl 04.01.2011 → 04.01.2011.1
Sign up to get free protection for your applications and to get access to all the features.
- data/lib/perl/ffi_lib.rb +9 -1
- metadata +1 -1
data/lib/perl/ffi_lib.rb
CHANGED
@@ -5,7 +5,7 @@ module Perl
|
|
5
5
|
require 'perl/internal'
|
6
6
|
extend FFI::Library
|
7
7
|
|
8
|
-
|
8
|
+
Perl::FFILib::load(klass)
|
9
9
|
|
10
10
|
# PERL_SYS_INIT3()
|
11
11
|
attach_function 'Perl_sys_init3', [:int, :pointer, :pointer], :void
|
@@ -63,6 +63,14 @@ module Perl
|
|
63
63
|
end
|
64
64
|
|
65
65
|
private
|
66
|
+
def self.load(klass)
|
67
|
+
begin
|
68
|
+
klass.ffi_lib Perl::FFILib::shlib
|
69
|
+
rescue Exception
|
70
|
+
klass.ffi_lib "/usr/lib/libperl.#{so_ext}"
|
71
|
+
end
|
72
|
+
end
|
73
|
+
|
66
74
|
def self.archlib
|
67
75
|
`perl -MConfig -e 'print $Config{archlib}'`
|
68
76
|
end
|