darlinghq/darling-gdb
1
0
Fork 0
mirror of https://github.com/darlinghq/darling-gdb.git synced 2024-12-16 16:47:52 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

* gdb.base/charset.exp: If UTF-16 is not available, skip char16_t, String16 tests.

Browse Source
This commit is contained in:
Doug Evans 2011-05-13 18:31:01 +00:00
parent 2a6163793f
commit 05272e115a
2 changed files with 16 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
gdb/testsuite/ChangeLog
View File

@ -1,3 +1,7 @@
2011-05-13 Doug Evans <dje@google.com>
* gdb.base/charset.exp: If UTF-16 is not available, skip char16_t, String16 tests.
2011-05-13 Tom Tromey <tromey@redhat.com>
* lib/gdb.exp (is_x86_like_target): New proc.

16
gdb/testsuite/gdb.base/charset.exp
View File

@ -546,6 +546,12 @@ if {$wchar_ok} {
}
set ucs2_ok [expr {[get_sizeof char16_t 99] == 2}]
if ![valid_host_charset "UTF-16"] {
verbose -log "Disabling UTF-16 tests."
set ucs2_ok 0
}
if {$ucs2_ok} {
test_wide_or_unicode u UTF-16
}
@ -606,11 +612,13 @@ proc string_display { var_name set_prefix x_size x_type} {
gdb_test "x /2${x_size}s ${var_name}" ".* ${x_type}\"Test String\"\[\r\n\]+.* ${x_type}\"with zeroes\"" "Display String ${var_name} with x/${x_size}s"
}
string_display String16 u h u
if {$wchar_size == 2} {
string_display String16 L h u
if {$ucs2_ok} {
string_display String16 u h u
if {$wchar_size == 2} {
string_display String16 L h u
}
}
string_display String32 U w U
if {$wchar_size == 4} {
string_display String32 L w U