diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2010-04-09 00:01:38 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2010-04-09 00:32:14 +0200 |
| commit | b577bc90bbaadfac508acc809e59b983db33b7aa (patch) | |
| tree | fc5f0af8b3533341e7f42c1cf1365ed2214ea45a | |
| parent | 1606312f9a1200950336d485bd29866c0f8e3942 (diff) | |
| download | guile-b577bc90bbaadfac508acc809e59b983db33b7aa.tar.gz | |
Avoid obsolescent C declarator with empty parentheses.
* libguile/foreign.c (scm_i_foreign_call): Don't declare FUNC with a
declarator with empty parentheses (bug #23681).
| -rw-r--r-- | libguile/foreign.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/foreign.c b/libguile/foreign.c index 9f307ef6f..3281744ad 100644 --- a/libguile/foreign.c +++ b/libguile/foreign.c @@ -966,7 +966,7 @@ scm_i_foreign_call (SCM foreign, const SCM *argv) /* FOREIGN is the pair that cif_to_procedure set as the 0th element of the objtable. */ ffi_cif *cif; - void (*func)(); + void (*func) (void); scm_t_uint8 *data; void *rvalue; void **args; @@ -978,7 +978,7 @@ scm_i_foreign_call (SCM foreign, const SCM *argv) func = SCM_FOREIGN_POINTER (SCM_CDR (foreign), void); /* Argument pointers. */ - args = alloca (sizeof(void*) * cif->nargs); + args = alloca (sizeof (void *) * cif->nargs); /* Compute the amount of memory needed to store all the argument values. Note: as of libffi 3.0.9 `cif->bytes' is undocumented and is zero, so it |