diff options
| author | Arnold D. Robbins <arnold@skeeve.com> | 2010-07-16 14:40:49 +0300 |
|---|---|---|
| committer | Arnold D. Robbins <arnold@skeeve.com> | 2010-07-16 14:40:49 +0300 |
| commit | 85c0d5edb781c9f31b79e48452b1ca68643f41de (patch) | |
| tree | 14efbc59b30cdd626a208d6391f3ed226387054e /extension/readfile.c | |
| parent | 6cc7d587a710606d3fe52222707739c7cc1b8651 (diff) | |
| download | egawk-85c0d5edb781c9f31b79e48452b1ca68643f41de.tar.gz egawk-85c0d5edb781c9f31b79e48452b1ca68643f41de.tar.bz2 egawk-85c0d5edb781c9f31b79e48452b1ca68643f41de.zip | |
Move to gawk-3.1.4.
Diffstat (limited to 'extension/readfile.c')
| -rw-r--r-- | extension/readfile.c | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/extension/readfile.c b/extension/readfile.c index 65f0efca..d9a01ffd 100644 --- a/extension/readfile.c +++ b/extension/readfile.c @@ -5,10 +5,12 @@ * Tue Apr 23 17:43:30 IDT 2002 * Revised per Peter Tillier * Mon Jun 9 17:05:11 IDT 2003 + * Revised for new dynamic function facilities + * Mon Jun 14 14:53:07 IDT 2004 */ /* - * Copyright (C) 2002, 2003 the Free Software Foundation, Inc. + * Copyright (C) 2002, 2003, 2004 the Free Software Foundation, Inc. * * This file is part of GAWK, the GNU implementation of the * AWK Programming Language. @@ -47,7 +49,7 @@ NODE *tree; char *text; int fd; - if (do_lint && tree->param_cnt > 1) + if (do_lint && get_curfunc_arg_count() > 1) lintwarn("readfile: called with too many arguments"); filename = get_argument(tree, 0); |