summaryrefslogtreecommitdiff
path: root/ext/SDBM_File
diff options
context:
space:
mode:
authorAaron Crane <arc@cpan.org>2017-10-12 18:50:15 +0200
committerAaron Crane <arc@cpan.org>2017-10-21 16:52:27 +0100
commit3d97541cde09d330e1c16246cbe085f4717abb01 (patch)
tree7449d10641b981b261f2989f41c009dddc476b4f /ext/SDBM_File
parentc9db53f47fcab6bc813d34e149444282f9aef29c (diff)
downloadperl-3d97541cde09d330e1c16246cbe085f4717abb01.tar.gz
Rely on C89 prototypes
The Configure changes here were generated using a version of metaconfig that modifies the prototype.U and Protochk.U units to assume that C89 prototypes work.
Diffstat (limited to 'ext/SDBM_File')
-rw-r--r--ext/SDBM_File/pair.c2
-rw-r--r--ext/SDBM_File/pair.h18
-rw-r--r--ext/SDBM_File/sdbm.c14
-rw-r--r--ext/SDBM_File/sdbm.h34
4 files changed, 31 insertions, 37 deletions
diff --git a/ext/SDBM_File/pair.c b/ext/SDBM_File/pair.c
index 5bbd873c03..2e4d8074e5 100644
--- a/ext/SDBM_File/pair.c
+++ b/ext/SDBM_File/pair.c
@@ -22,7 +22,7 @@
/*
* forward
*/
-static int seepair proto((char *, int, const char *, int));
+static int seepair(char *, int, const char *, int);
/*
* page format:
diff --git a/ext/SDBM_File/pair.h b/ext/SDBM_File/pair.h
index b6944edd07..7191556a70 100644
--- a/ext/SDBM_File/pair.h
+++ b/ext/SDBM_File/pair.h
@@ -9,14 +9,14 @@
#define putpair sdbm__putpair
#define splpage sdbm__splpage
-extern int fitpair proto((char *, int));
-extern void putpair proto((char *, datum, datum));
-extern datum getpair proto((char *, datum));
-extern int exipair proto((char *, datum));
-extern int delpair proto((char *, datum));
-extern int chkpage proto((char *));
-extern datum getnkey proto((char *, int));
-extern void splpage proto((char *, char *, long));
+extern int fitpair(char *, int);
+extern void putpair(char *, datum, datum);
+extern datum getpair(char *, datum);
+extern int exipair(char *, datum);
+extern int delpair(char *, datum);
+extern int chkpage(char *);
+extern datum getnkey(char *, int);
+extern void splpage(char *, char *, long);
#ifdef SEEDUPS
-extern int duppair proto((char *, datum));
+extern int duppair(char *, datum);
#endif
diff --git a/ext/SDBM_File/sdbm.c b/ext/SDBM_File/sdbm.c
index cf5dc75d27..e055f08701 100644
--- a/ext/SDBM_File/sdbm.c
+++ b/ext/SDBM_File/sdbm.c
@@ -41,8 +41,8 @@
extern "C" {
#endif
-extern Malloc_t malloc proto((MEM_SIZE));
-extern Free_t free proto((Malloc_t));
+extern Malloc_t malloc(MEM_SIZE);
+extern Free_t free(Malloc_t);
#ifdef __cplusplus
}
@@ -53,11 +53,11 @@ const datum nullitem = {0, 0};
/*
* forward
*/
-static int getdbit proto((DBM *, long));
-static int setdbit proto((DBM *, long));
-static int getpage proto((DBM *, long));
-static datum getnext proto((DBM *));
-static int makroom proto((DBM *, long, int));
+static int getdbit(DBM *, long);
+static int setdbit(DBM *, long);
+static int getpage(DBM *, long);
+static datum getnext(DBM *);
+static int makroom(DBM *, long, int);
/*
* useful macros
diff --git a/ext/SDBM_File/sdbm.h b/ext/SDBM_File/sdbm.h
index 1c1151ab47..d5511daeef 100644
--- a/ext/SDBM_File/sdbm.h
+++ b/ext/SDBM_File/sdbm.h
@@ -53,12 +53,6 @@ typedef struct {
extern const datum nullitem;
-#if defined(__STDC__) || defined(__cplusplus) || defined(CAN_PROTOTYPE)
-#define proto(p) p
-#else
-#define proto(p) ()
-#endif
-
/*
* flags to sdbm_store
*/
@@ -68,20 +62,20 @@ extern const datum nullitem;
/*
* ndbm interface
*/
-extern DBM *sdbm_open proto((char *, int, int));
-extern void sdbm_close proto((DBM *));
-extern datum sdbm_fetch proto((DBM *, datum));
-extern int sdbm_delete proto((DBM *, datum));
-extern int sdbm_store proto((DBM *, datum, datum, int));
-extern datum sdbm_firstkey proto((DBM *));
-extern datum sdbm_nextkey proto((DBM *));
-extern int sdbm_exists proto((DBM *, datum));
+extern DBM *sdbm_open(char *, int, int);
+extern void sdbm_close(DBM *);
+extern datum sdbm_fetch(DBM *, datum);
+extern int sdbm_delete(DBM *, datum);
+extern int sdbm_store(DBM *, datum, datum, int);
+extern datum sdbm_firstkey(DBM *);
+extern datum sdbm_nextkey(DBM *);
+extern int sdbm_exists(DBM *, datum);
/*
* other
*/
-extern DBM *sdbm_prep proto((char *, char *, int, int));
-extern long sdbm_hash proto((const char *, int));
+extern DBM *sdbm_prep(char *, char *, int, int);
+extern long sdbm_hash(const char *, int);
#ifndef SDBM_ONLY
#define dbm_open sdbm_open
@@ -179,10 +173,10 @@ extern long sdbm_hash proto((const char *, int));
extern "C" {
#endif
-Malloc_t Perl_malloc proto((MEM_SIZE nbytes));
-Malloc_t Perl_calloc proto((MEM_SIZE elements, MEM_SIZE size));
-Malloc_t Perl_realloc proto((Malloc_t where, MEM_SIZE nbytes));
-Free_t Perl_mfree proto((Malloc_t where));
+Malloc_t Perl_malloc(MEM_SIZE nbytes);
+Malloc_t Perl_calloc(MEM_SIZE elements, MEM_SIZE size);
+Malloc_t Perl_realloc(Malloc_t where, MEM_SIZE nbytes);
+Free_t Perl_mfree(Malloc_t where);
#ifdef __cplusplus
}