From c9ab2bf594acca387cc7f91d2dd99523284de64e Mon Sep 17 00:00:00 2001
From: Peter Stephenson <p.w.stephenson@ntlworld.com>
Date: Sun, 21 Jun 2015 21:39:09 +0100
Subject: Very basic tests for typeset reserved word inteface.

---
 Test/B02typeset.ztst | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)

diff --git a/Test/B02typeset.ztst b/Test/B02typeset.ztst
index 1819b6c84..75c475cb4 100644
--- a/Test/B02typeset.ztst
+++ b/Test/B02typeset.ztst
@@ -508,3 +508,20 @@
 >a2=(three four)
 >typeset -r r1=yes
 >typeset -r r2=no
+
+  one=hidden two=hidden three=hidden four=hidden five=hidden
+  fn() {
+     local bleugh="four=vier"
+     typeset -R10 one=eins two=(zwei dio) three $bleugh five=(cinq cinque)
+     three=drei
+     print -l $one $two $three $four $five
+  }
+  fn
+0:typeset reserved word interface: basic
+>      eins
+>zwei
+>dio
+>      drei
+>      vier
+>cinq
+>cinque
-- 
cgit 1.4.1