* chexp.exp: fix tests that assume >16-bit ints.

diff --git a/gdb/testsuite/gdb.chill/ChangeLog b/gdb/testsuite/gdb.chill/ChangeLog
index f63076bb3518c986b03070292d85b61c6a62a55b..9db44ea6b38d6117f2bfb28fd35ec6508d122e18 100644 (file)
--- a/gdb/testsuite/gdb.chill/ChangeLog
+++ b/gdb/testsuite/gdb.chill/ChangeLog
@@ -1,3 +1,7 @@
+Thu May 21 02:45:18 1998  Felix Lee  <flee@zog.cygnus.com>
+
+       * chexp.exp: fix tests that assume >16-bit ints.
+
 Wed Sep 10 15:01:55 1997  Bob Manson  <manson@charmed.cygnus.com>
 
        * *.exp: The end-all be-all of quoting fixes. Ha.

diff --git a/gdb/testsuite/gdb.chill/chexp.exp b/gdb/testsuite/gdb.chill/chexp.exp
index d78d459168800c427eecb0a4012fdfaa7fd36bdc..bed4aba983ed81d1dcecc36c9db44a765e0d33e9 100644 (file)
--- a/gdb/testsuite/gdb.chill/chexp.exp
+++ b/gdb/testsuite/gdb.chill/chexp.exp
@@ -66,7 +66,7 @@ proc test_integer_literals_accepted {} {
     gdb_test "p d'123" " = 123"
     gdb_test "p -D'123" " = -123"
     gdb_test "p -d'123" " = -123"
-    gdb_test "p 123_456" " = 123456"
+    gdb_test "p 12_345" " = 12345"
     gdb_test "p __1_2_3__" " = 123"
     gdb_test "p/d 123" " = D'123"
 
@@ -107,10 +107,12 @@ proc test_integer_literals_accepted {} {
     gdb_test "p H'_1_2_3_" " = 291"
     gdb_test "p h'_1_2_3_" " = 291"
     gdb_test "p -h'_1_2_3_" " = -291"
-    gdb_test "p H'ABCDEF" " = 11259375"
-    gdb_test "p H'abcdef" " = 11259375"
-    gdb_test "p H'AbCdEf" " = 11259375"
-    gdb_test "p H'_A_b_C_d_E_f_" " = 11259375"
+    gdb_test "p H'ABC" " = 2748"
+    gdb_test "p H'abc" " = 2748"
+    gdb_test "p H'AbC" " = 2748"
+    gdb_test "p H'_A_b_C_" " = 2748"
+    gdb_test "p H'_D_e_F_" " = 3567"
+    gdb_test "p H'_d_E_f_" " = 3567"
     gdb_test "p/x H'123" " = H'123"
 }