CLIX - Fazer Clix Custa Nix/CLIX-CD.cdr/mac/lib/auto/DynaLoader/dl_find_symbol_anywhere.al

Text File | 1998-04-04 | 349b | 16 lines

# NOTE: Derived from wintermute:Development:MacPerl:perl:lib:DynaLoader.pm.  Changes made here will be lost.
package DynaLoader;

sub dl_find_symbol_anywhere
{
    my $sym = shift;
    my $libref;
    foreach $libref (@dl_librefs) {
        my $symref = dl_find_symbol($libref,$sym);
        return $symref if $symref;
    }
    return undef;
}

1;