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/GDBM_File | |
| 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/GDBM_File')
| -rw-r--r-- | ext/GDBM_File/GDBM_File.xs | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/ext/GDBM_File/GDBM_File.xs b/ext/GDBM_File/GDBM_File.xs index a423c88c70..ac1ca8c68d 100644 --- a/ext/GDBM_File/GDBM_File.xs +++ b/ext/GDBM_File/GDBM_File.xs @@ -23,8 +23,7 @@ typedef datum gdatum; typedef void (*FATALFUNC)(); static int -not_here(s) -char *s; +not_here(char *s) { croak("GDBM_File::%s not implemented on this architecture", s); return -1; @@ -41,9 +40,7 @@ char *s; #endif static double -constant(name, arg) -char *name; -int arg; +constant(char *name, int arg) { errno = 0; switch (*name) { |