From cd1b74c3036afb2fc115538e130fecbfa6259ff4 Mon Sep 17 00:00:00 2001
From: Paul Ackersviller <packersv@users.sourceforge.net>
Date: Tue, 20 Nov 2007 03:21:01 +0000
Subject: Merge of 23696: assignment to negative subscripts in scalars before
 the start was broken; now adds at start.

---
 Test/D04parameter.ztst | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)

(limited to 'Test/D04parameter.ztst')

diff --git a/Test/D04parameter.ztst b/Test/D04parameter.ztst
index 6abba0ab3..908342e20 100644
--- a/Test/D04parameter.ztst
+++ b/Test/D04parameter.ztst
@@ -660,3 +660,19 @@
 >andsomekept
 >andsomekept
 
+  x=sprodj
+  x[-10]=scrumf
+  print $x
+0:Out of range negative scalar subscripts
+>scrumfsprodj
+
+  a=(some sunny day)
+  a[-10]=(we\'ll meet again)
+  print -l $a
+0:Out of range negative array subscripts
+>we'll
+>meet
+>again
+>some
+>sunny
+>day
-- 
cgit 1.4.1