Initial commit of OpenSPARC T2 architecture model.
[OpenSPARC-T2-SAM] / sam-t2 / devtools / amd64 / lib / perl5 / 5.8.8 / i86pc-solaris-64-ld / auto / POSIX / opendir.al
# NOTE: Derived from ../../lib/POSIX.pm.
# Changes made here will be lost when autosplit is run again.
# See AutoSplit.pm.
package POSIX;
#line 102 "../../lib/POSIX.pm (autosplit into ../../lib/auto/POSIX/opendir.al)"
sub opendir {
usage "opendir(directory)" if @_ != 1;
my $dirhandle;
CORE::opendir($dirhandle, $_[0])
? $dirhandle
: undef;
}
# end of POSIX::opendir
1;