diff options
| author | Larry Wall <lwall@netlabs.com> | 1994-05-04 23:00:00 +0000 |
|---|---|---|
| committer | Larry Wall <lwall@netlabs.com> | 1994-05-04 23:00:00 +0000 |
| commit | 85e6fe838fb25b257a1b363debf8691c0992ef71 (patch) | |
| tree | fd5340cd6c3bbabfc21d3b0cac48e7ab3a481ebf /lib/auto/POSIX | |
| parent | 2304df62caa7d9be70e8b8bcdb454e139c9c103d (diff) | |
| download | perl-85e6fe838fb25b257a1b363debf8691c0992ef71.tar.gz | |
perl 5.0 alpha 9perl-5a9
[editor's note: the sparc executables have not been included,
and emacs backup files have been removed]
Diffstat (limited to 'lib/auto/POSIX')
212 files changed, 1917 insertions, 0 deletions
diff --git a/lib/auto/POSIX/POSIX.so b/lib/auto/POSIX/POSIX.so Binary files differnew file mode 100755 index 0000000000..17560bd798 --- /dev/null +++ b/lib/auto/POSIX/POSIX.so diff --git a/lib/auto/POSIX/_exit.al b/lib/auto/POSIX/_exit.al new file mode 100644 index 0000000000..7666cebe6e --- /dev/null +++ b/lib/auto/POSIX/_exit.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub _exit { + unimpl "_exit(xxx)", caller if @_ != 123; + _exit($_[0]); +} + +1; diff --git a/lib/auto/POSIX/abort.al b/lib/auto/POSIX/abort.al new file mode 100644 index 0000000000..58e7ce915b --- /dev/null +++ b/lib/auto/POSIX/abort.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub abort { + unimpl "abort(xxx)", caller if @_ != 123; + abort($_[0]); +} + +1; diff --git a/lib/auto/POSIX/abs.al b/lib/auto/POSIX/abs.al new file mode 100644 index 0000000000..4a832b40d5 --- /dev/null +++ b/lib/auto/POSIX/abs.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub abs { + usage "abs(x)", caller if @_ != 1; + abs($_[0]); +} + +1; diff --git a/lib/auto/POSIX/access.al b/lib/auto/POSIX/access.al new file mode 100644 index 0000000000..89bbfb043a --- /dev/null +++ b/lib/auto/POSIX/access.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub access { + unimpl "access(xxx)", caller if @_ != 123; + access($_[0]); +} + +1; diff --git a/lib/auto/POSIX/alarm.al b/lib/auto/POSIX/alarm.al new file mode 100644 index 0000000000..183b6d965e --- /dev/null +++ b/lib/auto/POSIX/alarm.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub alarm { + unimpl "alarm(xxx)", caller if @_ != 123; + alarm($_[0]); +} + +1; diff --git a/lib/auto/POSIX/asctime.al b/lib/auto/POSIX/asctime.al new file mode 100644 index 0000000000..067e0f4211 --- /dev/null +++ b/lib/auto/POSIX/asctime.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub asctime { + unimpl "asctime(xxx)", caller if @_ != 123; + asctime($_[0]); +} + +1; diff --git a/lib/auto/POSIX/assert.al b/lib/auto/POSIX/assert.al new file mode 100644 index 0000000000..f32a8537ed --- /dev/null +++ b/lib/auto/POSIX/assert.al @@ -0,0 +1,12 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub assert { + usage "assert(expr)", caller if @_ != 1; + if (!$_[0]) { + local ($pack,$file,$line) = caller; + die "Assertion failed at $file line $line\n"; + } +} + +1; diff --git a/lib/auto/POSIX/atan2.al b/lib/auto/POSIX/atan2.al new file mode 100644 index 0000000000..1b2e23a533 --- /dev/null +++ b/lib/auto/POSIX/atan2.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub atan2 { + usage "atan2(x,y)", caller if @_ != 2; + atan2($_[0], $_[1]); +} + +1; diff --git a/lib/auto/POSIX/atexit.al b/lib/auto/POSIX/atexit.al new file mode 100644 index 0000000000..054d8da133 --- /dev/null +++ b/lib/auto/POSIX/atexit.al @@ -0,0 +1,8 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub atexit { + unimpl "atexit() is C-specific: use END {} instead", caller; +} + +1; diff --git a/lib/auto/POSIX/atof.al b/lib/auto/POSIX/atof.al new file mode 100644 index 0000000000..0875991941 --- /dev/null +++ b/lib/auto/POSIX/atof.al @@ -0,0 +1,8 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub atof { + unimpl "atof() is C-specific, stopped", caller; +} + +1; diff --git a/lib/auto/POSIX/atoi.al b/lib/auto/POSIX/atoi.al new file mode 100644 index 0000000000..6f18387899 --- /dev/null +++ b/lib/auto/POSIX/atoi.al @@ -0,0 +1,8 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub atoi { + unimpl "atoi() is C-specific, stopped", caller; +} + +1; diff --git a/lib/auto/POSIX/atol.al b/lib/auto/POSIX/atol.al new file mode 100644 index 0000000000..9393d21333 --- /dev/null +++ b/lib/auto/POSIX/atol.al @@ -0,0 +1,8 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub atol { + unimpl "atol() is C-specific, stopped", caller; +} + +1; diff --git a/lib/auto/POSIX/bsearch.al b/lib/auto/POSIX/bsearch.al new file mode 100644 index 0000000000..ed104adf41 --- /dev/null +++ b/lib/auto/POSIX/bsearch.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub bsearch { + unimpl "bsearch(xxx)", caller if @_ != 123; + bsearch($_[0]); +} + +1; diff --git a/lib/auto/POSIX/calloc.al b/lib/auto/POSIX/calloc.al new file mode 100644 index 0000000000..d53352385c --- /dev/null +++ b/lib/auto/POSIX/calloc.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub calloc { + unimpl "calloc(xxx)", caller if @_ != 123; + calloc($_[0]); +} + +1; diff --git a/lib/auto/POSIX/cfgetispeed.al b/lib/auto/POSIX/cfgetispeed.al new file mode 100644 index 0000000000..a95efd6f54 --- /dev/null +++ b/lib/auto/POSIX/cfgetispeed.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub cfgetispeed { + unimpl "cfgetispeed(xxx)", caller if @_ != 123; + cfgetispeed($_[0]); +} + +1; diff --git a/lib/auto/POSIX/cfgetospeed.al b/lib/auto/POSIX/cfgetospeed.al new file mode 100644 index 0000000000..69e66ad76c --- /dev/null +++ b/lib/auto/POSIX/cfgetospeed.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub cfgetospeed { + unimpl "cfgetospeed(xxx)", caller if @_ != 123; + cfgetospeed($_[0]); +} + +1; diff --git a/lib/auto/POSIX/cfsetispeed.al b/lib/auto/POSIX/cfsetispeed.al new file mode 100644 index 0000000000..cbcc646b1e --- /dev/null +++ b/lib/auto/POSIX/cfsetispeed.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub cfsetispeed { + unimpl "cfsetispeed(xxx)", caller if @_ != 123; + cfsetispeed($_[0]); +} + +1; diff --git a/lib/auto/POSIX/cfsetospeed.al b/lib/auto/POSIX/cfsetospeed.al new file mode 100644 index 0000000000..7dae85c36a --- /dev/null +++ b/lib/auto/POSIX/cfsetospeed.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub cfsetospeed { + unimpl "cfsetospeed(xxx)", caller if @_ != 123; + cfsetospeed($_[0]); +} + +1; diff --git a/lib/auto/POSIX/chdir.al b/lib/auto/POSIX/chdir.al new file mode 100644 index 0000000000..9e1f685dc9 --- /dev/null +++ b/lib/auto/POSIX/chdir.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub chdir { + unimpl "chdir(xxx)", caller if @_ != 123; + chdir($_[0]); +} + +1; diff --git a/lib/auto/POSIX/chmod.al b/lib/auto/POSIX/chmod.al new file mode 100644 index 0000000000..24fe4c5ab1 --- /dev/null +++ b/lib/auto/POSIX/chmod.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub chmod { + usage "chmod(filename, mode)", caller if @_ != 2; + chmod($_[0], $_[1]); +} + +1; diff --git a/lib/auto/POSIX/chown.al b/lib/auto/POSIX/chown.al new file mode 100644 index 0000000000..127d89861c --- /dev/null +++ b/lib/auto/POSIX/chown.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub chown { + usage "chown(filename, uid, gid)", caller if @_ != 3; + chown($_[0], $_[1], $_[2]); +} + +1; diff --git a/lib/auto/POSIX/clearerr.al b/lib/auto/POSIX/clearerr.al new file mode 100644 index 0000000000..412f521938 --- /dev/null +++ b/lib/auto/POSIX/clearerr.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub clearerr { + usage "clearerr(filehandle)", caller if @_ != 1; + seek($_[0], 0, 1); +} + +1; diff --git a/lib/auto/POSIX/clock.al b/lib/auto/POSIX/clock.al new file mode 100644 index 0000000000..7fae255378 --- /dev/null +++ b/lib/auto/POSIX/clock.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub clock { + unimpl "clock(xxx)", caller if @_ != 123; + clock($_[0]); +} + +1; diff --git a/lib/auto/POSIX/close.al b/lib/auto/POSIX/close.al new file mode 100644 index 0000000000..ce471881d0 --- /dev/null +++ b/lib/auto/POSIX/close.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub close { + unimpl "close(xxx)", caller if @_ != 123; + close($_[0]); +} + +1; diff --git a/lib/auto/POSIX/closedir.al b/lib/auto/POSIX/closedir.al new file mode 100644 index 0000000000..bb12a2608d --- /dev/null +++ b/lib/auto/POSIX/closedir.al @@ -0,0 +1,10 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub closedir { + usage "closedir(dirhandle)", caller if @_ != 1; + closedir($_[0]); + ungensym($_[0]); +} + +1; diff --git a/lib/auto/POSIX/cos.al b/lib/auto/POSIX/cos.al new file mode 100644 index 0000000000..4ea59dfb32 --- /dev/null +++ b/lib/auto/POSIX/cos.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub cos { + usage "cos(x)", caller if @_ != 1; + cos($_[0]); +} + +1; diff --git a/lib/auto/POSIX/creat.al b/lib/auto/POSIX/creat.al new file mode 100644 index 0000000000..74656e7dd0 --- /dev/null +++ b/lib/auto/POSIX/creat.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub creat { + usage "creat(filename, mode)", caller if @_ != 2; + &open($_[0], &O_WRONLY | &O_CREAT | &O_TRUNC, $_[2]); +} + +1; diff --git a/lib/auto/POSIX/ctermid.al b/lib/auto/POSIX/ctermid.al new file mode 100644 index 0000000000..37a8f71a14 --- /dev/null +++ b/lib/auto/POSIX/ctermid.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub ctermid { + unimpl "ctermid(xxx)", caller if @_ != 123; + ctermid($_[0]); +} + +1; diff --git a/lib/auto/POSIX/ctime.al b/lib/auto/POSIX/ctime.al new file mode 100644 index 0000000000..d12aa4e64c --- /dev/null +++ b/lib/auto/POSIX/ctime.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub ctime { + unimpl "ctime(xxx)", caller if @_ != 123; + ctime($_[0]); +} + +1; diff --git a/lib/auto/POSIX/cuserid.al b/lib/auto/POSIX/cuserid.al new file mode 100644 index 0000000000..546c3091fa --- /dev/null +++ b/lib/auto/POSIX/cuserid.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub cuserid { + unimpl "cuserid(xxx)", caller if @_ != 123; + cuserid($_[0]); +} + +1; diff --git a/lib/auto/POSIX/difftime.al b/lib/auto/POSIX/difftime.al new file mode 100644 index 0000000000..dd4b3db5db --- /dev/null +++ b/lib/auto/POSIX/difftime.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub difftime { + unimpl "difftime(xxx)", caller if @_ != 123; + difftime($_[0]); +} + +1; diff --git a/lib/auto/POSIX/div.al b/lib/auto/POSIX/div.al new file mode 100644 index 0000000000..0102b32fc9 --- /dev/null +++ b/lib/auto/POSIX/div.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub div { + unimpl "div(xxx)", caller if @_ != 123; + div($_[0]); +} + +1; diff --git a/lib/auto/POSIX/dup.al b/lib/auto/POSIX/dup.al new file mode 100644 index 0000000000..393119e5e0 --- /dev/null +++ b/lib/auto/POSIX/dup.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub dup { + unimpl "dup(xxx)", caller if @_ != 123; + dup($_[0]); +} + +1; diff --git a/lib/auto/POSIX/dup2.al b/lib/auto/POSIX/dup2.al new file mode 100644 index 0000000000..c85f16e9d5 --- /dev/null +++ b/lib/auto/POSIX/dup2.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub dup2 { + unimpl "dup2(xxx)", caller if @_ != 123; + dup2($_[0]); +} + +1; diff --git a/lib/auto/POSIX/errno.al b/lib/auto/POSIX/errno.al new file mode 100644 index 0000000000..971b7e8241 --- /dev/null +++ b/lib/auto/POSIX/errno.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub errno { + usage "errno()", caller if @_ != 0; + $! + 0; +} + +1; diff --git a/lib/auto/POSIX/execl.al b/lib/auto/POSIX/execl.al new file mode 100644 index 0000000000..c89c6fd8c0 --- /dev/null +++ b/lib/auto/POSIX/execl.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub execl { + unimpl "execl(xxx)", caller if @_ != 123; + execl($_[0]); +} + +1; diff --git a/lib/auto/POSIX/execle.al b/lib/auto/POSIX/execle.al new file mode 100644 index 0000000000..530ac768dc --- /dev/null +++ b/lib/auto/POSIX/execle.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub execle { + unimpl "execle(xxx)", caller if @_ != 123; + execle($_[0]); +} + +1; diff --git a/lib/auto/POSIX/execlp.al b/lib/auto/POSIX/execlp.al new file mode 100644 index 0000000000..ea78975435 --- /dev/null +++ b/lib/auto/POSIX/execlp.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub execlp { + unimpl "execlp(xxx)", caller if @_ != 123; + execlp($_[0]); +} + +1; diff --git a/lib/auto/POSIX/execv.al b/lib/auto/POSIX/execv.al new file mode 100644 index 0000000000..382ec7dde6 --- /dev/null +++ b/lib/auto/POSIX/execv.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub execv { + unimpl "execv(xxx)", caller if @_ != 123; + execv($_[0]); +} + +1; diff --git a/lib/auto/POSIX/execve.al b/lib/auto/POSIX/execve.al new file mode 100644 index 0000000000..9f5790a0f1 --- /dev/null +++ b/lib/auto/POSIX/execve.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub execve { + unimpl "execve(xxx)", caller if @_ != 123; + execve($_[0]); +} + +1; diff --git a/lib/auto/POSIX/execvp.al b/lib/auto/POSIX/execvp.al new file mode 100644 index 0000000000..38677d8b7d --- /dev/null +++ b/lib/auto/POSIX/execvp.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub execvp { + unimpl "execvp(xxx)", caller if @_ != 123; + execvp($_[0]); +} + +1; diff --git a/lib/auto/POSIX/exit.al b/lib/auto/POSIX/exit.al new file mode 100644 index 0000000000..fc46de2cb8 --- /dev/null +++ b/lib/auto/POSIX/exit.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub exit { + unimpl "exit(xxx)", caller if @_ != 123; + exit($_[0]); +} + +1; diff --git a/lib/auto/POSIX/exp.al b/lib/auto/POSIX/exp.al new file mode 100644 index 0000000000..70683e072f --- /dev/null +++ b/lib/auto/POSIX/exp.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub exp { + usage "exp(x)", caller if @_ != 1; + exp($_[0]); +} + +1; diff --git a/lib/auto/POSIX/fabs.al b/lib/auto/POSIX/fabs.al new file mode 100644 index 0000000000..5683d66ca5 --- /dev/null +++ b/lib/auto/POSIX/fabs.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub fabs { + usage "fabs(x)", caller if @_ != 1; + abs($_[0]); +} + +1; diff --git a/lib/auto/POSIX/fclose.al b/lib/auto/POSIX/fclose.al new file mode 100644 index 0000000000..493b964561 --- /dev/null +++ b/lib/auto/POSIX/fclose.al @@ -0,0 +1,8 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub fclose { + unimpl "fclose() is C-specific--use close instead", caller; +} + +1; diff --git a/lib/auto/POSIX/fcntl.al b/lib/auto/POSIX/fcntl.al new file mode 100644 index 0000000000..8108a00fc6 --- /dev/null +++ b/lib/auto/POSIX/fcntl.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub fcntl { + usage "fcntl(filehandle, cmd, arg)", caller if @_ != 3; + fcntl($_[0], $_[1], $_[2]); +} + +1; diff --git a/lib/auto/POSIX/fdopen.al b/lib/auto/POSIX/fdopen.al new file mode 100644 index 0000000000..23487cabdc --- /dev/null +++ b/lib/auto/POSIX/fdopen.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub fdopen { + unimpl "fdopen(xxx)", caller if @_ != 123; + fdopen($_[0]); +} + +1; diff --git a/lib/auto/POSIX/feof.al b/lib/auto/POSIX/feof.al new file mode 100644 index 0000000000..895d58b7f0 --- /dev/null +++ b/lib/auto/POSIX/feof.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub feof { + usage "feof(filehandle)", caller if @_ != 1; + eof($_[0]); +} + +1; diff --git a/lib/auto/POSIX/ferror.al b/lib/auto/POSIX/ferror.al new file mode 100644 index 0000000000..0588424f06 --- /dev/null +++ b/lib/auto/POSIX/ferror.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub ferror { + unimpl "ferror(xxx)", caller if @_ != 123; + ferror($_[0]); +} + +1; diff --git a/lib/auto/POSIX/fflush.al b/lib/auto/POSIX/fflush.al new file mode 100644 index 0000000000..b7b767680c --- /dev/null +++ b/lib/auto/POSIX/fflush.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub fflush { + unimpl "fflush(xxx)", caller if @_ != 123; + fflush($_[0]); +} + +1; diff --git a/lib/auto/POSIX/fgetc.al b/lib/auto/POSIX/fgetc.al new file mode 100644 index 0000000000..41cd70f593 --- /dev/null +++ b/lib/auto/POSIX/fgetc.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub fgetc { + usage "fgetc(filehandle)", caller if @_ != 1; + getc($_[0]); +} + +1; diff --git a/lib/auto/POSIX/fgetpos.al b/lib/auto/POSIX/fgetpos.al new file mode 100644 index 0000000000..679fcd50dd --- /dev/null +++ b/lib/auto/POSIX/fgetpos.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub fgetpos { + unimpl "fgetpos(xxx)", caller if @_ != 123; + fgetpos($_[0]); +} + +1; diff --git a/lib/auto/POSIX/fgets.al b/lib/auto/POSIX/fgets.al new file mode 100644 index 0000000000..7a475b3778 --- /dev/null +++ b/lib/auto/POSIX/fgets.al @@ -0,0 +1,10 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub fgets { + usage "fgets(filehandle)", caller if @_ != 1; + local($handle) = @_; + scalar <$handle>; +} + +1; diff --git a/lib/auto/POSIX/fileno.al b/lib/auto/POSIX/fileno.al new file mode 100644 index 0000000000..62c7c0aff8 --- /dev/null +++ b/lib/auto/POSIX/fileno.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub fileno { + usage "fileno(filehandle)", caller if @_ != 1; + fileno($_[0]); +} + +1; diff --git a/lib/auto/POSIX/fopen.al b/lib/auto/POSIX/fopen.al new file mode 100644 index 0000000000..f4394ad6cb --- /dev/null +++ b/lib/auto/POSIX/fopen.al @@ -0,0 +1,8 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub fopen { + unimpl "fopen() is C-specific--use open instead", caller; +} + +1; diff --git a/lib/auto/POSIX/fork.al b/lib/auto/POSIX/fork.al new file mode 100644 index 0000000000..06466157e5 --- /dev/null +++ b/lib/auto/POSIX/fork.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub fork { + usage "fork()", caller if @_ != 0; + fork; +} + +1; diff --git a/lib/auto/POSIX/fpathconf.al b/lib/auto/POSIX/fpathconf.al new file mode 100644 index 0000000000..533f906395 --- /dev/null +++ b/lib/auto/POSIX/fpathconf.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub fpathconf { + unimpl "fpathconf(xxx)", caller if @_ != 123; + fpathconf($_[0]); +} + +1; diff --git a/lib/auto/POSIX/fprintf.al b/lib/auto/POSIX/fprintf.al new file mode 100644 index 0000000000..b577f9ad35 --- /dev/null +++ b/lib/auto/POSIX/fprintf.al @@ -0,0 +1,8 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub fprintf { + unimpl "fprintf() is C-specific--use printf instead", caller; +} + +1; diff --git a/lib/auto/POSIX/fputc.al b/lib/auto/POSIX/fputc.al new file mode 100644 index 0000000000..0cdf82c5a3 --- /dev/null +++ b/lib/auto/POSIX/fputc.al @@ -0,0 +1,8 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub fputc { + unimpl "fputc() is C-specific--use print instead", caller; +} + +1; diff --git a/lib/auto/POSIX/fputs.al b/lib/auto/POSIX/fputs.al new file mode 100644 index 0000000000..208eea6ba9 --- /dev/null +++ b/lib/auto/POSIX/fputs.al @@ -0,0 +1,11 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub fputs { + unimpl "fputs() is C-specific--use print instead", caller; + usage "fputs(string, handle)", caller if @_ != 2; + local($handle) = pop; + print $handle @_; +} + +1; diff --git a/lib/auto/POSIX/fread.al b/lib/auto/POSIX/fread.al new file mode 100644 index 0000000000..5b5c0c5fd7 --- /dev/null +++ b/lib/auto/POSIX/fread.al @@ -0,0 +1,10 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub fread { + unimpl "fread() is C-specific--use read instead", caller; + unimpl "fread(xxx)", caller if @_ != 123; + fread($_[0]); +} + +1; diff --git a/lib/auto/POSIX/free.al b/lib/auto/POSIX/free.al new file mode 100644 index 0000000000..319a76d5a9 --- /dev/null +++ b/lib/auto/POSIX/free.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub free { + unimpl "free(xxx)", caller if @_ != 123; + free($_[0]); +} + +1; diff --git a/lib/auto/POSIX/freopen.al b/lib/auto/POSIX/freopen.al new file mode 100644 index 0000000000..ed4eca6d67 --- /dev/null +++ b/lib/auto/POSIX/freopen.al @@ -0,0 +1,10 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub freopen { + unimpl "freopen() is C-specific--use open instead", caller; + unimpl "freopen(xxx)", caller if @_ != 123; + freopen($_[0]); +} + +1; diff --git a/lib/auto/POSIX/fscanf.al b/lib/auto/POSIX/fscanf.al new file mode 100644 index 0000000000..80a8e61454 --- /dev/null +++ b/lib/auto/POSIX/fscanf.al @@ -0,0 +1,10 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub fscanf { + unimpl "fscanf() is C-specific--use <> and regular expressions instead", caller; + unimpl "fscanf(xxx)", caller if @_ != 123; + fscanf($_[0]); +} + +1; diff --git a/lib/auto/POSIX/fseek.al b/lib/auto/POSIX/fseek.al new file mode 100644 index 0000000000..55da72a549 --- /dev/null +++ b/lib/auto/POSIX/fseek.al @@ -0,0 +1,10 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub fseek { + unimpl "fseek() is C-specific--use seek instead", caller; + unimpl "fseek(xxx)", caller if @_ != 123; + fseek($_[0]); +} + +1; diff --git a/lib/auto/POSIX/fsetpos.al b/lib/auto/POSIX/fsetpos.al new file mode 100644 index 0000000000..9b59546e40 --- /dev/null +++ b/lib/auto/POSIX/fsetpos.al @@ -0,0 +1,10 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub fsetpos { + unimpl "fsetpos() is C-specific--use seek instead", caller; + unimpl "fsetpos(xxx)", caller if @_ != 123; + fsetpos($_[0]); +} + +1; diff --git a/lib/auto/POSIX/fstat.al b/lib/auto/POSIX/fstat.al new file mode 100644 index 0000000000..64ac1b6dad --- /dev/null +++ b/lib/auto/POSIX/fstat.al @@ -0,0 +1,13 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub fstat { + usage "fstat(fd)", caller if @_ != 1; + local(*TMP); + open(TMP, "<&$_[0]"); # Gross. + local(@l) = stat(TMP); + close(TMP); + @l; +} + +1; diff --git a/lib/auto/POSIX/ftell.al b/lib/auto/POSIX/ftell.al new file mode 100644 index 0000000000..aa922c69b1 --- /dev/null +++ b/lib/auto/POSIX/ftell.al @@ -0,0 +1,10 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub ftell { + unimpl "ftell() is C-specific--use tell instead", caller; + unimpl "ftell(xxx)", caller if @_ != 123; + ftell($_[0]); +} + +1; diff --git a/lib/auto/POSIX/fwrite.al b/lib/auto/POSIX/fwrite.al new file mode 100644 index 0000000000..09d8e7db55 --- /dev/null +++ b/lib/auto/POSIX/fwrite.al @@ -0,0 +1,10 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub fwrite { + unimpl "fwrite() is C-specific--use print instead", caller; + unimpl "fwrite(xxx)", caller if @_ != 123; + fwrite($_[0]); +} + +1; diff --git a/lib/auto/POSIX/getc.al b/lib/auto/POSIX/getc.al new file mode 100644 index 0000000000..5919395af1 --- /dev/null +++ b/lib/auto/POSIX/getc.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub getc { + usage "getc(handle)", caller if @_ != 1; + getc($_[0]); +} + +1; diff --git a/lib/auto/POSIX/getchar.al b/lib/auto/POSIX/getchar.al new file mode 100644 index 0000000000..08e5111b60 --- /dev/null +++ b/lib/auto/POSIX/getchar.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub getchar { + usage "getchar()", caller if @_ != 0; + getc(STDIN); +} + +1; diff --git a/lib/auto/POSIX/getcwd.al b/lib/auto/POSIX/getcwd.al new file mode 100644 index 0000000000..1e1ec7c688 --- /dev/null +++ b/lib/auto/POSIX/getcwd.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub getcwd { + unimpl "getcwd(xxx)", caller if @_ != 123; + getcwd($_[0]); +} + +1; diff --git a/lib/auto/POSIX/getegid.al b/lib/auto/POSIX/getegid.al new file mode 100644 index 0000000000..6f3719cc44 --- /dev/null +++ b/lib/auto/POSIX/getegid.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub getegid { + usage "getegid()", caller if @_ != 0; + $) + 0; +} + +1; diff --git a/lib/auto/POSIX/getenv.al b/lib/auto/POSIX/getenv.al new file mode 100644 index 0000000000..04fc148f23 --- /dev/null +++ b/lib/auto/POSIX/getenv.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub getenv { + unimpl "getenv(xxx)", caller if @_ != 123; + getenv($_[0]); +} + +1; diff --git a/lib/auto/POSIX/geteuid.al b/lib/auto/POSIX/geteuid.al new file mode 100644 index 0000000000..74b10ff30f --- /dev/null +++ b/lib/auto/POSIX/geteuid.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub geteuid { + usage "geteuid()", caller if @_ != 0; + $> + 0; +} + +1; diff --git a/lib/auto/POSIX/getgid.al b/lib/auto/POSIX/getgid.al new file mode 100644 index 0000000000..a106618fff --- /dev/null +++ b/lib/auto/POSIX/getgid.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub getgid { + usage "getgid()", caller if @_ != 0; + $( + 0; +} + +1; diff --git a/lib/auto/POSIX/getgrgid.al b/lib/auto/POSIX/getgrgid.al new file mode 100644 index 0000000000..485ed2b04c --- /dev/null +++ b/lib/auto/POSIX/getgrgid.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub getgrgid { + usage "getgrgid(gid)", caller if @_ != 1; + getgrgid($_[0]); +} + +1; diff --git a/lib/auto/POSIX/getgrnam.al b/lib/auto/POSIX/getgrnam.al new file mode 100644 index 0000000000..1dcbc69850 --- /dev/null +++ b/lib/auto/POSIX/getgrnam.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub getgrnam { + usage "getgrnam(name)", caller if @_ != 1; + getgrnam($_[0]); +} + +1; diff --git a/lib/auto/POSIX/getgroups.al b/lib/auto/POSIX/getgroups.al new file mode 100644 index 0000000000..34ae5e87cd --- /dev/null +++ b/lib/auto/POSIX/getgroups.al @@ -0,0 +1,10 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub getgroups { + usage "getgroups()", caller if @_ != 0; + local(%seen) = (); + grep(!%seen{$_}++, split(' ', $) )); +} + +1; diff --git a/lib/auto/POSIX/getlogin.al b/lib/auto/POSIX/getlogin.al new file mode 100644 index 0000000000..8f61cb24f2 --- /dev/null +++ b/lib/auto/POSIX/getlogin.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub getlogin { + usage "getlogin(xxx)", caller if @_ != 0; + getlogin(); +} + +1; diff --git a/lib/auto/POSIX/getpgrp.al b/lib/auto/POSIX/getpgrp.al new file mode 100644 index 0000000000..0364706e53 --- /dev/null +++ b/lib/auto/POSIX/getpgrp.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub getpgrp { + usage "getpgrp()", caller if @_ != 0; + getpgrp($_[0]); +} + +1; diff --git a/lib/auto/POSIX/getpid.al b/lib/auto/POSIX/getpid.al new file mode 100644 index 0000000000..51deea44db --- /dev/null +++ b/lib/auto/POSIX/getpid.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub getpid { + usage "getpid()", caller if @_ != 0; + $$; +} + +1; diff --git a/lib/auto/POSIX/getppid.al b/lib/auto/POSIX/getppid.al new file mode 100644 index 0000000000..95450e95ee --- /dev/null +++ b/lib/auto/POSIX/getppid.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub getppid { + usage "getppid()", caller if @_ != 0; + getppid; +} + +1; diff --git a/lib/auto/POSIX/getpwnam.al b/lib/auto/POSIX/getpwnam.al new file mode 100644 index 0000000000..d4cbc8d766 --- /dev/null +++ b/lib/auto/POSIX/getpwnam.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub getpwnam { + usage "getpwnam(name)", caller if @_ != 1; + getpwnam($_[0]); +} + +1; diff --git a/lib/auto/POSIX/getpwuid.al b/lib/auto/POSIX/getpwuid.al new file mode 100644 index 0000000000..cfb1265761 --- /dev/null +++ b/lib/auto/POSIX/getpwuid.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub getpwuid { + usage "getpwuid(uid)", caller if @_ != 1; + getpwuid($_[0]); +} + +1; diff --git a/lib/auto/POSIX/gets.al b/lib/auto/POSIX/gets.al new file mode 100644 index 0000000000..d989692172 --- /dev/null +++ b/lib/auto/POSIX/gets.al @@ -0,0 +1,10 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub gets { + usage "gets(handle)", caller if @_ != 1; + local($handle) = shift; + scalar <$handle>; +} + +1; diff --git a/lib/auto/POSIX/getuid.al b/lib/auto/POSIX/getuid.al new file mode 100644 index 0000000000..6b97d4889f --- /dev/null +++ b/lib/auto/POSIX/getuid.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub getuid { + usage "getuid()", caller if @_ != 0; + $<; +} + +1; diff --git a/lib/auto/POSIX/gmtime.al b/lib/auto/POSIX/gmtime.al new file mode 100644 index 0000000000..520d2dadc5 --- /dev/null +++ b/lib/auto/POSIX/gmtime.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub gmtime { + unimpl "gmtime(xxx)", caller if @_ != 123; + gmtime($_[0]); +} + +1; diff --git a/lib/auto/POSIX/isatty.al b/lib/auto/POSIX/isatty.al new file mode 100644 index 0000000000..dfc50f4d63 --- /dev/null +++ b/lib/auto/POSIX/isatty.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub isatty { + unimpl "isatty(xxx)", caller if @_ != 123; + isatty($_[0]); +} + +1; diff --git a/lib/auto/POSIX/kill.al b/lib/auto/POSIX/kill.al new file mode 100644 index 0000000000..138a6d72f4 --- /dev/null +++ b/lib/auto/POSIX/kill.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub kill { + usage "kill(pid, sig)", caller if @_ != 2; + kill $_[1], $_[0]; +} + +1; diff --git a/lib/auto/POSIX/labs.al b/lib/auto/POSIX/labs.al new file mode 100644 index 0000000000..90426e8298 --- /dev/null +++ b/lib/auto/POSIX/labs.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub labs { + unimpl "labs(xxx)", caller if @_ != 123; + labs($_[0]); +} + +1; diff --git a/lib/auto/POSIX/ldiv.al b/lib/auto/POSIX/ldiv.al new file mode 100644 index 0000000000..788fb3219e --- /dev/null +++ b/lib/auto/POSIX/ldiv.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub ldiv { + unimpl "ldiv(xxx)", caller if @_ != 123; + ldiv($_[0]); +} + +1; diff --git a/lib/auto/POSIX/link.al b/lib/auto/POSIX/link.al new file mode 100644 index 0000000000..662ad9d41e --- /dev/null +++ b/lib/auto/POSIX/link.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub link { + usage "link(oldfilename, newfilename)", caller if @_ != 2; + link($_[0], $_[1]); +} + +1; diff --git a/lib/auto/POSIX/localtime.al b/lib/auto/POSIX/localtime.al new file mode 100644 index 0000000000..5e4d61a940 --- /dev/null +++ b/lib/auto/POSIX/localtime.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub localtime { + unimpl "localtime(xxx)", caller if @_ != 123; + localtime($_[0]); +} + +1; diff --git a/lib/auto/POSIX/log.al b/lib/auto/POSIX/log.al new file mode 100644 index 0000000000..2ba36f20cc --- /dev/null +++ b/lib/auto/POSIX/log.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub log { + usage "log(x)", caller if @_ != 1; + log($_[0]); +} + +1; diff --git a/lib/auto/POSIX/longjmp.al b/lib/auto/POSIX/longjmp.al new file mode 100644 index 0000000000..d403d46bc5 --- /dev/null +++ b/lib/auto/POSIX/longjmp.al @@ -0,0 +1,8 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub longjmp { + unimpl "longjmp() is C-specific: use die instead", caller; +} + +1; diff --git a/lib/auto/POSIX/lseek.al b/lib/auto/POSIX/lseek.al new file mode 100644 index 0000000000..ded754a642 --- /dev/null +++ b/lib/auto/POSIX/lseek.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub lseek { + unimpl "lseek(xxx)", caller if @_ != 123; + lseek($_[0]); +} + +1; diff --git a/lib/auto/POSIX/malloc.al b/lib/auto/POSIX/malloc.al new file mode 100644 index 0000000000..e860639b0d --- /dev/null +++ b/lib/auto/POSIX/malloc.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub malloc { + unimpl "malloc(xxx)", caller if @_ != 123; + malloc($_[0]); +} + +1; diff --git a/lib/auto/POSIX/mblen.al b/lib/auto/POSIX/mblen.al new file mode 100644 index 0000000000..1a7b7f3428 --- /dev/null +++ b/lib/auto/POSIX/mblen.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub mblen { + unimpl "mblen(xxx)", caller if @_ != 123; + mblen($_[0]); +} + +1; diff --git a/lib/auto/POSIX/mbstowcs.al b/lib/auto/POSIX/mbstowcs.al new file mode 100644 index 0000000000..8f15fe306e --- /dev/null +++ b/lib/auto/POSIX/mbstowcs.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub mbstowcs { + unimpl "mbstowcs(xxx)", caller if @_ != 123; + mbstowcs($_[0]); +} + +1; diff --git a/lib/auto/POSIX/mbtowc.al b/lib/auto/POSIX/mbtowc.al new file mode 100644 index 0000000000..695dcb98f4 --- /dev/null +++ b/lib/auto/POSIX/mbtowc.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub mbtowc { + unimpl "mbtowc(xxx)", caller if @_ != 123; + mbtowc($_[0]); +} + +1; diff --git a/lib/auto/POSIX/memchr.al b/lib/auto/POSIX/memchr.al new file mode 100644 index 0000000000..28b0c1255b --- /dev/null +++ b/lib/auto/POSIX/memchr.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub memchr { + unimpl "memchr(xxx)", caller if @_ != 123; + memchr($_[0]); +} + +1; diff --git a/lib/auto/POSIX/memcmp.al b/lib/auto/POSIX/memcmp.al new file mode 100644 index 0000000000..8406f28ed9 --- /dev/null +++ b/lib/auto/POSIX/memcmp.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub memcmp { + unimpl "memcmp(xxx)", caller if @_ != 123; + memcmp($_[0]); +} + +1; diff --git a/lib/auto/POSIX/memcpy.al b/lib/auto/POSIX/memcpy.al new file mode 100644 index 0000000000..eee2dd61fd --- /dev/null +++ b/lib/auto/POSIX/memcpy.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub memcpy { + unimpl "memcpy(xxx)", caller if @_ != 123; + memcpy($_[0]); +} + +1; diff --git a/lib/auto/POSIX/memmove.al b/lib/auto/POSIX/memmove.al new file mode 100644 index 0000000000..c926d78fa0 --- /dev/null +++ b/lib/auto/POSIX/memmove.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub memmove { + unimpl "memmove(xxx)", caller if @_ != 123; + memmove($_[0]); +} + +1; diff --git a/lib/auto/POSIX/memset.al b/lib/auto/POSIX/memset.al new file mode 100644 index 0000000000..369930e346 --- /dev/null +++ b/lib/auto/POSIX/memset.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub memset { + unimpl "memset(xxx)", caller if @_ != 123; + memset($_[0]); +} + +1; diff --git a/lib/auto/POSIX/mkdir.al b/lib/auto/POSIX/mkdir.al new file mode 100644 index 0000000000..0b1088271e --- /dev/null +++ b/lib/auto/POSIX/mkdir.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub mkdir { + usage "mkdir(directoryname, mode)", caller if @_ != 2; + mkdir($_[0], $_[1]); +} + +1; diff --git a/lib/auto/POSIX/mkfifo.al b/lib/auto/POSIX/mkfifo.al new file mode 100644 index 0000000000..8b6ad724f1 --- /dev/null +++ b/lib/auto/POSIX/mkfifo.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub mkfifo { + unimpl "mkfifo(xxx)", caller if @_ != 123; + mkfifo($_[0]); +} + +1; diff --git a/lib/auto/POSIX/mktime.al b/lib/auto/POSIX/mktime.al new file mode 100644 index 0000000000..df7e3556fd --- /dev/null +++ b/lib/auto/POSIX/mktime.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub mktime { + unimpl "mktime(xxx)", caller if @_ != 123; + mktime($_[0]); +} + +1; diff --git a/lib/auto/POSIX/offsetof.al b/lib/auto/POSIX/offsetof.al new file mode 100644 index 0000000000..fb5ecfb819 --- /dev/null +++ b/lib/auto/POSIX/offsetof.al @@ -0,0 +1,8 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub offsetof { + unimpl "offsetof() is C-specific, stopped", caller; +} + +1; diff --git a/lib/auto/POSIX/opendir.al b/lib/auto/POSIX/opendir.al new file mode 100644 index 0000000000..7c264d4770 --- /dev/null +++ b/lib/auto/POSIX/opendir.al @@ -0,0 +1,12 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub opendir { + usage "opendir(directory)", caller if @_ != 1; + local($dirhandle) = &gensym; + opendir($dirhandle, $_[0]) + ? $dirhandle + : (ungensym($dirhandle), undef); +} + +1; diff --git a/lib/auto/POSIX/pathconf.al b/lib/auto/POSIX/pathconf.al new file mode 100644 index 0000000000..4a66189185 --- /dev/null +++ b/lib/auto/POSIX/pathconf.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub pathconf { + unimpl "pathconf(xxx)", caller if @_ != 123; + pathconf($_[0]); +} + +1; diff --git a/lib/auto/POSIX/pause.al b/lib/auto/POSIX/pause.al new file mode 100644 index 0000000000..41fcea6c23 --- /dev/null +++ b/lib/auto/POSIX/pause.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub pause { + unimpl "pause(xxx)", caller if @_ != 123; + pause($_[0]); +} + +1; diff --git a/lib/auto/POSIX/perror.al b/lib/auto/POSIX/perror.al new file mode 100644 index 0000000000..36ae11e4c7 --- /dev/null +++ b/lib/auto/POSIX/perror.al @@ -0,0 +1,10 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub perror { + unimpl "perror() is C-specific--print $! instead", caller; + unimpl "perror(xxx)", caller if @_ != 123; + perror($_[0]); +} + +1; diff --git a/lib/auto/POSIX/pipe.al b/lib/auto/POSIX/pipe.al new file mode 100644 index 0000000000..d65b5ec885 --- /dev/null +++ b/lib/auto/POSIX/pipe.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub pipe { + unimpl "pipe(xxx)", caller if @_ != 123; + pipe($_[0]); +} + +1; diff --git a/lib/auto/POSIX/pow.al b/lib/auto/POSIX/pow.al new file mode 100644 index 0000000000..0893b2260e --- /dev/null +++ b/lib/auto/POSIX/pow.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub pow { + usage "pow(x,exponent)", caller if @_ != 2; + $_[0] ** $_[1]; +} + +1; diff --git a/lib/auto/POSIX/printf.al b/lib/auto/POSIX/printf.al new file mode 100644 index 0000000000..f911780072 --- /dev/null +++ b/lib/auto/POSIX/printf.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub printf { + usage "printf(pattern, args...)", caller if @_ < 1; + printf STDOUT @_; +} + +1; diff --git a/lib/auto/POSIX/putc.al b/lib/auto/POSIX/putc.al new file mode 100644 index 0000000000..59eaca87a3 --- /dev/null +++ b/lib/auto/POSIX/putc.al @@ -0,0 +1,10 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub putc { + unimpl "putc() is C-specific--use print instead", caller; + unimpl "putc(xxx)", caller if @_ != 123; + putc($_[0]); +} + +1; diff --git a/lib/auto/POSIX/putchar.al b/lib/auto/POSIX/putchar.al new file mode 100644 index 0000000000..1d6016c08d --- /dev/null +++ b/lib/auto/POSIX/putchar.al @@ -0,0 +1,10 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub putchar { + unimpl "putchar() is C-specific--use print instead", caller; + unimpl "putchar(xxx)", caller if @_ != 123; + putchar($_[0]); +} + +1; diff --git a/lib/auto/POSIX/puts.al b/lib/auto/POSIX/puts.al new file mode 100644 index 0000000000..84d3d8072a --- /dev/null +++ b/lib/auto/POSIX/puts.al @@ -0,0 +1,10 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub puts { + unimpl "puts() is C-specific--use print instead", caller; + unimpl "puts(xxx)", caller if @_ != 123; + puts($_[0]); +} + +1; diff --git a/lib/auto/POSIX/qsort.al b/lib/auto/POSIX/qsort.al new file mode 100644 index 0000000000..93eb12496c --- /dev/null +++ b/lib/auto/POSIX/qsort.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub qsort { + unimpl "qsort(xxx)", caller if @_ != 123; + qsort($_[0]); +} + +1; diff --git a/lib/auto/POSIX/raise.al b/lib/auto/POSIX/raise.al new file mode 100644 index 0000000000..de43d2a29e --- /dev/null +++ b/lib/auto/POSIX/raise.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub raise { + usage "raise(sig)", caller if @_ != 1; + kill $$, $_[0]; # Is this good enough? +} + +1; diff --git a/lib/auto/POSIX/rand.al b/lib/auto/POSIX/rand.al new file mode 100644 index 0000000000..08c3a1bfc7 --- /dev/null +++ b/lib/auto/POSIX/rand.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub rand { + unimpl "rand(xxx)", caller if @_ != 123; + rand($_[0]); +} + +1; diff --git a/lib/auto/POSIX/read.al b/lib/auto/POSIX/read.al new file mode 100644 index 0000000000..50363afd41 --- /dev/null +++ b/lib/auto/POSIX/read.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub read { + unimpl "read(xxx)", caller if @_ != 123; + read($_[0]); +} + +1; diff --git a/lib/auto/POSIX/readdir.al b/lib/auto/POSIX/readdir.al new file mode 100644 index 0000000000..84792b0c41 --- /dev/null +++ b/lib/auto/POSIX/readdir.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub readdir { + usage "readdir(dirhandle)", caller if @_ != 1; + readdir($_[0]); +} + +1; diff --git a/lib/auto/POSIX/realloc.al b/lib/auto/POSIX/realloc.al new file mode 100644 index 0000000000..4899b059c2 --- /dev/null +++ b/lib/auto/POSIX/realloc.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub realloc { + unimpl "realloc(xxx)", caller if @_ != 123; + realloc($_[0]); +} + +1; diff --git a/lib/auto/POSIX/remove.al b/lib/auto/POSIX/remove.al new file mode 100644 index 0000000000..83d2b8aa79 --- /dev/null +++ b/lib/auto/POSIX/remove.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub remove { + unimpl "remove(xxx)", caller if @_ != 123; + remove($_[0]); +} + +1; diff --git a/lib/auto/POSIX/rename.al b/lib/auto/POSIX/rename.al new file mode 100644 index 0000000000..b657c5a39d --- /dev/null +++ b/lib/auto/POSIX/rename.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub rename { + usage "rename(oldfilename, newfilename)", caller if @_ != 2; + rename($_[0], $_[1]); +} + +1; diff --git a/lib/auto/POSIX/rewind.al b/lib/auto/POSIX/rewind.al new file mode 100644 index 0000000000..0bbcc845a6 --- /dev/null +++ b/lib/auto/POSIX/rewind.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub rewind { + unimpl "rewind(xxx)", caller if @_ != 123; + rewind($_[0]); +} + +1; diff --git a/lib/auto/POSIX/rewinddir.al b/lib/auto/POSIX/rewinddir.al new file mode 100644 index 0000000000..610f45818d --- /dev/null +++ b/lib/auto/POSIX/rewinddir.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub rewinddir { + usage "rewinddir(dirhandle)", caller if @_ != 1; + rewinddir($_[0]); +} + +1; diff --git a/lib/auto/POSIX/rmdir.al b/lib/auto/POSIX/rmdir.al new file mode 100644 index 0000000000..a439aa6f93 --- /dev/null +++ b/lib/auto/POSIX/rmdir.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub rmdir { + usage "rmdir(directoryname)", caller if @_ != 1; + rmdir($_[0]); +} + +1; diff --git a/lib/auto/POSIX/scanf.al b/lib/auto/POSIX/scanf.al new file mode 100644 index 0000000000..f15440924d --- /dev/null +++ b/lib/auto/POSIX/scanf.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub scanf { + unimpl "scanf(xxx)", caller if @_ != 123; + scanf($_[0]); +} + +1; diff --git a/lib/auto/POSIX/setbuf.al b/lib/auto/POSIX/setbuf.al new file mode 100644 index 0000000000..96f2e976dd --- /dev/null +++ b/lib/auto/POSIX/setbuf.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub setbuf { + unimpl "setbuf(xxx)", caller if @_ != 123; + setbuf($_[0]); +} + +1; diff --git a/lib/auto/POSIX/setgid.al b/lib/auto/POSIX/setgid.al new file mode 100644 index 0000000000..fcbb8b6f79 --- /dev/null +++ b/lib/auto/POSIX/setgid.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub setgid { + unimpl "setgid(xxx)", caller if @_ != 123; + setgid($_[0]); +} + +1; diff --git a/lib/auto/POSIX/setjmp.al b/lib/auto/POSIX/setjmp.al new file mode 100644 index 0000000000..93e614a32e --- /dev/null +++ b/lib/auto/POSIX/setjmp.al @@ -0,0 +1,8 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub setjmp { + unimpl "setjmp() is C-specific: use eval {} instead", caller; +} + +1; diff --git a/lib/auto/POSIX/setpgid.al b/lib/auto/POSIX/setpgid.al new file mode 100644 index 0000000000..948e79a977 --- /dev/null +++ b/lib/auto/POSIX/setpgid.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub setpgid { + unimpl "setpgid(xxx)", caller if @_ != 123; + setpgid($_[0]); +} + +1; diff --git a/lib/auto/POSIX/setsid.al b/lib/auto/POSIX/setsid.al new file mode 100644 index 0000000000..7edc965f05 --- /dev/null +++ b/lib/auto/POSIX/setsid.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub setsid { + unimpl "setsid(xxx)", caller if @_ != 123; + setsid($_[0]); +} + +1; diff --git a/lib/auto/POSIX/setuid.al b/lib/auto/POSIX/setuid.al new file mode 100644 index 0000000000..02da7d3ab6 --- /dev/null +++ b/lib/auto/POSIX/setuid.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub setuid { + unimpl "setuid(xxx)", caller if @_ != 123; + setuid($_[0]); +} + +1; diff --git a/lib/auto/POSIX/setvbuf.al b/lib/auto/POSIX/setvbuf.al new file mode 100644 index 0000000000..5303581077 --- /dev/null +++ b/lib/auto/POSIX/setvbuf.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub setvbuf { + unimpl "setvbuf(xxx)", caller if @_ != 123; + setvbuf($_[0]); +} + +1; diff --git a/lib/auto/POSIX/sigaction.al b/lib/auto/POSIX/sigaction.al new file mode 100644 index 0000000000..c2b83002b6 --- /dev/null +++ b/lib/auto/POSIX/sigaction.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub sigaction { + unimpl "sigaction(xxx)", caller if @_ != 123; + sigaction($_[0]); +} + +1; diff --git a/lib/auto/POSIX/sigaddset.al b/lib/auto/POSIX/sigaddset.al new file mode 100644 index 0000000000..9a0ea675f7 --- /dev/null +++ b/lib/auto/POSIX/sigaddset.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub sigaddset { + unimpl "sigaddset(xxx)", caller if @_ != 123; + sigaddset($_[0]); +} + +1; diff --git a/lib/auto/POSIX/sigdelset.al b/lib/auto/POSIX/sigdelset.al new file mode 100644 index 0000000000..c252f9f876 --- /dev/null +++ b/lib/auto/POSIX/sigdelset.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub sigdelset { + unimpl "sigdelset(xxx)", caller if @_ != 123; + sigdelset($_[0]); +} + +1; diff --git a/lib/auto/POSIX/sigemptyset.al b/lib/auto/POSIX/sigemptyset.al new file mode 100644 index 0000000000..f665f624e6 --- /dev/null +++ b/lib/auto/POSIX/sigemptyset.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub sigemptyset { + unimpl "sigemptyset(xxx)", caller if @_ != 123; + sigemptyset($_[0]); +} + +1; diff --git a/lib/auto/POSIX/sigfillset.al b/lib/auto/POSIX/sigfillset.al new file mode 100644 index 0000000000..b685797815 --- /dev/null +++ b/lib/auto/POSIX/sigfillset.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub sigfillset { + unimpl "sigfillset(xxx)", caller if @_ != 123; + sigfillset($_[0]); +} + +1; diff --git a/lib/auto/POSIX/sigismember.al b/lib/auto/POSIX/sigismember.al new file mode 100644 index 0000000000..67c9d98eb5 --- /dev/null +++ b/lib/auto/POSIX/sigismember.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub sigismember { + unimpl "sigismember(xxx)", caller if @_ != 123; + sigismember($_[0]); +} + +1; diff --git a/lib/auto/POSIX/siglongjmp.al b/lib/auto/POSIX/siglongjmp.al new file mode 100644 index 0000000000..48ab95ed26 --- /dev/null +++ b/lib/auto/POSIX/siglongjmp.al @@ -0,0 +1,8 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub siglongjmp { + unimpl "siglongjmp() is C-specific: use die instead", caller; +} + +1; diff --git a/lib/auto/POSIX/signal.al b/lib/auto/POSIX/signal.al new file mode 100644 index 0000000000..2471bd302c --- /dev/null +++ b/lib/auto/POSIX/signal.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub signal { + unimpl "signal(xxx)", caller if @_ != 123; + signal($_[0]); +} + +1; diff --git a/lib/auto/POSIX/sigpending.al b/lib/auto/POSIX/sigpending.al new file mode 100644 index 0000000000..bb2c76de5d --- /dev/null +++ b/lib/auto/POSIX/sigpending.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub sigpending { + unimpl "sigpending(xxx)", caller if @_ != 123; + sigpending($_[0]); +} + +1; diff --git a/lib/auto/POSIX/sigprocmask.al b/lib/auto/POSIX/sigprocmask.al new file mode 100644 index 0000000000..a6d42a2d43 --- /dev/null +++ b/lib/auto/POSIX/sigprocmask.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub sigprocmask { + unimpl "sigprocmask(xxx)", caller if @_ != 123; + sigprocmask($_[0]); +} + +1; diff --git a/lib/auto/POSIX/sigsetjmp.al b/lib/auto/POSIX/sigsetjmp.al new file mode 100644 index 0000000000..b737259b1a --- /dev/null +++ b/lib/auto/POSIX/sigsetjmp.al @@ -0,0 +1,8 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub sigsetjmp { + unimpl "sigsetjmp() is C-specific: use eval {} instead", caller; +} + +1; diff --git a/lib/auto/POSIX/sigsuspend.al b/lib/auto/POSIX/sigsuspend.al new file mode 100644 index 0000000000..159f1d5aa6 --- /dev/null +++ b/lib/auto/POSIX/sigsuspend.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub sigsuspend { + unimpl "sigsuspend(xxx)", caller if @_ != 123; + sigsuspend($_[0]); +} + +1; diff --git a/lib/auto/POSIX/sin.al b/lib/auto/POSIX/sin.al new file mode 100644 index 0000000000..90681ff8d9 --- /dev/null +++ b/lib/auto/POSIX/sin.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub sin { + usage "sin(x)", caller if @_ != 1; + sin($_[0]); +} + +1; diff --git a/lib/auto/POSIX/sleep.al b/lib/auto/POSIX/sleep.al new file mode 100644 index 0000000000..ac326e8882 --- /dev/null +++ b/lib/auto/POSIX/sleep.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub sleep { + unimpl "sleep(xxx)", caller if @_ != 123; + sleep($_[0]); +} + +1; diff --git a/lib/auto/POSIX/sprintf.al b/lib/auto/POSIX/sprintf.al new file mode 100644 index 0000000000..5a61a83dd9 --- /dev/null +++ b/lib/auto/POSIX/sprintf.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub sprintf { + unimpl "sprintf(xxx)", caller if @_ != 123; + sprintf($_[0]); +} + +1; diff --git a/lib/auto/POSIX/sqrt.al b/lib/auto/POSIX/sqrt.al new file mode 100644 index 0000000000..f2efe5d76d --- /dev/null +++ b/lib/auto/POSIX/sqrt.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub sqrt { + usage "sqrt(x)", caller if @_ != 1; + sqrt($_[0]); +} + +1; diff --git a/lib/auto/POSIX/srand.al b/lib/auto/POSIX/srand.al new file mode 100644 index 0000000000..563757dcd1 --- /dev/null +++ b/lib/auto/POSIX/srand.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub srand { + unimpl "srand(xxx)", caller if @_ != 123; + srand($_[0]); +} + +1; diff --git a/lib/auto/POSIX/sscanf.al b/lib/auto/POSIX/sscanf.al new file mode 100644 index 0000000000..05701419d7 --- /dev/null +++ b/lib/auto/POSIX/sscanf.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub sscanf { + unimpl "sscanf(xxx)", caller if @_ != 123; + sscanf($_[0]); +} + +1; diff --git a/lib/auto/POSIX/stat.al b/lib/auto/POSIX/stat.al new file mode 100644 index 0000000000..636607eb33 --- /dev/null +++ b/lib/auto/POSIX/stat.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub stat { + usage "stat(filename)", caller if @_ != 1; + stat($_[0]); +} + +1; diff --git a/lib/auto/POSIX/strcat.al b/lib/auto/POSIX/strcat.al new file mode 100644 index 0000000000..b80dd70529 --- /dev/null +++ b/lib/auto/POSIX/strcat.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub strcat { + unimpl "strcat(xxx)", caller if @_ != 123; + strcat($_[0]); +} + +1; diff --git a/lib/auto/POSIX/strchr.al b/lib/auto/POSIX/strchr.al new file mode 100644 index 0000000000..9dbea2e1ec --- /dev/null +++ b/lib/auto/POSIX/strchr.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub strchr { + unimpl "strchr(xxx)", caller if @_ != 123; + strchr($_[0]); +} + +1; diff --git a/lib/auto/POSIX/strcmp.al b/lib/auto/POSIX/strcmp.al new file mode 100644 index 0000000000..72f53043a8 --- /dev/null +++ b/lib/auto/POSIX/strcmp.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub strcmp { + unimpl "strcmp(xxx)", caller if @_ != 123; + strcmp($_[0]); +} + +1; diff --git a/lib/auto/POSIX/strcoll.al b/lib/auto/POSIX/strcoll.al new file mode 100644 index 0000000000..a904097e3f --- /dev/null +++ b/lib/auto/POSIX/strcoll.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub strcoll { + unimpl "strcoll(xxx)", caller if @_ != 123; + strcoll($_[0]); +} + +1; diff --git a/lib/auto/POSIX/strcpy.al b/lib/auto/POSIX/strcpy.al new file mode 100644 index 0000000000..aa3e05d713 --- /dev/null +++ b/lib/auto/POSIX/strcpy.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub strcpy { + unimpl "strcpy(xxx)", caller if @_ != 123; + strcpy($_[0]); +} + +1; diff --git a/lib/auto/POSIX/strcspn.al b/lib/auto/POSIX/strcspn.al new file mode 100644 index 0000000000..00a5c1a968 --- /dev/null +++ b/lib/auto/POSIX/strcspn.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub strcspn { + unimpl "strcspn(xxx)", caller if @_ != 123; + strcspn($_[0]); +} + +1; diff --git a/lib/auto/POSIX/strerror.al b/lib/auto/POSIX/strerror.al new file mode 100644 index 0000000000..d4dbd7eeb9 --- /dev/null +++ b/lib/auto/POSIX/strerror.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub strerror { + unimpl "strerror(xxx)", caller if @_ != 123; + strerror($_[0]); +} + +1; diff --git a/lib/auto/POSIX/strftime.al b/lib/auto/POSIX/strftime.al new file mode 100644 index 0000000000..578b3245c2 --- /dev/null +++ b/lib/auto/POSIX/strftime.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub strftime { + unimpl "strftime(xxx)", caller if @_ != 123; + strftime($_[0]); +} + +1; diff --git a/lib/auto/POSIX/strlen.al b/lib/auto/POSIX/strlen.al new file mode 100644 index 0000000000..afb3a7e025 --- /dev/null +++ b/lib/auto/POSIX/strlen.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub strlen { + unimpl "strlen(xxx)", caller if @_ != 123; + strlen($_[0]); +} + +1; diff --git a/lib/auto/POSIX/strncat.al b/lib/auto/POSIX/strncat.al new file mode 100644 index 0000000000..d5694bdddd --- /dev/null +++ b/lib/auto/POSIX/strncat.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub strncat { + unimpl "strncat(xxx)", caller if @_ != 123; + strncat($_[0]); +} + +1; diff --git a/lib/auto/POSIX/strncmp.al b/lib/auto/POSIX/strncmp.al new file mode 100644 index 0000000000..d85972c0a2 --- /dev/null +++ b/lib/auto/POSIX/strncmp.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub strncmp { + unimpl "strncmp(xxx)", caller if @_ != 123; + strncmp($_[0]); +} + +1; diff --git a/lib/auto/POSIX/strncpy.al b/lib/auto/POSIX/strncpy.al new file mode 100644 index 0000000000..1ebe12dd5a --- /dev/null +++ b/lib/auto/POSIX/strncpy.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub strncpy { + unimpl "strncpy(xxx)", caller if @_ != 123; + strncpy($_[0]); +} + +1; diff --git a/lib/auto/POSIX/stroul.al b/lib/auto/POSIX/stroul.al new file mode 100644 index 0000000000..bbdb71e2ec --- /dev/null +++ b/lib/auto/POSIX/stroul.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub stroul { + unimpl "stroul(xxx)", caller if @_ != 123; + stroul($_[0]); +} + +1; diff --git a/lib/auto/POSIX/strpbrk.al b/lib/auto/POSIX/strpbrk.al new file mode 100644 index 0000000000..ee8bef9a27 --- /dev/null +++ b/lib/auto/POSIX/strpbrk.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub strpbrk { + unimpl "strpbrk(xxx)", caller if @_ != 123; + strpbrk($_[0]); +} + +1; diff --git a/lib/auto/POSIX/strrchr.al b/lib/auto/POSIX/strrchr.al new file mode 100644 index 0000000000..175f3265e3 --- /dev/null +++ b/lib/auto/POSIX/strrchr.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub strrchr { + unimpl "strrchr(xxx)", caller if @_ != 123; + strrchr($_[0]); +} + +1; diff --git a/lib/auto/POSIX/strspn.al b/lib/auto/POSIX/strspn.al new file mode 100644 index 0000000000..1856caea4e --- /dev/null +++ b/lib/auto/POSIX/strspn.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub strspn { + unimpl "strspn(xxx)", caller if @_ != 123; + strspn($_[0]); +} + +1; diff --git a/lib/auto/POSIX/strstr.al b/lib/auto/POSIX/strstr.al new file mode 100644 index 0000000000..c9ef04aa80 --- /dev/null +++ b/lib/auto/POSIX/strstr.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub strstr { + unimpl "strstr(xxx)", caller if @_ != 123; + strstr($_[0]); +} + +1; diff --git a/lib/auto/POSIX/strtod.al b/lib/auto/POSIX/strtod.al new file mode 100644 index 0000000000..44ada12c08 --- /dev/null +++ b/lib/auto/POSIX/strtod.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub strtod { + unimpl "strtod(xxx)", caller if @_ != 123; + strtod($_[0]); +} + +1; diff --git a/lib/auto/POSIX/strtok.al b/lib/auto/POSIX/strtok.al new file mode 100644 index 0000000000..47825149b0 --- /dev/null +++ b/lib/auto/POSIX/strtok.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub strtok { + unimpl "strtok(xxx)", caller if @_ != 123; + strtok($_[0]); +} + +1; diff --git a/lib/auto/POSIX/strtol.al b/lib/auto/POSIX/strtol.al new file mode 100644 index 0000000000..4a40dffa0b --- /dev/null +++ b/lib/auto/POSIX/strtol.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub strtol { + unimpl "strtol(xxx)", caller if @_ != 123; + strtol($_[0]); +} + +1; diff --git a/lib/auto/POSIX/strxfrm.al b/lib/auto/POSIX/strxfrm.al new file mode 100644 index 0000000000..9ad22f1efa --- /dev/null +++ b/lib/auto/POSIX/strxfrm.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub strxfrm { + unimpl "strxfrm(xxx)", caller if @_ != 123; + strxfrm($_[0]); +} + +1; diff --git a/lib/auto/POSIX/sysconf.al b/lib/auto/POSIX/sysconf.al new file mode 100644 index 0000000000..5dfeab8e9d --- /dev/null +++ b/lib/auto/POSIX/sysconf.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub sysconf { + unimpl "sysconf(xxx)", caller if @_ != 123; + sysconf($_[0]); +} + +1; diff --git a/lib/auto/POSIX/system.al b/lib/auto/POSIX/system.al new file mode 100644 index 0000000000..c143ca1e23 --- /dev/null +++ b/lib/auto/POSIX/system.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub system { + usage "system(command)", caller if @_ != 1; + system($_[0]); +} + +1; diff --git a/lib/auto/POSIX/tan.al b/lib/auto/POSIX/tan.al new file mode 100644 index 0000000000..a86b877f3f --- /dev/null +++ b/lib/auto/POSIX/tan.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub tan { + usage "tan(x)", caller if @_ != 1; + tan($_[0]); +} + +1; diff --git a/lib/auto/POSIX/tcdrain.al b/lib/auto/POSIX/tcdrain.al new file mode 100644 index 0000000000..97ea14f0ab --- /dev/null +++ b/lib/auto/POSIX/tcdrain.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub tcdrain { + unimpl "tcdrain(xxx)", caller if @_ != 123; + tcdrain($_[0]); +} + +1; diff --git a/lib/auto/POSIX/tcflow.al b/lib/auto/POSIX/tcflow.al new file mode 100644 index 0000000000..690587aa46 --- /dev/null +++ b/lib/auto/POSIX/tcflow.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub tcflow { + unimpl "tcflow(xxx)", caller if @_ != 123; + tcflow($_[0]); +} + +1; diff --git a/lib/auto/POSIX/tcflush.al b/lib/auto/POSIX/tcflush.al new file mode 100644 index 0000000000..733ab16425 --- /dev/null +++ b/lib/auto/POSIX/tcflush.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub tcflush { + unimpl "tcflush(xxx)", caller if @_ != 123; + tcflush($_[0]); +} + +1; diff --git a/lib/auto/POSIX/tcgetattr.al b/lib/auto/POSIX/tcgetattr.al new file mode 100644 index 0000000000..c8a5e09b6e --- /dev/null +++ b/lib/auto/POSIX/tcgetattr.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub tcgetattr { + unimpl "tcgetattr(xxx)", caller if @_ != 123; + tcgetattr($_[0]); +} + +1; diff --git a/lib/auto/POSIX/tcgetpgrp.al b/lib/auto/POSIX/tcgetpgrp.al new file mode 100644 index 0000000000..8b6f884f2b --- /dev/null +++ b/lib/auto/POSIX/tcgetpgrp.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub tcgetpgrp { + unimpl "tcgetpgrp(xxx)", caller if @_ != 123; + tcgetpgrp($_[0]); +} + +1; diff --git a/lib/auto/POSIX/tcsendbreak.al b/lib/auto/POSIX/tcsendbreak.al new file mode 100644 index 0000000000..e90b7fabd3 --- /dev/null +++ b/lib/auto/POSIX/tcsendbreak.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub tcsendbreak { + unimpl "tcsendbreak(xxx)", caller if @_ != 123; + tcsendbreak($_[0]); +} + +1; diff --git a/lib/auto/POSIX/tcsetattr.al b/lib/auto/POSIX/tcsetattr.al new file mode 100644 index 0000000000..1735cf6862 --- /dev/null +++ b/lib/auto/POSIX/tcsetattr.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub tcsetattr { + unimpl "tcsetattr(xxx)", caller if @_ != 123; + tcsetattr($_[0]); +} + +1; diff --git a/lib/auto/POSIX/tcsetpgrp.al b/lib/auto/POSIX/tcsetpgrp.al new file mode 100644 index 0000000000..9dcff24b8c --- /dev/null +++ b/lib/auto/POSIX/tcsetpgrp.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub tcsetpgrp { + unimpl "tcsetpgrp(xxx)", caller if @_ != 123; + tcsetpgrp($_[0]); +} + +1; diff --git a/lib/auto/POSIX/time.al b/lib/auto/POSIX/time.al new file mode 100644 index 0000000000..d750d24e90 --- /dev/null +++ b/lib/auto/POSIX/time.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub time { + unimpl "time(xxx)", caller if @_ != 123; + time($_[0]); +} + +1; diff --git a/lib/auto/POSIX/times.al b/lib/auto/POSIX/times.al new file mode 100644 index 0000000000..d8f588ad63 --- /dev/null +++ b/lib/auto/POSIX/times.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub times { + usage "times()", caller if @_ != 0; + times(); +} + +1; diff --git a/lib/auto/POSIX/tmpfile.al b/lib/auto/POSIX/tmpfile.al new file mode 100644 index 0000000000..7adb01fb9b --- /dev/null +++ b/lib/auto/POSIX/tmpfile.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub tmpfile { + unimpl "tmpfile(xxx)", caller if @_ != 123; + tmpfile($_[0]); +} + +1; diff --git a/lib/auto/POSIX/tmpnam.al b/lib/auto/POSIX/tmpnam.al new file mode 100644 index 0000000000..23e7dfb11b --- /dev/null +++ b/lib/auto/POSIX/tmpnam.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub tmpnam { + unimpl "tmpnam(xxx)", caller if @_ != 123; + tmpnam($_[0]); +} + +1; diff --git a/lib/auto/POSIX/tolower.al b/lib/auto/POSIX/tolower.al new file mode 100644 index 0000000000..8bcbb8494a --- /dev/null +++ b/lib/auto/POSIX/tolower.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub tolower { + usage "tolower(string)", caller if @_ != 1; + lc($_[0]); +} + +1; diff --git a/lib/auto/POSIX/toupper.al b/lib/auto/POSIX/toupper.al new file mode 100644 index 0000000000..e8b4c0b4ff --- /dev/null +++ b/lib/auto/POSIX/toupper.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub toupper { + usage "toupper(string)", caller if @_ != 1; + uc($_[0]); +} + +1; diff --git a/lib/auto/POSIX/ttyname.al b/lib/auto/POSIX/ttyname.al new file mode 100644 index 0000000000..60f39dc5f4 --- /dev/null +++ b/lib/auto/POSIX/ttyname.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub ttyname { + unimpl "ttyname(xxx)", caller if @_ != 123; + ttyname($_[0]); +} + +1; diff --git a/lib/auto/POSIX/tzname.al b/lib/auto/POSIX/tzname.al new file mode 100644 index 0000000000..86e7019547 --- /dev/null +++ b/lib/auto/POSIX/tzname.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub tzname { + unimpl "tzname(xxx)", caller if @_ != 123; + tzname($_[0]); +} + +1; diff --git a/lib/auto/POSIX/tzset.al b/lib/auto/POSIX/tzset.al new file mode 100644 index 0000000000..44b5b0a878 --- /dev/null +++ b/lib/auto/POSIX/tzset.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub tzset { + unimpl "tzset(xxx)", caller if @_ != 123; + tzset($_[0]); +} + +1; diff --git a/lib/auto/POSIX/umask.al b/lib/auto/POSIX/umask.al new file mode 100644 index 0000000000..e7c7fc71d3 --- /dev/null +++ b/lib/auto/POSIX/umask.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub umask { + usage "umask(mask)", caller if @_ != 1; + umask($_[0]); +} + +1; diff --git a/lib/auto/POSIX/ungetc.al b/lib/auto/POSIX/ungetc.al new file mode 100644 index 0000000000..76c426e72e --- /dev/null +++ b/lib/auto/POSIX/ungetc.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub ungetc { + unimpl "ungetc(xxx)", caller if @_ != 123; + ungetc($_[0]); +} + +1; diff --git a/lib/auto/POSIX/unlink.al b/lib/auto/POSIX/unlink.al new file mode 100644 index 0000000000..798ce431d8 --- /dev/null +++ b/lib/auto/POSIX/unlink.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub unlink { + usage "unlink(filename)", caller if @_ != 1; + unlink($_[0]); +} + +1; diff --git a/lib/auto/POSIX/utime.al b/lib/auto/POSIX/utime.al new file mode 100644 index 0000000000..fff416df89 --- /dev/null +++ b/lib/auto/POSIX/utime.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub utime { + usage "utime(filename, atime, mtime)", caller if @_ != 3; + utime($_[1], $_[2], $_[0]); +} + +1; diff --git a/lib/auto/POSIX/vfprintf.al b/lib/auto/POSIX/vfprintf.al new file mode 100644 index 0000000000..b18f42fd85 --- /dev/null +++ b/lib/auto/POSIX/vfprintf.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub vfprintf { + unimpl "vfprintf(xxx)", caller if @_ != 123; + vfprintf($_[0]); +} + +1; diff --git a/lib/auto/POSIX/vprintf.al b/lib/auto/POSIX/vprintf.al new file mode 100644 index 0000000000..f295a99906 --- /dev/null +++ b/lib/auto/POSIX/vprintf.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub vprintf { + unimpl "vprintf(xxx)", caller if @_ != 123; + vprintf($_[0]); +} + +1; diff --git a/lib/auto/POSIX/vsprintf.al b/lib/auto/POSIX/vsprintf.al new file mode 100644 index 0000000000..c8e00c7803 --- /dev/null +++ b/lib/auto/POSIX/vsprintf.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub vsprintf { + unimpl "vsprintf(xxx)", caller if @_ != 123; + vsprintf($_[0]); +} + +1; diff --git a/lib/auto/POSIX/wait.al b/lib/auto/POSIX/wait.al new file mode 100644 index 0000000000..489b1e3b07 --- /dev/null +++ b/lib/auto/POSIX/wait.al @@ -0,0 +1,11 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub wait { + usage "wait(statusvariable)", caller if @_ != 1; + local $result = wait(); + $_[0] = $?; + $result; +} + +1; diff --git a/lib/auto/POSIX/waitpid.al b/lib/auto/POSIX/waitpid.al new file mode 100644 index 0000000000..a7706a7243 --- /dev/null +++ b/lib/auto/POSIX/waitpid.al @@ -0,0 +1,11 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub waitpid { + usage "waitpid(pid, statusvariable, options)", caller if @_ != 3; + local $result = waitpid($_[0], $_[2]); + $_[1] = $?; + $result; +} + +1; diff --git a/lib/auto/POSIX/wcstombs.al b/lib/auto/POSIX/wcstombs.al new file mode 100644 index 0000000000..1f8782b9d6 --- /dev/null +++ b/lib/auto/POSIX/wcstombs.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub wcstombs { + unimpl "wcstombs(xxx)", caller if @_ != 123; + wcstombs($_[0]); +} + +1; diff --git a/lib/auto/POSIX/wctomb.al b/lib/auto/POSIX/wctomb.al new file mode 100644 index 0000000000..e4ccf87cb9 --- /dev/null +++ b/lib/auto/POSIX/wctomb.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub wctomb { + unimpl "wctomb(xxx)", caller if @_ != 123; + wctomb($_[0]); +} + +1; diff --git a/lib/auto/POSIX/write.al b/lib/auto/POSIX/write.al new file mode 100644 index 0000000000..2306b69a01 --- /dev/null +++ b/lib/auto/POSIX/write.al @@ -0,0 +1,9 @@ +# NOTE: Derived from POSIX.pm. Changes made here will be lost. +package POSIX; + +sub write { + unimpl "write(xxx)", caller if @_ != 123; + write($_[0]); +} + +1; |