Lines Matching full:os2
1 package OS2::DLL;
26 my @packs = $INC{'OS2/REXX.pm'} ? qw(OS2::DLL::dll OS2::REXX) : 'OS2::DLL::dll';
27 my $p = "OS2::DLL::dll::$file";
29 *{"$p\::AUTOLOAD"} = \&OS2::DLL::dll::AUTOLOAD;
47 confess 'Usage: OS2::DLL->new( <file> [<dirs>] )' unless @_ >= 2;
52 confess 'Usage: OS2::DLL->module( <file> [<dirs>] )' unless @_ >= 2;
57 confess 'Usage: load OS2::DLL <file> [<dirs>]' unless $#_ >= 1;
64 push @path, split /;/, OS2::extLibpath if $flags & 0x1; # BEGIN
65 push @path, split /;/, OS2::libPath if $flags & 0x2;
66 push @path, split /;/, OS2::extLibpath(1) if $flags & 0x4; # END
76 package OS2::DLL::dll;
78 @ISA = 'OS2::DLL';
81 $AUTOLOAD =~ /^OS2::DLL::dll::.+::(.+)$/
101 OS2::DLL::_call($name, $addr, $queue, @_);
121 sub fullname { OS2::DLLname(0x202, shift->handle) }
122 #sub modname { OS2::DLLname(0x201, shift->handle) }
130 XSLoader::load 'OS2::DLL';
137 OS2::DLL - access to DLLs with REXX calling convention.
143 See documentation of L<OS2::REXX> module if you need the variable pool.
147 use OS2::DLL;
148 $emx_dll = OS2::DLL->module('emx');
157 $dll = OS2::DLL->module( NAME [, WHERE] );
167 $dll = OS2::DLL->new( NAME [, WHERE] );
175 $dll = load OS2::DLL NAME [, WHERE];
210 Unless used inside REXX environment (see L<OS2::REXX>), the REXX runtime
225 of F<.def> file when linking) via OS2::Proc.
306 Extracted by Ilya Zakharevich perl-module-OS2-DLL@ilyaz.org from L<OS2::REXX>