diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 1997-11-11 23:08:54 +0000 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 1997-11-11 23:08:54 +0000 |
commit | e7cd54d7e2bd82a89f30e2f71675be1f5d3be34d (patch) | |
tree | f6873b8c4849ed68422779287f972403412a3412 /ext/Fcntl/Fcntl.xs | |
parent | 1d64a758d60d7ded97c59c753fea85d3365ca0df (diff) | |
parent | 004955206412e3e53b76d4dad6bc7ac3032c300a (diff) | |
download | perl-e7cd54d7e2bd82a89f30e2f71675be1f5d3be34d.tar.gz |
Initial (untested) integration of mainline changes.
p4raw-id: //depot/win32/perl@234
Diffstat (limited to 'ext/Fcntl/Fcntl.xs')
-rw-r--r-- | ext/Fcntl/Fcntl.xs | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/ext/Fcntl/Fcntl.xs b/ext/Fcntl/Fcntl.xs index 9034031c9c..251f3f4176 100644 --- a/ext/Fcntl/Fcntl.xs +++ b/ext/Fcntl/Fcntl.xs @@ -23,17 +23,14 @@ */ static int -not_here(s) -char *s; +not_here(char *s) { croak("%s not implemented on this architecture", s); return -1; } static double -constant(name, arg) -char *name; -int arg; +constant(char *name, int arg) { errno = 0; switch (*name) { |