From 4625e0eabc91d3e49404a6463e9ed8b2548b05b9 Mon Sep 17 00:00:00 2001
From: Bart Schaefer <barts@users.sourceforge.net>
Date: Tue, 18 Mar 2008 15:14:20 +0000
Subject: 24717, 24718, 24719: a 0 subscript is neither valid nor equivalent to
 1 any longer, so the (i) subscript flag on an empty array needs to yield 1.

---
 Src/params.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'Src/params.c')

diff --git a/Src/params.c b/Src/params.c
index f7534472c..d7135c438 100644
--- a/Src/params.c
+++ b/Src/params.c
@@ -1317,7 +1317,7 @@ getarg(char **str, int *inv, Value v, int a2, zlong *w,
 	    } else
 		ta = getarrvalue(v);
 	    if (!ta || !*ta)
-		return 0;
+		return !down;
 	    len = arrlen(ta);
 	    if (beg < 0)
 		beg += len;
-- 
cgit 1.4.1