diff options
| -rw-r--r-- | ChangeLog | 9 | ||||
| -rw-r--r-- | awk.h | 6 | ||||
| -rw-r--r-- | ext.c | 4 | ||||
| -rw-r--r-- | gawkapi.c | 6 |
4 files changed, 17 insertions, 8 deletions
@@ -1,3 +1,12 @@ +2016-05-26 Andrew J. Schorr <aschorr@telemetry-investments.com> + + * awk.h (get_actual_argument): Remove unused "optional" argument. + (get_scalar_argument, get_array_argument): Change macro definition to + remove 3rd "optional" argument. + * ext.c (get_actual_argument): Remove unused "optional" argument. + * gawkapi.c (api_get_argument, api_set_argument): Remove unused final + argument to get_array_argument and get_scalar_argument. + 2016-05-26 Arnold D. Robbins <arnold@skeeve.com> * awk.h [fatal]: Make parentheses and use of indirection @@ -1449,9 +1449,9 @@ extern void close_extensions(void); #ifdef DYNAMIC extern awk_bool_t make_builtin(const awk_ext_func_t *); extern NODE *get_argument(int); -extern NODE *get_actual_argument(NODE *, int, bool, bool); -#define get_scalar_argument(n, i, opt) get_actual_argument((n), (i), (opt), false) -#define get_array_argument(n, i, opt) get_actual_argument((n), (i), (opt), true) +extern NODE *get_actual_argument(NODE *, int, bool); +#define get_scalar_argument(n, i) get_actual_argument((n), (i), false) +#define get_array_argument(n, i) get_actual_argument((n), (i), true) #endif /* field.c */ extern void init_fields(void); @@ -183,11 +183,11 @@ get_argument(int i) /* * get_actual_argument --- get the i'th scalar or array argument of a - * dynamically linked function, allowed to be optional. + * dynamically linked function. */ NODE * -get_actual_argument(NODE *t, int i, bool optional, bool want_array) +get_actual_argument(NODE *t, int i, bool want_array) { char *fname; INSTRUCTION *pc; @@ -87,7 +87,7 @@ api_get_argument(awk_ext_id_t id, size_t count, array: /* get the array here */ - arg = get_array_argument(arg, count, false); + arg = get_array_argument(arg, count); if (arg == NULL) return awk_false; @@ -95,7 +95,7 @@ array: scalar: /* at this point we have a real type that is not an array */ - arg = get_scalar_argument(arg, count, false); + arg = get_scalar_argument(arg, count); if (arg == NULL) return awk_false; @@ -125,7 +125,7 @@ api_set_argument(awk_ext_id_t id, || arg->type != Node_var_new) return awk_false; - arg = get_array_argument(arg, count, false); + arg = get_array_argument(arg, count); if (arg == NULL) return awk_false; |