From 2b948e6c375a540129883272f9c4e118ada8ab1e Mon Sep 17 00:00:00 2001
From: Peter Stephenson <pws@users.sourceforge.net>
Date: Sat, 27 Jan 2007 23:52:13 +0000
Subject: 23138: further tweak to backslashes in $'...'

---
 Test/A03quoting.ztst | 14 ++++++++++++++
 1 file changed, 14 insertions(+)

(limited to 'Test')

diff --git a/Test/A03quoting.ztst b/Test/A03quoting.ztst
index 3187382a8..54005ebe3 100644
--- a/Test/A03quoting.ztst
+++ b/Test/A03quoting.ztst
@@ -17,6 +17,20 @@
 0:$'-style quotes with backslashed backslashes
 >'a \' is 'a backslash' is 'a \'
 
+  chars=$(print -r $'BS\\MBS\M-\\')
+  for (( i = 1; i <= $#chars; i++ )); do
+    char=$chars[$i]
+    print $(( [#16] #char ))
+  done
+0:$'-style quote with metafied backslash
+>16#42
+>16#53
+>16#5C
+>16#4D
+>16#42
+>16#53
+>16#DC
+
   print -r ''''
   setopt rcquotes
 # We need to set rcquotes here for the next example since it is
-- 
cgit 1.4.1