From: Nick Clifton <nickc@redhat.com>
Date: Tue, 9 Apr 2002 15:44:36 +0000 (+0000)
Subject: "\a" escape (used for right justified key definitions in menus) is encodes as
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=4d0b1625bf03f05543445bd7d1aa581174f91a2c;p=binutils-gdb.git

"\a" escape (used for right justified key definitions in menus) is encodes as
binary 8.
---

diff --git a/binutils/ChangeLog b/binutils/ChangeLog
index f1fab3fb57f..299621dc989 100644
--- a/binutils/ChangeLog
+++ b/binutils/ChangeLog
@@ -5,6 +5,8 @@
 	Fix typo in BEDIT warning.
 
 	* rclex.l: "\xhex" encoding in strings corrected.
+	"\a" escape (used for right justified key definitions in menus) is
+	encodes as binary 8.
 
 2002-04-09  Gunnar Degnbol <degnbol@danbbs.dk>
 
diff --git a/binutils/rclex.l b/binutils/rclex.l
index f20c82ff2b7..6e29e622d08 100644
--- a/binutils/rclex.l
+++ b/binutils/rclex.l
@@ -331,7 +331,7 @@ handle_quotes (input, len)
 	      break;
 
 	    case 'a':
-	      *s++ = ESCAPE_A;
+	      *s++ = ESCAPE_B; /* Strange, but true...  */
 	      ++t;
 	      break;
 
diff --git a/binutils/testsuite/ChangeLog b/binutils/testsuite/ChangeLog
index 9c84fd74ca5..9129b6e0869 100644
--- a/binutils/testsuite/ChangeLog
+++ b/binutils/testsuite/ChangeLog
@@ -1,5 +1,9 @@
 2002-04-09  Nick Clifton  <nickc@cambridge.redhat.com>
 
+	* binutils-all/windres/escapea.rc: New test case for encoding \a
+	escape sequence.
+	* binutils-all/windres/escapea.rsd: Expected output.
+
 	* binutils-all/windres/escapex.rc: New test case for hex constants
 	in strings.
 	* binutils-all/windres/escapex.rsd: Expected output
diff --git a/binutils/testsuite/binutils-all/windres/escapea.rc b/binutils/testsuite/binutils-all/windres/escapea.rc
new file mode 100644
index 00000000000..0e3e9670cd7
--- /dev/null
+++ b/binutils/testsuite/binutils-all/windres/escapea.rc
@@ -0,0 +1,7 @@
+20 MENU DISCARDABLE 
+BEGIN
+    POPUP "&File"
+    BEGIN
+        MENUITEM "&Open\a^O",                   17
+    END
+END
diff --git a/binutils/testsuite/binutils-all/windres/escapea.rsd b/binutils/testsuite/binutils-all/windres/escapea.rsd
new file mode 100644
index 00000000000..1875ebe4bbf
--- /dev/null
+++ b/binutils/testsuite/binutils-all/windres/escapea.rsd
@@ -0,0 +1,7 @@
+ 0000 00000000 20000000 ffff0000 ffff0000  .... ...........
+ 0010 00000000 00000000 00000000 00000000  ................
+ 0020 28000000 20000000 ffff0400 ffff1400  (... ...........
+ 0030 00000000 10100000 00000000 00000000  ................
+ 0040 00000000 90002600 46006900 6c006500  ......&.F.i.l.e.
+ 0050 00008000 11002600 4f007000 65006e00  ......&.O.p.e.n.
+ 0060 08005e00 4f000000                    ..^.O...