diff options
author | Siep Kroonenberg <siepo@cybercomm.nl> | 2011-02-17 12:20:49 +0000 |
---|---|---|
committer | Siep Kroonenberg <siepo@cybercomm.nl> | 2011-02-17 12:20:49 +0000 |
commit | 316ee97c621496b0fe3267f57cce81bee44ca1e6 (patch) | |
tree | cb2cab1192b4f58a7971af19b213e980bceda4b4 /Master/tlpkg/tlperl/lib/auto/POSIX | |
parent | cd0f87b5d39480d85ad9bd4ee37f520f75bed560 (diff) |
Moving old tlperl prior to committing new one
git-svn-id: svn://tug.org/texlive/trunk@21422 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/tlperl/lib/auto/POSIX')
169 files changed, 0 insertions, 2472 deletions
diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/POSIX.dll b/Master/tlpkg/tlperl/lib/auto/POSIX/POSIX.dll Binary files differdeleted file mode 100755 index 1af4b64989b..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/POSIX.dll +++ /dev/null diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/SigAction/flags.al b/Master/tlpkg/tlperl/lib/auto/POSIX/SigAction/flags.al deleted file mode 100755 index 7cbdb7bb920..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/SigAction/flags.al +++ /dev/null @@ -1,9 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX::SigAction; - -#line 986 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\SigAction\flags.al)" -sub flags { $_[0]->{FLAGS} = $_[1] if @_ > 1; $_[0]->{FLAGS} }; -# end of POSIX::SigAction::flags -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/SigAction/handler.al b/Master/tlpkg/tlperl/lib/auto/POSIX/SigAction/handler.al deleted file mode 100755 index 3d03d1c9a99..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/SigAction/handler.al +++ /dev/null @@ -1,9 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX::SigAction; - -#line 984 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\SigAction\handler.al)" -sub handler { $_[0]->{HANDLER} = $_[1] if @_ > 1; $_[0]->{HANDLER} }; -# end of POSIX::SigAction::handler -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/SigAction/mask.al b/Master/tlpkg/tlperl/lib/auto/POSIX/SigAction/mask.al deleted file mode 100755 index bc8bd31e8c0..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/SigAction/mask.al +++ /dev/null @@ -1,9 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX::SigAction; - -#line 985 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\SigAction\mask.al)" -sub mask { $_[0]->{MASK} = $_[1] if @_ > 1; $_[0]->{MASK} }; -# end of POSIX::SigAction::mask -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/SigAction/new.al b/Master/tlpkg/tlperl/lib/auto/POSIX/SigAction/new.al deleted file mode 100755 index b74b2d4a4de..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/SigAction/new.al +++ /dev/null @@ -1,11 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX::SigAction; - -#line 981 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\SigAction\new.al)" -package POSIX::SigAction; - -sub new { bless {HANDLER => $_[1], MASK => $_[2], FLAGS => $_[3] || 0, SAFE => 0}, $_[0] } -# end of POSIX::SigAction::new -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/SigAction/safe.al b/Master/tlpkg/tlperl/lib/auto/POSIX/SigAction/safe.al deleted file mode 100755 index a9f21cc5f18..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/SigAction/safe.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX::SigAction; - -#line 987 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\SigAction\safe.al)" -sub safe { $_[0]->{SAFE} = $_[1] if @_ > 1; $_[0]->{SAFE} }; - -package POSIX::SigRt; - - -# end of POSIX::SigRt::safe -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/SigRt/CLEAR.al b/Master/tlpkg/tlperl/lib/auto/POSIX/SigRt/CLEAR.al deleted file mode 100755 index 78d3d5bb622..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/SigRt/CLEAR.al +++ /dev/null @@ -1,9 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX::SigRt; - -#line 1041 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\SigRt\CLEAR.al)" -sub CLEAR { &_exist; delete @SIG{ &POSIX::SIGRTMIN .. &POSIX::SIGRTMAX } } -# end of POSIX::SigRt::CLEAR -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/SigRt/DELETE.al b/Master/tlpkg/tlperl/lib/auto/POSIX/SigRt/DELETE.al deleted file mode 100755 index 6bac474d05b..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/SigRt/DELETE.al +++ /dev/null @@ -1,9 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX::SigRt; - -#line 1040 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\SigRt\DELETE.al)" -sub DELETE { delete $SIG{ &_check } } -# end of POSIX::SigRt::DELETE -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/SigRt/EXISTS.al b/Master/tlpkg/tlperl/lib/auto/POSIX/SigRt/EXISTS.al deleted file mode 100755 index 2f2c73d94a8..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/SigRt/EXISTS.al +++ /dev/null @@ -1,9 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX::SigRt; - -#line 1034 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\SigRt\EXISTS.al)" -sub EXISTS { &_exist } -# end of POSIX::SigRt::EXISTS -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/SigRt/FETCH.al b/Master/tlpkg/tlperl/lib/auto/POSIX/SigRt/FETCH.al deleted file mode 100755 index ed18ab0d9b6..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/SigRt/FETCH.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX::SigRt; - -#line 1035 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\SigRt\FETCH.al)" -sub FETCH { my $rtsig = &_check; - my $oa = POSIX::SigAction->new(); - POSIX::sigaction($rtsig, undef, $oa); - return $oa->{HANDLER} } -# end of POSIX::SigRt::FETCH -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/SigRt/SCALAR.al b/Master/tlpkg/tlperl/lib/auto/POSIX/SigRt/SCALAR.al deleted file mode 100755 index feec293431c..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/SigRt/SCALAR.al +++ /dev/null @@ -1,9 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX::SigRt; - -#line 1042 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\SigRt\SCALAR.al)" -sub SCALAR { &_croak; $_sigrtn + 1 } -1; -# end of POSIX::SigRt::SCALAR diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/SigRt/STORE.al b/Master/tlpkg/tlperl/lib/auto/POSIX/SigRt/STORE.al deleted file mode 100755 index f4c6466a06b..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/SigRt/STORE.al +++ /dev/null @@ -1,9 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX::SigRt; - -#line 1039 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\SigRt\STORE.al)" -sub STORE { my $rtsig = &_check; new($rtsig, $_[2], $SIGACTION_FLAGS) } -# end of POSIX::SigRt::STORE -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/SigRt/_check.al b/Master/tlpkg/tlperl/lib/auto/POSIX/SigRt/_check.al deleted file mode 100755 index c1a46c3e6c3..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/SigRt/_check.al +++ /dev/null @@ -1,15 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX::SigRt; - -#line 1018 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\SigRt\_check.al)" -sub _check { - my ($rtsig, $ok) = &_exist; - die "No POSIX::SigRt signal $_[1] (valid range SIGRTMIN..SIGRTMAX, or $_SIGRTMIN..$_SIGRTMAX)" - unless $ok; - return $rtsig; -} - -# end of POSIX::SigRt::_check -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/SigRt/_croak.al b/Master/tlpkg/tlperl/lib/auto/POSIX/SigRt/_croak.al deleted file mode 100755 index 742d4e9cd46..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/SigRt/_croak.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX::SigRt; - -#line 998 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\SigRt\_croak.al)" -sub _croak { - &_init unless defined $_sigrtn; - die "POSIX::SigRt not available" unless defined $_sigrtn && $_sigrtn > 0; -} - -# end of POSIX::SigRt::_croak -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/SigRt/_exist.al b/Master/tlpkg/tlperl/lib/auto/POSIX/SigRt/_exist.al deleted file mode 100755 index 075bbed6ab8..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/SigRt/_exist.al +++ /dev/null @@ -1,14 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX::SigRt; - -#line 1012 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\SigRt\_exist.al)" -sub _exist { - my $rtsig = _getsig($_[1]); - my $ok = $rtsig >= $_SIGRTMIN && $rtsig <= $_SIGRTMAX; - ($rtsig, $ok); -} - -# end of POSIX::SigRt::_exist -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/SigRt/_getsig.al b/Master/tlpkg/tlperl/lib/auto/POSIX/SigRt/_getsig.al deleted file mode 100755 index 1cdbfaaf197..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/SigRt/_getsig.al +++ /dev/null @@ -1,17 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX::SigRt; - -#line 1003 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\SigRt\_getsig.al)" -sub _getsig { - &_croak; - my $rtsig = $_[0]; - # Allow (SIGRT)?MIN( + n)?, a common idiom when doing these things in C. - $rtsig = $_SIGRTMIN + ($1 || 0) - if $rtsig =~ /^(?:(?:SIG)?RT)?MIN(\s*\+\s*(\d+))?$/; - return $rtsig; -} - -# end of POSIX::SigRt::_getsig -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/SigRt/_init.al b/Master/tlpkg/tlperl/lib/auto/POSIX/SigRt/_init.al deleted file mode 100755 index 8ac96299ec6..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/SigRt/_init.al +++ /dev/null @@ -1,14 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX::SigRt; - -#line 992 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\SigRt\_init.al)" -sub _init { - $_SIGRTMIN = &POSIX::SIGRTMIN; - $_SIGRTMAX = &POSIX::SIGRTMAX; - $_sigrtn = $_SIGRTMAX - $_SIGRTMIN; -} - -# end of POSIX::SigRt::_init -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/SigRt/new.al b/Master/tlpkg/tlperl/lib/auto/POSIX/SigRt/new.al deleted file mode 100755 index 30b6100a634..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/SigRt/new.al +++ /dev/null @@ -1,17 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX::SigRt; - -#line 1025 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\SigRt\new.al)" -sub new { - my ($rtsig, $handler, $flags) = @_; - my $sigset = POSIX::SigSet->new($rtsig); - my $sigact = POSIX::SigAction->new($handler, - $sigset, - $flags); - POSIX::sigaction($rtsig, $sigact); -} - -# end of POSIX::SigRt::new -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/abs.al b/Master/tlpkg/tlperl/lib/auto/POSIX/abs.al deleted file mode 100755 index a882e5a0309..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/abs.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 414 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\abs.al)" -sub abs { - usage "abs(x)" if @_ != 1; - CORE::abs($_[0]); -} - -# end of POSIX::abs -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/alarm.al b/Master/tlpkg/tlperl/lib/auto/POSIX/alarm.al deleted file mode 100755 index 2bf97977aeb..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/alarm.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 631 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\alarm.al)" -sub alarm { - usage "alarm(seconds)" if @_ != 1; - CORE::alarm($_[0]); -} - -# end of POSIX::alarm -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/assert.al b/Master/tlpkg/tlperl/lib/auto/POSIX/assert.al deleted file mode 100755 index fbeefa8583c..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/assert.al +++ /dev/null @@ -1,15 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 96 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\assert.al)" -sub assert { - usage "assert(expr)" if @_ != 1; - if (!$_[0]) { - croak "Assertion failed"; - } -} - -# end of POSIX::assert -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/atan2.al b/Master/tlpkg/tlperl/lib/auto/POSIX/atan2.al deleted file mode 100755 index 41b71fab8e4..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/atan2.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 161 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\atan2.al)" -sub atan2 { - usage "atan2(x,y)" if @_ != 2; - CORE::atan2($_[0], $_[1]); -} - -# end of POSIX::atan2 -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/atexit.al b/Master/tlpkg/tlperl/lib/auto/POSIX/atexit.al deleted file mode 100755 index 7df942dfda6..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/atexit.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 419 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\atexit.al)" -sub atexit { - unimpl "atexit() is C-specific: use END {} instead"; -} - -# end of POSIX::atexit -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/atof.al b/Master/tlpkg/tlperl/lib/auto/POSIX/atof.al deleted file mode 100755 index 5f4d2c51bbb..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/atof.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 423 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\atof.al)" -sub atof { - unimpl "atof() is C-specific, stopped"; -} - -# end of POSIX::atof -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/atoi.al b/Master/tlpkg/tlperl/lib/auto/POSIX/atoi.al deleted file mode 100755 index 57b26c01896..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/atoi.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 427 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\atoi.al)" -sub atoi { - unimpl "atoi() is C-specific, stopped"; -} - -# end of POSIX::atoi -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/atol.al b/Master/tlpkg/tlperl/lib/auto/POSIX/atol.al deleted file mode 100755 index f5784993845..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/atol.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 431 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\atol.al)" -sub atol { - unimpl "atol() is C-specific, stopped"; -} - -# end of POSIX::atol -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/autosplit.ix b/Master/tlpkg/tlperl/lib/auto/POSIX/autosplit.ix deleted file mode 100755 index cc56f9ada79..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/autosplit.ix +++ /dev/null @@ -1,173 +0,0 @@ -# Index created by AutoSplit for ..\..\lib\POSIX.pm -# (file acts as timestamp) -package POSIX; -sub usage ; -sub redef ; -sub unimpl ; -sub assert ; -sub tolower ; -sub toupper ; -sub closedir ; -sub opendir ; -sub readdir ; -sub rewinddir ; -sub errno ; -sub creat ; -sub fcntl ; -sub getgrgid ; -sub getgrnam ; -sub atan2 ; -sub cos ; -sub exp ; -sub fabs ; -sub log ; -sub pow ; -sub sin ; -sub sqrt ; -sub getpwnam ; -sub getpwuid ; -sub longjmp ; -sub setjmp ; -sub siglongjmp ; -sub sigsetjmp ; -sub kill ; -sub raise ; -sub offsetof ; -sub clearerr ; -sub fclose ; -sub fdopen ; -sub feof ; -sub fgetc ; -sub fgets ; -sub fileno ; -sub fopen ; -sub fprintf ; -sub fputc ; -sub fputs ; -sub fread ; -sub freopen ; -sub fscanf ; -sub fseek ; -sub fsync ; -sub ferror ; -sub fflush ; -sub fgetpos ; -sub fsetpos ; -sub ftell ; -sub fwrite ; -sub getc ; -sub getchar ; -sub gets ; -sub perror ; -sub printf ; -sub putc ; -sub putchar ; -sub puts ; -sub remove ; -sub rename ; -sub rewind ; -sub scanf ; -sub sprintf ; -sub sscanf ; -sub tmpfile ; -sub ungetc ; -sub vfprintf ; -sub vprintf ; -sub vsprintf ; -sub abs ; -sub atexit ; -sub atof ; -sub atoi ; -sub atol ; -sub bsearch ; -sub calloc ; -sub div ; -sub exit ; -sub free ; -sub getenv ; -sub labs ; -sub ldiv ; -sub malloc ; -sub qsort ; -sub rand ; -sub realloc ; -sub srand ; -sub system ; -sub memchr ; -sub memcmp ; -sub memcpy ; -sub memmove ; -sub memset ; -sub strcat ; -sub strchr ; -sub strcmp ; -sub strcpy ; -sub strcspn ; -sub strerror ; -sub strlen ; -sub strncat ; -sub strncmp ; -sub strncpy ; -sub strpbrk ; -sub strrchr ; -sub strspn ; -sub strstr ; -sub strtok ; -sub chmod ; -sub fstat ; -sub mkdir ; -sub stat ; -sub umask ; -sub wait ; -sub waitpid ; -sub gmtime ; -sub localtime ; -sub time ; -sub alarm ; -sub chdir ; -sub chown ; -sub execl ; -sub execle ; -sub execlp ; -sub execv ; -sub execve ; -sub execvp ; -sub fork ; -sub getegid ; -sub geteuid ; -sub getgid ; -sub getgroups ; -sub getlogin ; -sub getpgrp ; -sub getpid ; -sub getppid ; -sub getuid ; -sub isatty ; -sub link ; -sub rmdir ; -sub setbuf ; -sub setvbuf ; -sub sleep ; -sub unlink ; -sub utime ; -sub load_imports ; -package POSIX::SigAction; -sub new ; -sub handler ; -sub mask ; -sub flags ; -sub safe ; -package POSIX::SigRt; -sub _init ; -sub _croak ; -sub _getsig ; -sub _exist ; -sub _check ; -sub new ; -sub EXISTS ; -sub FETCH ; -sub STORE ; -sub DELETE ; -sub CLEAR ; -sub SCALAR ; -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/bsearch.al b/Master/tlpkg/tlperl/lib/auto/POSIX/bsearch.al deleted file mode 100755 index 617c37ee740..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/bsearch.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 435 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\bsearch.al)" -sub bsearch { - unimpl "bsearch() not supplied"; -} - -# end of POSIX::bsearch -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/calloc.al b/Master/tlpkg/tlperl/lib/auto/POSIX/calloc.al deleted file mode 100755 index 01b6db33ae8..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/calloc.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 439 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\calloc.al)" -sub calloc { - unimpl "calloc() is C-specific, stopped"; -} - -# end of POSIX::calloc -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/chdir.al b/Master/tlpkg/tlperl/lib/auto/POSIX/chdir.al deleted file mode 100755 index 9b6b663387d..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/chdir.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 636 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\chdir.al)" -sub chdir { - usage "chdir(directory)" if @_ != 1; - CORE::chdir($_[0]); -} - -# end of POSIX::chdir -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/chmod.al b/Master/tlpkg/tlperl/lib/auto/POSIX/chmod.al deleted file mode 100755 index 86721b2ae61..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/chmod.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 577 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\chmod.al)" -sub chmod { - usage "chmod(mode, filename)" if @_ != 2; - CORE::chmod($_[0], $_[1]); -} - -# end of POSIX::chmod -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/chown.al b/Master/tlpkg/tlperl/lib/auto/POSIX/chown.al deleted file mode 100755 index 9c12a41fa04..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/chown.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 641 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\chown.al)" -sub chown { - usage "chown(uid, gid, filename)" if @_ != 3; - CORE::chown($_[0], $_[1], $_[2]); -} - -# end of POSIX::chown -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/clearerr.al b/Master/tlpkg/tlperl/lib/auto/POSIX/clearerr.al deleted file mode 100755 index bae5e4f2f1d..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/clearerr.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 241 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\clearerr.al)" -sub clearerr { - redef "IO::Handle::clearerr()"; -} - -# end of POSIX::clearerr -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/closedir.al b/Master/tlpkg/tlperl/lib/auto/POSIX/closedir.al deleted file mode 100755 index 425cbd44126..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/closedir.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 113 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\closedir.al)" -sub closedir { - usage "closedir(dirhandle)" if @_ != 1; - CORE::closedir($_[0]); -} - -# end of POSIX::closedir -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/cos.al b/Master/tlpkg/tlperl/lib/auto/POSIX/cos.al deleted file mode 100755 index 890ef0c2354..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/cos.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 166 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\cos.al)" -sub cos { - usage "cos(x)" if @_ != 1; - CORE::cos($_[0]); -} - -# end of POSIX::cos -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/creat.al b/Master/tlpkg/tlperl/lib/auto/POSIX/creat.al deleted file mode 100755 index 5ed2f6eee46..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/creat.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 141 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\creat.al)" -sub creat { - usage "creat(filename, mode)" if @_ != 2; - &open($_[0], &O_WRONLY | &O_CREAT | &O_TRUNC, $_[1]); -} - -# end of POSIX::creat -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/div.al b/Master/tlpkg/tlperl/lib/auto/POSIX/div.al deleted file mode 100755 index 5871ee1b0de..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/div.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 443 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\div.al)" -sub div { - unimpl "div() is C-specific, use /, % and int instead"; -} - -# end of POSIX::div -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/errno.al b/Master/tlpkg/tlperl/lib/auto/POSIX/errno.al deleted file mode 100755 index e7362909f46..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/errno.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 136 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\errno.al)" -sub errno { - usage "errno()" if @_ != 0; - $! + 0; -} - -# end of POSIX::errno -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/execl.al b/Master/tlpkg/tlperl/lib/auto/POSIX/execl.al deleted file mode 100755 index 33e650902bc..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/execl.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 646 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\execl.al)" -sub execl { - unimpl "execl() is C-specific, stopped"; -} - -# end of POSIX::execl -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/execle.al b/Master/tlpkg/tlperl/lib/auto/POSIX/execle.al deleted file mode 100755 index 43d56a3bda1..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/execle.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 650 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\execle.al)" -sub execle { - unimpl "execle() is C-specific, stopped"; -} - -# end of POSIX::execle -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/execlp.al b/Master/tlpkg/tlperl/lib/auto/POSIX/execlp.al deleted file mode 100755 index 093719d84bf..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/execlp.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 654 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\execlp.al)" -sub execlp { - unimpl "execlp() is C-specific, stopped"; -} - -# end of POSIX::execlp -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/execv.al b/Master/tlpkg/tlperl/lib/auto/POSIX/execv.al deleted file mode 100755 index 76273074eb4..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/execv.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 658 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\execv.al)" -sub execv { - unimpl "execv() is C-specific, stopped"; -} - -# end of POSIX::execv -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/execve.al b/Master/tlpkg/tlperl/lib/auto/POSIX/execve.al deleted file mode 100755 index 33105ccd6fb..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/execve.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 662 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\execve.al)" -sub execve { - unimpl "execve() is C-specific, stopped"; -} - -# end of POSIX::execve -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/execvp.al b/Master/tlpkg/tlperl/lib/auto/POSIX/execvp.al deleted file mode 100755 index 4a17521841e..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/execvp.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 666 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\execvp.al)" -sub execvp { - unimpl "execvp() is C-specific, stopped"; -} - -# end of POSIX::execvp -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/exit.al b/Master/tlpkg/tlperl/lib/auto/POSIX/exit.al deleted file mode 100755 index 559dd68b1e2..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/exit.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 447 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\exit.al)" -sub exit { - usage "exit(status)" if @_ != 1; - CORE::exit($_[0]); -} - -# end of POSIX::exit -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/exp.al b/Master/tlpkg/tlperl/lib/auto/POSIX/exp.al deleted file mode 100755 index 6c278f38250..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/exp.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 171 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\exp.al)" -sub exp { - usage "exp(x)" if @_ != 1; - CORE::exp($_[0]); -} - -# end of POSIX::exp -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/fabs.al b/Master/tlpkg/tlperl/lib/auto/POSIX/fabs.al deleted file mode 100755 index 7813dc843b5..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/fabs.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 176 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\fabs.al)" -sub fabs { - usage "fabs(x)" if @_ != 1; - CORE::abs($_[0]); -} - -# end of POSIX::fabs -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/fclose.al b/Master/tlpkg/tlperl/lib/auto/POSIX/fclose.al deleted file mode 100755 index 1312109c813..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/fclose.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 245 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\fclose.al)" -sub fclose { - redef "IO::Handle::close()"; -} - -# end of POSIX::fclose -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/fcntl.al b/Master/tlpkg/tlperl/lib/auto/POSIX/fcntl.al deleted file mode 100755 index 4ee8654751c..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/fcntl.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 146 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\fcntl.al)" -sub fcntl { - usage "fcntl(filehandle, cmd, arg)" if @_ != 3; - CORE::fcntl($_[0], $_[1], $_[2]); -} - -# end of POSIX::fcntl -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/fdopen.al b/Master/tlpkg/tlperl/lib/auto/POSIX/fdopen.al deleted file mode 100755 index d700c0d834a..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/fdopen.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 249 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\fdopen.al)" -sub fdopen { - redef "IO::Handle::new_from_fd()"; -} - -# end of POSIX::fdopen -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/feof.al b/Master/tlpkg/tlperl/lib/auto/POSIX/feof.al deleted file mode 100755 index 917afb91354..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/feof.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 253 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\feof.al)" -sub feof { - redef "IO::Handle::eof()"; -} - -# end of POSIX::feof -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/ferror.al b/Master/tlpkg/tlperl/lib/auto/POSIX/ferror.al deleted file mode 100755 index f253b1b7741..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/ferror.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 305 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\ferror.al)" -sub ferror { - redef "IO::Handle::error()"; -} - -# end of POSIX::ferror -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/fflush.al b/Master/tlpkg/tlperl/lib/auto/POSIX/fflush.al deleted file mode 100755 index 1f874ceaf89..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/fflush.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 309 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\fflush.al)" -sub fflush { - redef "IO::Handle::flush()"; -} - -# end of POSIX::fflush -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/fgetc.al b/Master/tlpkg/tlperl/lib/auto/POSIX/fgetc.al deleted file mode 100755 index 6832ce432af..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/fgetc.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 257 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\fgetc.al)" -sub fgetc { - redef "IO::Handle::getc()"; -} - -# end of POSIX::fgetc -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/fgetpos.al b/Master/tlpkg/tlperl/lib/auto/POSIX/fgetpos.al deleted file mode 100755 index 02294ca2b39..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/fgetpos.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 313 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\fgetpos.al)" -sub fgetpos { - redef "IO::Seekable::getpos()"; -} - -# end of POSIX::fgetpos -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/fgets.al b/Master/tlpkg/tlperl/lib/auto/POSIX/fgets.al deleted file mode 100755 index c845912c726..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/fgets.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 261 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\fgets.al)" -sub fgets { - redef "IO::Handle::gets()"; -} - -# end of POSIX::fgets -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/fileno.al b/Master/tlpkg/tlperl/lib/auto/POSIX/fileno.al deleted file mode 100755 index 31dc7db13ab..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/fileno.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 265 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\fileno.al)" -sub fileno { - redef "IO::Handle::fileno()"; -} - -# end of POSIX::fileno -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/fopen.al b/Master/tlpkg/tlperl/lib/auto/POSIX/fopen.al deleted file mode 100755 index da5d546422c..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/fopen.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 269 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\fopen.al)" -sub fopen { - redef "IO::File::open()"; -} - -# end of POSIX::fopen -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/fork.al b/Master/tlpkg/tlperl/lib/auto/POSIX/fork.al deleted file mode 100755 index 5596e03901d..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/fork.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 670 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\fork.al)" -sub fork { - usage "fork()" if @_ != 0; - CORE::fork; -} - -# end of POSIX::fork -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/fprintf.al b/Master/tlpkg/tlperl/lib/auto/POSIX/fprintf.al deleted file mode 100755 index 8a10db84339..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/fprintf.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 273 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\fprintf.al)" -sub fprintf { - unimpl "fprintf() is C-specific--use printf instead"; -} - -# end of POSIX::fprintf -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/fputc.al b/Master/tlpkg/tlperl/lib/auto/POSIX/fputc.al deleted file mode 100755 index 37e5c79fe9d..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/fputc.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 277 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\fputc.al)" -sub fputc { - unimpl "fputc() is C-specific--use print instead"; -} - -# end of POSIX::fputc -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/fputs.al b/Master/tlpkg/tlperl/lib/auto/POSIX/fputs.al deleted file mode 100755 index 6aeb04ee678..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/fputs.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 281 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\fputs.al)" -sub fputs { - unimpl "fputs() is C-specific--use print instead"; -} - -# end of POSIX::fputs -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/fread.al b/Master/tlpkg/tlperl/lib/auto/POSIX/fread.al deleted file mode 100755 index f2f56c48f5e..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/fread.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 285 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\fread.al)" -sub fread { - unimpl "fread() is C-specific--use read instead"; -} - -# end of POSIX::fread -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/free.al b/Master/tlpkg/tlperl/lib/auto/POSIX/free.al deleted file mode 100755 index 1fc25d909e2..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/free.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 452 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\free.al)" -sub free { - unimpl "free() is C-specific, stopped"; -} - -# end of POSIX::free -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/freopen.al b/Master/tlpkg/tlperl/lib/auto/POSIX/freopen.al deleted file mode 100755 index 867307d33f3..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/freopen.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 289 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\freopen.al)" -sub freopen { - unimpl "freopen() is C-specific--use open instead"; -} - -# end of POSIX::freopen -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/fscanf.al b/Master/tlpkg/tlperl/lib/auto/POSIX/fscanf.al deleted file mode 100755 index 4b07b50d257..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/fscanf.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 293 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\fscanf.al)" -sub fscanf { - unimpl "fscanf() is C-specific--use <> and regular expressions instead"; -} - -# end of POSIX::fscanf -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/fseek.al b/Master/tlpkg/tlperl/lib/auto/POSIX/fseek.al deleted file mode 100755 index 5f65bd0e29a..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/fseek.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 297 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\fseek.al)" -sub fseek { - redef "IO::Seekable::seek()"; -} - -# end of POSIX::fseek -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/fsetpos.al b/Master/tlpkg/tlperl/lib/auto/POSIX/fsetpos.al deleted file mode 100755 index e865a66d01c..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/fsetpos.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 317 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\fsetpos.al)" -sub fsetpos { - redef "IO::Seekable::setpos()"; -} - -# end of POSIX::fsetpos -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/fstat.al b/Master/tlpkg/tlperl/lib/auto/POSIX/fstat.al deleted file mode 100755 index c02f89a3f2f..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/fstat.al +++ /dev/null @@ -1,17 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 582 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\fstat.al)" -sub fstat { - usage "fstat(fd)" if @_ != 1; - local *TMP; - CORE::open(TMP, "<&$_[0]"); # Gross. - my @l = CORE::stat(TMP); - CORE::close(TMP); - @l; -} - -# end of POSIX::fstat -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/fsync.al b/Master/tlpkg/tlperl/lib/auto/POSIX/fsync.al deleted file mode 100755 index 357f178623d..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/fsync.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 301 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\fsync.al)" -sub fsync { - redef "IO::Handle::sync()"; -} - -# end of POSIX::fsync -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/ftell.al b/Master/tlpkg/tlperl/lib/auto/POSIX/ftell.al deleted file mode 100755 index f1f1754637c..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/ftell.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 321 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\ftell.al)" -sub ftell { - redef "IO::Seekable::tell()"; -} - -# end of POSIX::ftell -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/fwrite.al b/Master/tlpkg/tlperl/lib/auto/POSIX/fwrite.al deleted file mode 100755 index 825f8d7e154..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/fwrite.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 325 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\fwrite.al)" -sub fwrite { - unimpl "fwrite() is C-specific--use print instead"; -} - -# end of POSIX::fwrite -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/getc.al b/Master/tlpkg/tlperl/lib/auto/POSIX/getc.al deleted file mode 100755 index 6dc4bbe38e7..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/getc.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 329 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\getc.al)" -sub getc { - usage "getc(handle)" if @_ != 1; - CORE::getc($_[0]); -} - -# end of POSIX::getc -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/getchar.al b/Master/tlpkg/tlperl/lib/auto/POSIX/getchar.al deleted file mode 100755 index b03a3a30708..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/getchar.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 334 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\getchar.al)" -sub getchar { - usage "getchar()" if @_ != 0; - CORE::getc(STDIN); -} - -# end of POSIX::getchar -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/getegid.al b/Master/tlpkg/tlperl/lib/auto/POSIX/getegid.al deleted file mode 100755 index 9d9a7404bcc..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/getegid.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 675 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\getegid.al)" -sub getegid { - usage "getegid()" if @_ != 0; - $) + 0; -} - -# end of POSIX::getegid -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/getenv.al b/Master/tlpkg/tlperl/lib/auto/POSIX/getenv.al deleted file mode 100755 index db932eacaff..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/getenv.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 456 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\getenv.al)" -sub getenv { - usage "getenv(name)" if @_ != 1; - $ENV{$_[0]}; -} - -# end of POSIX::getenv -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/geteuid.al b/Master/tlpkg/tlperl/lib/auto/POSIX/geteuid.al deleted file mode 100755 index ab000a972c9..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/geteuid.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 680 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\geteuid.al)" -sub geteuid { - usage "geteuid()" if @_ != 0; - $> + 0; -} - -# end of POSIX::geteuid -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/getgid.al b/Master/tlpkg/tlperl/lib/auto/POSIX/getgid.al deleted file mode 100755 index 484d13bffb3..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/getgid.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 685 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\getgid.al)" -sub getgid { - usage "getgid()" if @_ != 0; - $( + 0; -} - -# end of POSIX::getgid -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/getgrgid.al b/Master/tlpkg/tlperl/lib/auto/POSIX/getgrgid.al deleted file mode 100755 index 3afd5b121a8..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/getgrgid.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 151 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\getgrgid.al)" -sub getgrgid { - usage "getgrgid(gid)" if @_ != 1; - CORE::getgrgid($_[0]); -} - -# end of POSIX::getgrgid -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/getgrnam.al b/Master/tlpkg/tlperl/lib/auto/POSIX/getgrnam.al deleted file mode 100755 index 8dcc0fb9eb5..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/getgrnam.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 156 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\getgrnam.al)" -sub getgrnam { - usage "getgrnam(name)" if @_ != 1; - CORE::getgrnam($_[0]); -} - -# end of POSIX::getgrnam -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/getgroups.al b/Master/tlpkg/tlperl/lib/auto/POSIX/getgroups.al deleted file mode 100755 index 95dca454d01..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/getgroups.al +++ /dev/null @@ -1,14 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 690 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\getgroups.al)" -sub getgroups { - usage "getgroups()" if @_ != 0; - my %seen; - grep(!$seen{$_}++, split(' ', $) )); -} - -# end of POSIX::getgroups -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/getlogin.al b/Master/tlpkg/tlperl/lib/auto/POSIX/getlogin.al deleted file mode 100755 index 3fd23d795d0..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/getlogin.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 696 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\getlogin.al)" -sub getlogin { - usage "getlogin()" if @_ != 0; - CORE::getlogin(); -} - -# end of POSIX::getlogin -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/getpgrp.al b/Master/tlpkg/tlperl/lib/auto/POSIX/getpgrp.al deleted file mode 100755 index 4f204a60e60..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/getpgrp.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 701 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\getpgrp.al)" -sub getpgrp { - usage "getpgrp()" if @_ != 0; - CORE::getpgrp; -} - -# end of POSIX::getpgrp -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/getpid.al b/Master/tlpkg/tlperl/lib/auto/POSIX/getpid.al deleted file mode 100755 index fe5c3c351cf..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/getpid.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 706 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\getpid.al)" -sub getpid { - usage "getpid()" if @_ != 0; - $$; -} - -# end of POSIX::getpid -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/getppid.al b/Master/tlpkg/tlperl/lib/auto/POSIX/getppid.al deleted file mode 100755 index 583ada5edba..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/getppid.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 711 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\getppid.al)" -sub getppid { - usage "getppid()" if @_ != 0; - CORE::getppid; -} - -# end of POSIX::getppid -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/getpwnam.al b/Master/tlpkg/tlperl/lib/auto/POSIX/getpwnam.al deleted file mode 100755 index 00c3c6a7fda..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/getpwnam.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 201 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\getpwnam.al)" -sub getpwnam { - usage "getpwnam(name)" if @_ != 1; - CORE::getpwnam($_[0]); -} - -# end of POSIX::getpwnam -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/getpwuid.al b/Master/tlpkg/tlperl/lib/auto/POSIX/getpwuid.al deleted file mode 100755 index 488bc594a04..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/getpwuid.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 206 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\getpwuid.al)" -sub getpwuid { - usage "getpwuid(uid)" if @_ != 1; - CORE::getpwuid($_[0]); -} - -# end of POSIX::getpwuid -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/gets.al b/Master/tlpkg/tlperl/lib/auto/POSIX/gets.al deleted file mode 100755 index e703a86f8fb..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/gets.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 339 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\gets.al)" -sub gets { - usage "gets()" if @_ != 0; - scalar <STDIN>; -} - -# end of POSIX::gets -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/getuid.al b/Master/tlpkg/tlperl/lib/auto/POSIX/getuid.al deleted file mode 100755 index 8702cbf6bc5..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/getuid.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 716 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\getuid.al)" -sub getuid { - usage "getuid()" if @_ != 0; - $<; -} - -# end of POSIX::getuid -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/gmtime.al b/Master/tlpkg/tlperl/lib/auto/POSIX/gmtime.al deleted file mode 100755 index b976b322410..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/gmtime.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 616 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\gmtime.al)" -sub gmtime { - usage "gmtime(time)" if @_ != 1; - CORE::gmtime($_[0]); -} - -# end of POSIX::gmtime -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/isatty.al b/Master/tlpkg/tlperl/lib/auto/POSIX/isatty.al deleted file mode 100755 index a5511b672a0..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/isatty.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 721 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\isatty.al)" -sub isatty { - usage "isatty(filehandle)" if @_ != 1; - -t $_[0]; -} - -# end of POSIX::isatty -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/kill.al b/Master/tlpkg/tlperl/lib/auto/POSIX/kill.al deleted file mode 100755 index 193d93e845e..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/kill.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 227 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\kill.al)" -sub kill { - usage "kill(pid, sig)" if @_ != 2; - CORE::kill $_[1], $_[0]; -} - -# end of POSIX::kill -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/labs.al b/Master/tlpkg/tlperl/lib/auto/POSIX/labs.al deleted file mode 100755 index 04133e79244..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/labs.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 461 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\labs.al)" -sub labs { - unimpl "labs() is C-specific, use abs instead"; -} - -# end of POSIX::labs -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/ldiv.al b/Master/tlpkg/tlperl/lib/auto/POSIX/ldiv.al deleted file mode 100755 index c6679286485..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/ldiv.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 465 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\ldiv.al)" -sub ldiv { - unimpl "ldiv() is C-specific, use /, % and int instead"; -} - -# end of POSIX::ldiv -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/link.al b/Master/tlpkg/tlperl/lib/auto/POSIX/link.al deleted file mode 100755 index d68d80dcff6..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/link.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 726 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\link.al)" -sub link { - usage "link(oldfilename, newfilename)" if @_ != 2; - CORE::link($_[0], $_[1]); -} - -# end of POSIX::link -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/load_imports.al b/Master/tlpkg/tlperl/lib/auto/POSIX/load_imports.al deleted file mode 100755 index cf692f646ae..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/load_imports.al +++ /dev/null @@ -1,230 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 759 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\load_imports.al)" -sub load_imports { -%EXPORT_TAGS = ( - - assert_h => [qw(assert NDEBUG)], - - ctype_h => [qw(isalnum isalpha iscntrl isdigit isgraph islower - isprint ispunct isspace isupper isxdigit tolower toupper)], - - dirent_h => [], - - errno_h => [qw(E2BIG EACCES EADDRINUSE EADDRNOTAVAIL EAFNOSUPPORT - EAGAIN EALREADY EBADF EBUSY ECHILD ECONNABORTED - ECONNREFUSED ECONNRESET EDEADLK EDESTADDRREQ EDOM EDQUOT - EEXIST EFAULT EFBIG EHOSTDOWN EHOSTUNREACH EINPROGRESS - EINTR EINVAL EIO EISCONN EISDIR ELOOP EMFILE EMLINK - EMSGSIZE ENAMETOOLONG ENETDOWN ENETRESET ENETUNREACH - ENFILE ENOBUFS ENODEV ENOENT ENOEXEC ENOLCK ENOMEM - ENOPROTOOPT ENOSPC ENOSYS ENOTBLK ENOTCONN ENOTDIR - ENOTEMPTY ENOTSOCK ENOTTY ENXIO EOPNOTSUPP EPERM - EPFNOSUPPORT EPIPE EPROCLIM EPROTONOSUPPORT EPROTOTYPE - ERANGE EREMOTE ERESTART EROFS ESHUTDOWN ESOCKTNOSUPPORT - ESPIPE ESRCH ESTALE ETIMEDOUT ETOOMANYREFS ETXTBSY - EUSERS EWOULDBLOCK EXDEV errno)], - - fcntl_h => [qw(FD_CLOEXEC F_DUPFD F_GETFD F_GETFL F_GETLK F_RDLCK - F_SETFD F_SETFL F_SETLK F_SETLKW F_UNLCK F_WRLCK - O_ACCMODE O_APPEND O_CREAT O_EXCL O_NOCTTY O_NONBLOCK - O_RDONLY O_RDWR O_TRUNC O_WRONLY - creat - SEEK_CUR SEEK_END SEEK_SET - S_IRGRP S_IROTH S_IRUSR S_IRWXG S_IRWXO S_IRWXU - S_ISBLK S_ISCHR S_ISDIR S_ISFIFO S_ISGID S_ISREG S_ISUID - S_IWGRP S_IWOTH S_IWUSR)], - - float_h => [qw(DBL_DIG DBL_EPSILON DBL_MANT_DIG - DBL_MAX DBL_MAX_10_EXP DBL_MAX_EXP - DBL_MIN DBL_MIN_10_EXP DBL_MIN_EXP - FLT_DIG FLT_EPSILON FLT_MANT_DIG - FLT_MAX FLT_MAX_10_EXP FLT_MAX_EXP - FLT_MIN FLT_MIN_10_EXP FLT_MIN_EXP - FLT_RADIX FLT_ROUNDS - LDBL_DIG LDBL_EPSILON LDBL_MANT_DIG - LDBL_MAX LDBL_MAX_10_EXP LDBL_MAX_EXP - LDBL_MIN LDBL_MIN_10_EXP LDBL_MIN_EXP)], - - grp_h => [], - - limits_h => [qw( ARG_MAX CHAR_BIT CHAR_MAX CHAR_MIN CHILD_MAX - INT_MAX INT_MIN LINK_MAX LONG_MAX LONG_MIN MAX_CANON - MAX_INPUT MB_LEN_MAX NAME_MAX NGROUPS_MAX OPEN_MAX - PATH_MAX PIPE_BUF SCHAR_MAX SCHAR_MIN SHRT_MAX SHRT_MIN - SSIZE_MAX STREAM_MAX TZNAME_MAX UCHAR_MAX UINT_MAX - ULONG_MAX USHRT_MAX _POSIX_ARG_MAX _POSIX_CHILD_MAX - _POSIX_LINK_MAX _POSIX_MAX_CANON _POSIX_MAX_INPUT - _POSIX_NAME_MAX _POSIX_NGROUPS_MAX _POSIX_OPEN_MAX - _POSIX_PATH_MAX _POSIX_PIPE_BUF _POSIX_SSIZE_MAX - _POSIX_STREAM_MAX _POSIX_TZNAME_MAX)], - - locale_h => [qw(LC_ALL LC_COLLATE LC_CTYPE LC_MESSAGES - LC_MONETARY LC_NUMERIC LC_TIME NULL - localeconv setlocale)], - - math_h => [qw(HUGE_VAL acos asin atan ceil cosh fabs floor fmod - frexp ldexp log10 modf pow sinh tan tanh)], - - pwd_h => [], - - setjmp_h => [qw(longjmp setjmp siglongjmp sigsetjmp)], - - signal_h => [qw(SA_NOCLDSTOP SA_NOCLDWAIT SA_NODEFER SA_ONSTACK - SA_RESETHAND SA_RESTART SA_SIGINFO SIGABRT SIGALRM - SIGCHLD SIGCONT SIGFPE SIGHUP SIGILL SIGINT SIGKILL - SIGPIPE %SIGRT SIGRTMIN SIGRTMAX SIGQUIT SIGSEGV SIGSTOP - SIGTERM SIGTSTP SIGTTIN SIGTTOU SIGUSR1 SIGUSR2 - SIG_BLOCK SIG_DFL SIG_ERR SIG_IGN SIG_SETMASK SIG_UNBLOCK - raise sigaction signal sigpending sigprocmask sigsuspend)], - - stdarg_h => [], - - stddef_h => [qw(NULL offsetof)], - - stdio_h => [qw(BUFSIZ EOF FILENAME_MAX L_ctermid L_cuserid - L_tmpname NULL SEEK_CUR SEEK_END SEEK_SET - STREAM_MAX TMP_MAX stderr stdin stdout - clearerr fclose fdopen feof ferror fflush fgetc fgetpos - fgets fopen fprintf fputc fputs fread freopen - fscanf fseek fsetpos ftell fwrite getchar gets - perror putc putchar puts remove rewind - scanf setbuf setvbuf sscanf tmpfile tmpnam - ungetc vfprintf vprintf vsprintf)], - - stdlib_h => [qw(EXIT_FAILURE EXIT_SUCCESS MB_CUR_MAX NULL RAND_MAX - abort atexit atof atoi atol bsearch calloc div - free getenv labs ldiv malloc mblen mbstowcs mbtowc - qsort realloc strtod strtol strtoul wcstombs wctomb)], - - string_h => [qw(NULL memchr memcmp memcpy memmove memset strcat - strchr strcmp strcoll strcpy strcspn strerror strlen - strncat strncmp strncpy strpbrk strrchr strspn strstr - strtok strxfrm)], - - sys_stat_h => [qw(S_IRGRP S_IROTH S_IRUSR S_IRWXG S_IRWXO S_IRWXU - S_ISBLK S_ISCHR S_ISDIR S_ISFIFO S_ISGID S_ISREG - S_ISUID S_IWGRP S_IWOTH S_IWUSR S_IXGRP S_IXOTH S_IXUSR - fstat mkfifo)], - - sys_times_h => [], - - sys_types_h => [], - - sys_utsname_h => [qw(uname)], - - sys_wait_h => [qw(WEXITSTATUS WIFEXITED WIFSIGNALED WIFSTOPPED - WNOHANG WSTOPSIG WTERMSIG WUNTRACED)], - - termios_h => [qw( B0 B110 B1200 B134 B150 B1800 B19200 B200 B2400 - B300 B38400 B4800 B50 B600 B75 B9600 BRKINT CLOCAL - CREAD CS5 CS6 CS7 CS8 CSIZE CSTOPB ECHO ECHOE ECHOK - ECHONL HUPCL ICANON ICRNL IEXTEN IGNBRK IGNCR IGNPAR - INLCR INPCK ISIG ISTRIP IXOFF IXON NCCS NOFLSH OPOST - PARENB PARMRK PARODD TCIFLUSH TCIOFF TCIOFLUSH TCION - TCOFLUSH TCOOFF TCOON TCSADRAIN TCSAFLUSH TCSANOW - TOSTOP VEOF VEOL VERASE VINTR VKILL VMIN VQUIT VSTART - VSTOP VSUSP VTIME - cfgetispeed cfgetospeed cfsetispeed cfsetospeed tcdrain - tcflow tcflush tcgetattr tcsendbreak tcsetattr )], - - time_h => [qw(CLK_TCK CLOCKS_PER_SEC NULL asctime clock ctime - difftime mktime strftime tzset tzname)], - - unistd_h => [qw(F_OK NULL R_OK SEEK_CUR SEEK_END SEEK_SET - STDERR_FILENO STDIN_FILENO STDOUT_FILENO W_OK X_OK - _PC_CHOWN_RESTRICTED _PC_LINK_MAX _PC_MAX_CANON - _PC_MAX_INPUT _PC_NAME_MAX _PC_NO_TRUNC _PC_PATH_MAX - _PC_PIPE_BUF _PC_VDISABLE _POSIX_CHOWN_RESTRICTED - _POSIX_JOB_CONTROL _POSIX_NO_TRUNC _POSIX_SAVED_IDS - _POSIX_VDISABLE _POSIX_VERSION _SC_ARG_MAX - _SC_CHILD_MAX _SC_CLK_TCK _SC_JOB_CONTROL - _SC_NGROUPS_MAX _SC_OPEN_MAX _SC_PAGESIZE _SC_SAVED_IDS - _SC_STREAM_MAX _SC_TZNAME_MAX _SC_VERSION - _exit access ctermid cuserid - dup2 dup execl execle execlp execv execve execvp - fpathconf fsync getcwd getegid geteuid getgid getgroups - getpid getuid isatty lseek pathconf pause setgid setpgid - setsid setuid sysconf tcgetpgrp tcsetpgrp ttyname)], - - utime_h => [], - -); - -# Exporter::export_tags(); -{ - # De-duplicate the export list: - my %export; - @export{map {@$_} values %EXPORT_TAGS} = (); - # Doing the de-dup with a temporary hash has the advantage that the SVs in - # @EXPORT are actually shared hash key sacalars, which will save some memory. - push @EXPORT, keys %export; -} - -@EXPORT_OK = qw( - abs - alarm - atan2 - chdir - chmod - chown - close - closedir - cos - exit - exp - fcntl - fileno - fork - getc - getgrgid - getgrnam - getlogin - getpgrp - getppid - getpwnam - getpwuid - gmtime - isatty - kill - lchown - link - localtime - log - mkdir - nice - open - opendir - pipe - printf - rand - read - readdir - rename - rewinddir - rmdir - sin - sleep - sprintf - sqrt - srand - stat - system - time - times - umask - unlink - utime - wait - waitpid - write -); - -require Exporter; -} - -# end of POSIX::SigAction::load_imports -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/localtime.al b/Master/tlpkg/tlperl/lib/auto/POSIX/localtime.al deleted file mode 100755 index c2d15ad16ae..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/localtime.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 621 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\localtime.al)" -sub localtime { - usage "localtime(time)" if @_ != 1; - CORE::localtime($_[0]); -} - -# end of POSIX::localtime -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/log.al b/Master/tlpkg/tlperl/lib/auto/POSIX/log.al deleted file mode 100755 index 682dea9598f..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/log.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 181 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\log.al)" -sub log { - usage "log(x)" if @_ != 1; - CORE::log($_[0]); -} - -# end of POSIX::log -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/longjmp.al b/Master/tlpkg/tlperl/lib/auto/POSIX/longjmp.al deleted file mode 100755 index b62bd3c94c2..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/longjmp.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 211 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\longjmp.al)" -sub longjmp { - unimpl "longjmp() is C-specific: use die instead"; -} - -# end of POSIX::longjmp -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/malloc.al b/Master/tlpkg/tlperl/lib/auto/POSIX/malloc.al deleted file mode 100755 index 0922d0174b5..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/malloc.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 469 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\malloc.al)" -sub malloc { - unimpl "malloc() is C-specific, stopped"; -} - -# end of POSIX::malloc -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/memchr.al b/Master/tlpkg/tlperl/lib/auto/POSIX/memchr.al deleted file mode 100755 index 7344db15757..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/memchr.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 494 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\memchr.al)" -sub memchr { - unimpl "memchr() is C-specific, use index() instead"; -} - -# end of POSIX::memchr -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/memcmp.al b/Master/tlpkg/tlperl/lib/auto/POSIX/memcmp.al deleted file mode 100755 index a5c9844ea0d..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/memcmp.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 498 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\memcmp.al)" -sub memcmp { - unimpl "memcmp() is C-specific, use eq instead"; -} - -# end of POSIX::memcmp -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/memcpy.al b/Master/tlpkg/tlperl/lib/auto/POSIX/memcpy.al deleted file mode 100755 index 53c62d6bb4e..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/memcpy.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 502 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\memcpy.al)" -sub memcpy { - unimpl "memcpy() is C-specific, use = instead"; -} - -# end of POSIX::memcpy -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/memmove.al b/Master/tlpkg/tlperl/lib/auto/POSIX/memmove.al deleted file mode 100755 index a3cb8905083..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/memmove.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 506 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\memmove.al)" -sub memmove { - unimpl "memmove() is C-specific, use = instead"; -} - -# end of POSIX::memmove -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/memset.al b/Master/tlpkg/tlperl/lib/auto/POSIX/memset.al deleted file mode 100755 index b71c7b65ed3..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/memset.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 510 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\memset.al)" -sub memset { - unimpl "memset() is C-specific, use x instead"; -} - -# end of POSIX::memset -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/mkdir.al b/Master/tlpkg/tlperl/lib/auto/POSIX/mkdir.al deleted file mode 100755 index 290a5df0c80..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/mkdir.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 591 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\mkdir.al)" -sub mkdir { - usage "mkdir(directoryname, mode)" if @_ != 2; - CORE::mkdir($_[0], $_[1]); -} - -# end of POSIX::mkdir -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/offsetof.al b/Master/tlpkg/tlperl/lib/auto/POSIX/offsetof.al deleted file mode 100755 index 94fb579e749..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/offsetof.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 237 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\offsetof.al)" -sub offsetof { - unimpl "offsetof() is C-specific, stopped"; -} - -# end of POSIX::offsetof -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/opendir.al b/Master/tlpkg/tlperl/lib/auto/POSIX/opendir.al deleted file mode 100755 index 1112e2eaeb5..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/opendir.al +++ /dev/null @@ -1,16 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 118 "..\..\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; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/perror.al b/Master/tlpkg/tlperl/lib/auto/POSIX/perror.al deleted file mode 100755 index c35baf5a47b..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/perror.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 344 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\perror.al)" -sub perror { - print STDERR "@_: " if @_; - print STDERR $!,"\n"; -} - -# end of POSIX::perror -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/pow.al b/Master/tlpkg/tlperl/lib/auto/POSIX/pow.al deleted file mode 100755 index 5cc8fb73a39..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/pow.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 186 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\pow.al)" -sub pow { - usage "pow(x,exponent)" if @_ != 2; - $_[0] ** $_[1]; -} - -# end of POSIX::pow -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/printf.al b/Master/tlpkg/tlperl/lib/auto/POSIX/printf.al deleted file mode 100755 index 3c0e704371e..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/printf.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 349 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\printf.al)" -sub printf { - usage "printf(pattern, args...)" if @_ < 1; - CORE::printf STDOUT @_; -} - -# end of POSIX::printf -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/putc.al b/Master/tlpkg/tlperl/lib/auto/POSIX/putc.al deleted file mode 100755 index 561218c6e7c..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/putc.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 354 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\putc.al)" -sub putc { - unimpl "putc() is C-specific--use print instead"; -} - -# end of POSIX::putc -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/putchar.al b/Master/tlpkg/tlperl/lib/auto/POSIX/putchar.al deleted file mode 100755 index 90edc4f1dde..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/putchar.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 358 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\putchar.al)" -sub putchar { - unimpl "putchar() is C-specific--use print instead"; -} - -# end of POSIX::putchar -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/puts.al b/Master/tlpkg/tlperl/lib/auto/POSIX/puts.al deleted file mode 100755 index b35380c91b2..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/puts.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 362 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\puts.al)" -sub puts { - unimpl "puts() is C-specific--use print instead"; -} - -# end of POSIX::puts -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/qsort.al b/Master/tlpkg/tlperl/lib/auto/POSIX/qsort.al deleted file mode 100755 index e0e8438d51e..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/qsort.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 473 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\qsort.al)" -sub qsort { - unimpl "qsort() is C-specific, use sort instead"; -} - -# end of POSIX::qsort -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/raise.al b/Master/tlpkg/tlperl/lib/auto/POSIX/raise.al deleted file mode 100755 index 25998d61b6c..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/raise.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 232 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\raise.al)" -sub raise { - usage "raise(sig)" if @_ != 1; - CORE::kill $_[0], $$; # Is this good enough? -} - -# end of POSIX::raise -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/rand.al b/Master/tlpkg/tlperl/lib/auto/POSIX/rand.al deleted file mode 100755 index ea6457f00d5..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/rand.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 477 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\rand.al)" -sub rand { - unimpl "rand() is non-portable, use Perl's rand instead"; -} - -# end of POSIX::rand -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/readdir.al b/Master/tlpkg/tlperl/lib/auto/POSIX/readdir.al deleted file mode 100755 index 458c7cda637..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/readdir.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 126 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\readdir.al)" -sub readdir { - usage "readdir(dirhandle)" if @_ != 1; - CORE::readdir($_[0]); -} - -# end of POSIX::readdir -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/realloc.al b/Master/tlpkg/tlperl/lib/auto/POSIX/realloc.al deleted file mode 100755 index a7332965b92..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/realloc.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 481 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\realloc.al)" -sub realloc { - unimpl "realloc() is C-specific, stopped"; -} - -# end of POSIX::realloc -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/redef.al b/Master/tlpkg/tlperl/lib/auto/POSIX/redef.al deleted file mode 100755 index 1d6197f7dc3..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/redef.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 85 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\redef.al)" -sub redef { - my ($mess) = @_; - croak "Use method $mess instead"; -} - -# end of POSIX::redef -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/remove.al b/Master/tlpkg/tlperl/lib/auto/POSIX/remove.al deleted file mode 100755 index 32665fa8ea8..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/remove.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 366 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\remove.al)" -sub remove { - usage "remove(filename)" if @_ != 1; - (-d $_[0]) ? CORE::rmdir($_[0]) : CORE::unlink($_[0]); -} - -# end of POSIX::remove -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/rename.al b/Master/tlpkg/tlperl/lib/auto/POSIX/rename.al deleted file mode 100755 index 6d04ef039a8..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/rename.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 371 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\rename.al)" -sub rename { - usage "rename(oldfilename, newfilename)" if @_ != 2; - CORE::rename($_[0], $_[1]); -} - -# end of POSIX::rename -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/rewind.al b/Master/tlpkg/tlperl/lib/auto/POSIX/rewind.al deleted file mode 100755 index 0f97af8f961..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/rewind.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 376 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\rewind.al)" -sub rewind { - usage "rewind(filehandle)" if @_ != 1; - CORE::seek($_[0],0,0); -} - -# end of POSIX::rewind -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/rewinddir.al b/Master/tlpkg/tlperl/lib/auto/POSIX/rewinddir.al deleted file mode 100755 index 1c960662ea9..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/rewinddir.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 131 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\rewinddir.al)" -sub rewinddir { - usage "rewinddir(dirhandle)" if @_ != 1; - CORE::rewinddir($_[0]); -} - -# end of POSIX::rewinddir -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/rmdir.al b/Master/tlpkg/tlperl/lib/auto/POSIX/rmdir.al deleted file mode 100755 index 54af051f17e..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/rmdir.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 731 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\rmdir.al)" -sub rmdir { - usage "rmdir(directoryname)" if @_ != 1; - CORE::rmdir($_[0]); -} - -# end of POSIX::rmdir -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/scanf.al b/Master/tlpkg/tlperl/lib/auto/POSIX/scanf.al deleted file mode 100755 index 7b0784b3831..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/scanf.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 381 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\scanf.al)" -sub scanf { - unimpl "scanf() is C-specific--use <> and regular expressions instead"; -} - -# end of POSIX::scanf -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/setbuf.al b/Master/tlpkg/tlperl/lib/auto/POSIX/setbuf.al deleted file mode 100755 index 4b56a02e221..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/setbuf.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 736 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\setbuf.al)" -sub setbuf { - redef "IO::Handle::setbuf()"; -} - -# end of POSIX::setbuf -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/setjmp.al b/Master/tlpkg/tlperl/lib/auto/POSIX/setjmp.al deleted file mode 100755 index 6154bbf8a44..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/setjmp.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 215 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\setjmp.al)" -sub setjmp { - unimpl "setjmp() is C-specific: use eval {} instead"; -} - -# end of POSIX::setjmp -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/setvbuf.al b/Master/tlpkg/tlperl/lib/auto/POSIX/setvbuf.al deleted file mode 100755 index bc45457297a..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/setvbuf.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 740 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\setvbuf.al)" -sub setvbuf { - redef "IO::Handle::setvbuf()"; -} - -# end of POSIX::setvbuf -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/siglongjmp.al b/Master/tlpkg/tlperl/lib/auto/POSIX/siglongjmp.al deleted file mode 100755 index 46abe2bdb96..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/siglongjmp.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 219 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\siglongjmp.al)" -sub siglongjmp { - unimpl "siglongjmp() is C-specific: use die instead"; -} - -# end of POSIX::siglongjmp -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/sigsetjmp.al b/Master/tlpkg/tlperl/lib/auto/POSIX/sigsetjmp.al deleted file mode 100755 index 3ba63224a31..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/sigsetjmp.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 223 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\sigsetjmp.al)" -sub sigsetjmp { - unimpl "sigsetjmp() is C-specific: use eval {} instead"; -} - -# end of POSIX::sigsetjmp -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/sin.al b/Master/tlpkg/tlperl/lib/auto/POSIX/sin.al deleted file mode 100755 index d9079ba09c4..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/sin.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 191 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\sin.al)" -sub sin { - usage "sin(x)" if @_ != 1; - CORE::sin($_[0]); -} - -# end of POSIX::sin -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/sleep.al b/Master/tlpkg/tlperl/lib/auto/POSIX/sleep.al deleted file mode 100755 index 05cba00f359..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/sleep.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 744 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\sleep.al)" -sub sleep { - usage "sleep(seconds)" if @_ != 1; - $_[0] - CORE::sleep($_[0]); -} - -# end of POSIX::sleep -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/sprintf.al b/Master/tlpkg/tlperl/lib/auto/POSIX/sprintf.al deleted file mode 100755 index e32b6749d0f..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/sprintf.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 385 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\sprintf.al)" -sub sprintf { - usage "sprintf(pattern,args)" if @_ == 0; - CORE::sprintf(shift,@_); -} - -# end of POSIX::sprintf -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/sqrt.al b/Master/tlpkg/tlperl/lib/auto/POSIX/sqrt.al deleted file mode 100755 index ea41719f675..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/sqrt.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 196 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\sqrt.al)" -sub sqrt { - usage "sqrt(x)" if @_ != 1; - CORE::sqrt($_[0]); -} - -# end of POSIX::sqrt -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/srand.al b/Master/tlpkg/tlperl/lib/auto/POSIX/srand.al deleted file mode 100755 index 9c8cd65ad95..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/srand.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 485 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\srand.al)" -sub srand { - unimpl "srand()"; -} - -# end of POSIX::srand -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/sscanf.al b/Master/tlpkg/tlperl/lib/auto/POSIX/sscanf.al deleted file mode 100755 index a9f418536fd..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/sscanf.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 390 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\sscanf.al)" -sub sscanf { - unimpl "sscanf() is C-specific--use regular expressions instead"; -} - -# end of POSIX::sscanf -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/stat.al b/Master/tlpkg/tlperl/lib/auto/POSIX/stat.al deleted file mode 100755 index 23373a26950..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/stat.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 596 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\stat.al)" -sub stat { - usage "stat(filename)" if @_ != 1; - CORE::stat($_[0]); -} - -# end of POSIX::stat -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/strcat.al b/Master/tlpkg/tlperl/lib/auto/POSIX/strcat.al deleted file mode 100755 index 112037d7bb9..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/strcat.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 514 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\strcat.al)" -sub strcat { - unimpl "strcat() is C-specific, use .= instead"; -} - -# end of POSIX::strcat -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/strchr.al b/Master/tlpkg/tlperl/lib/auto/POSIX/strchr.al deleted file mode 100755 index 0e4d59d4d22..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/strchr.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 518 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\strchr.al)" -sub strchr { - unimpl "strchr() is C-specific, use index() instead"; -} - -# end of POSIX::strchr -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/strcmp.al b/Master/tlpkg/tlperl/lib/auto/POSIX/strcmp.al deleted file mode 100755 index 026444d1aa0..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/strcmp.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 522 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\strcmp.al)" -sub strcmp { - unimpl "strcmp() is C-specific, use eq instead"; -} - -# end of POSIX::strcmp -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/strcpy.al b/Master/tlpkg/tlperl/lib/auto/POSIX/strcpy.al deleted file mode 100755 index 41895d60428..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/strcpy.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 526 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\strcpy.al)" -sub strcpy { - unimpl "strcpy() is C-specific, use = instead"; -} - -# end of POSIX::strcpy -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/strcspn.al b/Master/tlpkg/tlperl/lib/auto/POSIX/strcspn.al deleted file mode 100755 index e3979bf3673..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/strcspn.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 530 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\strcspn.al)" -sub strcspn { - unimpl "strcspn() is C-specific, use regular expressions instead"; -} - -# end of POSIX::strcspn -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/strerror.al b/Master/tlpkg/tlperl/lib/auto/POSIX/strerror.al deleted file mode 100755 index 4364eb48fec..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/strerror.al +++ /dev/null @@ -1,14 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 534 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\strerror.al)" -sub strerror { - usage "strerror(errno)" if @_ != 1; - local $! = $_[0]; - $! . ""; -} - -# end of POSIX::strerror -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/strlen.al b/Master/tlpkg/tlperl/lib/auto/POSIX/strlen.al deleted file mode 100755 index 2f9ee7bf0a2..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/strlen.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 540 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\strlen.al)" -sub strlen { - unimpl "strlen() is C-specific, use length instead"; -} - -# end of POSIX::strlen -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/strncat.al b/Master/tlpkg/tlperl/lib/auto/POSIX/strncat.al deleted file mode 100755 index b909bd27c25..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/strncat.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 544 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\strncat.al)" -sub strncat { - unimpl "strncat() is C-specific, use .= instead"; -} - -# end of POSIX::strncat -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/strncmp.al b/Master/tlpkg/tlperl/lib/auto/POSIX/strncmp.al deleted file mode 100755 index dde452e3628..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/strncmp.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 548 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\strncmp.al)" -sub strncmp { - unimpl "strncmp() is C-specific, use eq instead"; -} - -# end of POSIX::strncmp -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/strncpy.al b/Master/tlpkg/tlperl/lib/auto/POSIX/strncpy.al deleted file mode 100755 index 6b2d97f8202..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/strncpy.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 552 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\strncpy.al)" -sub strncpy { - unimpl "strncpy() is C-specific, use = instead"; -} - -# end of POSIX::strncpy -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/strpbrk.al b/Master/tlpkg/tlperl/lib/auto/POSIX/strpbrk.al deleted file mode 100755 index b3a1f91897b..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/strpbrk.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 556 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\strpbrk.al)" -sub strpbrk { - unimpl "strpbrk() is C-specific, stopped"; -} - -# end of POSIX::strpbrk -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/strrchr.al b/Master/tlpkg/tlperl/lib/auto/POSIX/strrchr.al deleted file mode 100755 index 8b11901a304..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/strrchr.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 560 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\strrchr.al)" -sub strrchr { - unimpl "strrchr() is C-specific, use rindex() instead"; -} - -# end of POSIX::strrchr -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/strspn.al b/Master/tlpkg/tlperl/lib/auto/POSIX/strspn.al deleted file mode 100755 index 098bf697de1..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/strspn.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 564 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\strspn.al)" -sub strspn { - unimpl "strspn() is C-specific, stopped"; -} - -# end of POSIX::strspn -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/strstr.al b/Master/tlpkg/tlperl/lib/auto/POSIX/strstr.al deleted file mode 100755 index ecc94a24f2c..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/strstr.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 568 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\strstr.al)" -sub strstr { - usage "strstr(big, little)" if @_ != 2; - CORE::index($_[0], $_[1]); -} - -# end of POSIX::strstr -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/strtok.al b/Master/tlpkg/tlperl/lib/auto/POSIX/strtok.al deleted file mode 100755 index f065d58b27c..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/strtok.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 573 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\strtok.al)" -sub strtok { - unimpl "strtok() is C-specific, stopped"; -} - -# end of POSIX::strtok -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/system.al b/Master/tlpkg/tlperl/lib/auto/POSIX/system.al deleted file mode 100755 index 17d9b552290..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/system.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 489 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\system.al)" -sub system { - usage "system(command)" if @_ != 1; - CORE::system($_[0]); -} - -# end of POSIX::system -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/time.al b/Master/tlpkg/tlperl/lib/auto/POSIX/time.al deleted file mode 100755 index f588c89117f..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/time.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 626 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\time.al)" -sub time { - usage "time()" if @_ != 0; - CORE::time; -} - -# end of POSIX::time -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/tmpfile.al b/Master/tlpkg/tlperl/lib/auto/POSIX/tmpfile.al deleted file mode 100755 index ebc5850baf8..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/tmpfile.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 394 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\tmpfile.al)" -sub tmpfile { - redef "IO::File::new_tmpfile()"; -} - -# end of POSIX::tmpfile -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/tolower.al b/Master/tlpkg/tlperl/lib/auto/POSIX/tolower.al deleted file mode 100755 index 35a40ad5026..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/tolower.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 103 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\tolower.al)" -sub tolower { - usage "tolower(string)" if @_ != 1; - lc($_[0]); -} - -# end of POSIX::tolower -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/toupper.al b/Master/tlpkg/tlperl/lib/auto/POSIX/toupper.al deleted file mode 100755 index 47f12bd4932..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/toupper.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 108 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\toupper.al)" -sub toupper { - usage "toupper(string)" if @_ != 1; - uc($_[0]); -} - -# end of POSIX::toupper -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/umask.al b/Master/tlpkg/tlperl/lib/auto/POSIX/umask.al deleted file mode 100755 index e1c107c8f44..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/umask.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 601 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\umask.al)" -sub umask { - usage "umask(mask)" if @_ != 1; - CORE::umask($_[0]); -} - -# end of POSIX::umask -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/ungetc.al b/Master/tlpkg/tlperl/lib/auto/POSIX/ungetc.al deleted file mode 100755 index ea27e327c46..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/ungetc.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 398 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\ungetc.al)" -sub ungetc { - redef "IO::Handle::ungetc()"; -} - -# end of POSIX::ungetc -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/unimpl.al b/Master/tlpkg/tlperl/lib/auto/POSIX/unimpl.al deleted file mode 100755 index bc48d9b3023..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/unimpl.al +++ /dev/null @@ -1,14 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 90 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\unimpl.al)" -sub unimpl { - my ($mess) = @_; - $mess =~ s/xxx//; - croak "Unimplemented: POSIX::$mess"; -} - -# end of POSIX::unimpl -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/unlink.al b/Master/tlpkg/tlperl/lib/auto/POSIX/unlink.al deleted file mode 100755 index 9a9a0b668b6..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/unlink.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 749 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\unlink.al)" -sub unlink { - usage "unlink(filename)" if @_ != 1; - CORE::unlink($_[0]); -} - -# end of POSIX::unlink -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/usage.al b/Master/tlpkg/tlperl/lib/auto/POSIX/usage.al deleted file mode 100755 index 83c0cdf9e8a..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/usage.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 80 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\usage.al)" -sub usage { - my ($mess) = @_; - croak "Usage: POSIX::$mess"; -} - -# end of POSIX::usage -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/utime.al b/Master/tlpkg/tlperl/lib/auto/POSIX/utime.al deleted file mode 100755 index 07d84838ab3..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/utime.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 754 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\utime.al)" -sub utime { - usage "utime(filename, atime, mtime)" if @_ != 3; - CORE::utime($_[1], $_[2], $_[0]); -} - -# end of POSIX::utime -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/vfprintf.al b/Master/tlpkg/tlperl/lib/auto/POSIX/vfprintf.al deleted file mode 100755 index 461a48fd006..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/vfprintf.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 402 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\vfprintf.al)" -sub vfprintf { - unimpl "vfprintf() is C-specific"; -} - -# end of POSIX::vfprintf -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/vprintf.al b/Master/tlpkg/tlperl/lib/auto/POSIX/vprintf.al deleted file mode 100755 index a0d2bd202fd..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/vprintf.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 406 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\vprintf.al)" -sub vprintf { - unimpl "vprintf() is C-specific"; -} - -# end of POSIX::vprintf -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/vsprintf.al b/Master/tlpkg/tlperl/lib/auto/POSIX/vsprintf.al deleted file mode 100755 index 835cf3de11c..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/vsprintf.al +++ /dev/null @@ -1,12 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 410 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\vsprintf.al)" -sub vsprintf { - unimpl "vsprintf() is C-specific"; -} - -# end of POSIX::vsprintf -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/wait.al b/Master/tlpkg/tlperl/lib/auto/POSIX/wait.al deleted file mode 100755 index fb68d776372..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/wait.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 606 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\wait.al)" -sub wait { - usage "wait()" if @_ != 0; - CORE::wait(); -} - -# end of POSIX::wait -1; diff --git a/Master/tlpkg/tlperl/lib/auto/POSIX/waitpid.al b/Master/tlpkg/tlperl/lib/auto/POSIX/waitpid.al deleted file mode 100755 index a211a453aa0..00000000000 --- a/Master/tlpkg/tlperl/lib/auto/POSIX/waitpid.al +++ /dev/null @@ -1,13 +0,0 @@ -# NOTE: Derived from ..\..\lib\POSIX.pm. -# Changes made here will be lost when autosplit is run again. -# See AutoSplit.pm. -package POSIX; - -#line 611 "..\..\lib\POSIX.pm (autosplit into ..\..\lib\auto\POSIX\waitpid.al)" -sub waitpid { - usage "waitpid(pid, options)" if @_ != 2; - CORE::waitpid($_[0], $_[1]); -} - -# end of POSIX::waitpid -1; |