From 85850097fb590eb235dab23579dae1cbd779c75c Mon Sep 17 00:00:00 2001
From: Bart Schaefer <barts@users.sourceforge.net>
Date: Sun, 25 Mar 2001 03:03:20 +0000
Subject: A couple of regression tests.

---
 ChangeLog             |  2 ++
 Test/13parameter.ztst | 37 +++++++++++++++++++++++++++++++++++++
 2 files changed, 39 insertions(+)

diff --git a/ChangeLog b/ChangeLog
index 62fa46e35..878727722 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -7,6 +7,8 @@
 
 2001-03-24  Bart Schaefer  <schaefer@zsh.org>
 
+	* 13746: Test/13parameter.ztst: Add tests for fixes from 13492.
+
 	* 13744: Test/01grammar.ztst, Test/10prompt.ztst,
 	Test/13parameter.ztst, Test/ztst.zsh: Delete or correct comments
 	that refer to (non-)bugs or other confusion; enable another test;
diff --git a/Test/13parameter.ztst b/Test/13parameter.ztst
index 735021f51..7304f31d7 100644
--- a/Test/13parameter.ztst
+++ b/Test/13parameter.ztst
@@ -489,3 +489,40 @@
 >1
 >a
 > b
+
+  set If "this test fails" "we have broken" the shell again
+  print -l ${1+"$@"}
+0:Regression test of ${1+"$@"} bug
+>If
+>this test fails
+>we have broken
+>the
+>shell
+>again
+
+  set If "this test fails" "we have broken" the shell again
+  print -l "${(A)foo::=$@}"
+  print -l $foo
+0:Regression test of "${(A)foo=$@}" bug
+>If this test fails we have broken the shell again
+>If
+>this test fails
+>we have broken
+>the
+>shell
+>again
+
+  set If "this test fails" maybe "we have finally fixed" the shell
+  print -l ${=1+"$@"}
+0:Regression test of unfixed ${=1+"$@"} bug
+>If
+>this
+>test
+>fails
+>maybe
+>we
+>have
+>finally
+>fixed
+>the
+>shell
-- 
cgit 1.4.1