diff options
| author | Arnold D. Robbins <arnold@skeeve.com> | 2016-12-22 17:29:53 +0200 |
|---|---|---|
| committer | Arnold D. Robbins <arnold@skeeve.com> | 2016-12-22 17:29:53 +0200 |
| commit | 2af62b50e5b9574c0e169fb4d99c4912e56eef1f (patch) | |
| tree | f4f264291d6597090fb36fc7f7cd725a105f557c /extension/rwarray.c | |
| parent | 1358693d2464c89a8d715fa6104ed36b48e45990 (diff) | |
| parent | 0f15f82e19b32823fe3fdf51052389ca3b60e92e (diff) | |
| download | egawk-2af62b50e5b9574c0e169fb4d99c4912e56eef1f.tar.gz egawk-2af62b50e5b9574c0e169fb4d99c4912e56eef1f.tar.bz2 egawk-2af62b50e5b9574c0e169fb4d99c4912e56eef1f.zip | |
Merge branch 'master' into feature/fix-comments
Diffstat (limited to 'extension/rwarray.c')
| -rw-r--r-- | extension/rwarray.c | 14 |
1 files changed, 4 insertions, 10 deletions
diff --git a/extension/rwarray.c b/extension/rwarray.c index 15e121af..00ded7bf 100644 --- a/extension/rwarray.c +++ b/extension/rwarray.c @@ -99,7 +99,7 @@ static awk_bool_t read_value(FILE *fp, awk_value_t *value); /* do_writea --- write an array */ static awk_value_t * -do_writea(int nargs, awk_value_t *result) +do_writea(int nargs, awk_value_t *result, struct awk_ext_func *unused) { awk_value_t filename, array; FILE *fp = NULL; @@ -109,9 +109,6 @@ do_writea(int nargs, awk_value_t *result) assert(result != NULL); make_number(0.0, result); - if (do_lint && nargs > 2) - lintwarn(ext_id, _("writea: called with too many arguments")); - if (nargs < 2) goto out; @@ -254,7 +251,7 @@ write_value(FILE *fp, awk_value_t *val) /* do_reada --- read an array */ static awk_value_t * -do_reada(int nargs, awk_value_t *result) +do_reada(int nargs, awk_value_t *result, struct awk_ext_func *unused) { awk_value_t filename, array; FILE *fp = NULL; @@ -265,9 +262,6 @@ do_reada(int nargs, awk_value_t *result) assert(result != NULL); make_number(0.0, result); - if (do_lint && nargs > 2) - lintwarn(ext_id, _("reada: called with too many arguments")); - if (nargs < 2) goto out; @@ -470,8 +464,8 @@ read_value(FILE *fp, awk_value_t *value) } static awk_ext_func_t func_table[] = { - { "writea", do_writea, 2 }, - { "reada", do_reada, 2 }, + { "writea", do_writea, 2, 2, awk_false, NULL }, + { "reada", do_reada, 2, 2, awk_false, NULL }, }; |