From 85c0d5edb781c9f31b79e48452b1ca68643f41de Mon Sep 17 00:00:00 2001
From: "Arnold D. Robbins" <arnold@skeeve.com>
Date: Fri, 16 Jul 2010 14:40:49 +0300
Subject: Move to gawk-3.1.4.

---
 extension/arrayparm.c | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

(limited to 'extension/arrayparm.c')

diff --git a/extension/arrayparm.c b/extension/arrayparm.c
index 6c627d65..d2e18d5b 100644
--- a/extension/arrayparm.c
+++ b/extension/arrayparm.c
@@ -6,10 +6,11 @@
  * 10/2001
  *
  * Revised 7/2003
+ * Revised 6/2004
  */
 
 /*
- * Copyright (C) 2001, 2003 the Free Software Foundation, Inc.
+ * Copyright (C) 2001, 2003, 2004 the Free Software Foundation, Inc.
  * 
  * This file is part of GAWK, the GNU implementation of the
  * AWK Programming Language.
@@ -47,7 +48,7 @@ NODE *tree;
 	NODE *var, *sub, *val;
 	NODE **elemval;
 
-	if  (do_lint && tree->param_cnt > 3)
+	if  (do_lint && get_curfunc_arg_count() > 3)
 		lintwarn("mkarray: called with too many arguments");
 
 	var = get_argument(tree, 0);
-- 
cgit v1.2.3