From c335b7f0a11d8af8035fc49a743d9dea92766342 Mon Sep 17 00:00:00 2001 From: Peter Stephenson Date: Wed, 25 Apr 2012 09:31:57 +0000 Subject: 30455: remove max array length test --- Src/params.c | 13 +++++++++++++ 1 file changed, 13 insertions(+) (limited to 'Src/params.c') diff --git a/Src/params.c b/Src/params.c index 24062e03a..966e3afcc 100644 --- a/Src/params.c +++ b/Src/params.c @@ -1905,6 +1905,18 @@ fetchvalue(Value v, char **pptr, int bracks, int flags) if (!bracks && *s) return NULL; *pptr = s; +#if 0 + /* + * Check for large subscripts that might be erroneous. + * This code is too gross in several ways: + * - the limit is completely arbitrary + * - the test vetoes operations on existing arrays + * - it's not at all clear a general test on large arrays of + * this kind is any use. + * + * Until someone comes up with workable replacement code it's + * therefore commented out. + */ if (v->start > MAX_ARRLEN) { zerr("subscript too %s: %d", "big", v->start + !isset(KSHARRAYS)); return NULL; @@ -1921,6 +1933,7 @@ fetchvalue(Value v, char **pptr, int bracks, int flags) zerr("subscript too %s: %d", "small", v->end); return NULL; } +#endif return v; } -- cgit 1.4.1