From a8493f59b7e9c1428aa819eab007e8ab835e4cdc Mon Sep 17 00:00:00 2001 From: Jim Kingdon Date: Thu, 3 Feb 1994 17:25:43 +0000 Subject: [PATCH] * Move test with enums and partial symbols back to gdb.t03/{ptype.exp,gdbme.c} from gdb.stabs/{weird.def,weird.exp}. Reverts the change of 26 May 93. Per today's change to stabs.texinfo, the behavior that weird.exp was expecting was unreasonable; what is important is that the compiler+gdb get things right, which happens with a recent gcc. Also fix the test to deal with native compilers which put out the stab gdb can't deal with. --- gdb/testsuite/ChangeLog | 11 +++++++++++ gdb/testsuite/gdb.stabs/weird.def | 18 +++++------------- gdb/testsuite/gdb.stabs/weird.exp | 18 +++++------------- 3 files changed, 21 insertions(+), 26 deletions(-) diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index fda24a1..5f37552 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,14 @@ +Thu Feb 3 12:04:49 1994 Jim Kingdon (kingdon@lioth.cygnus.com) + + * Move test with enums and partial symbols back to + gdb.t03/{ptype.exp,gdbme.c} from gdb.stabs/{weird.def,weird.exp}. + Reverts the change of 26 May 93. Per today's change to + stabs.texinfo, the behavior that weird.exp was expecting was + unreasonable; what is important is that the compiler+gdb get + things right, which happens with a recent gcc. Also fix the test + to deal with native compilers which put out the stab gdb can't + deal with. + Mon Jan 31 15:40:11 1994 Jim Kingdon (kingdon@lioth.cygnus.com) * gdb.t24/demangle.exp: Remove a bunch of tests which differ only diff --git a/gdb/testsuite/gdb.stabs/weird.def b/gdb/testsuite/gdb.stabs/weird.def index 92ccb9a..d558f98 100644 --- a/gdb/testsuite/gdb.stabs/weird.def +++ b/gdb/testsuite/gdb.stabs/weird.def @@ -276,16 +276,8 @@ attr69: .stabs "attr33:G333=@! !#$%&'()*+,-./0123456789:<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[]^_`abcdefghijklmnopqrstuvwxyz{|}~;1",N_GSYM,0,0, 0 .stabs "attr35:G334=@# !#$%&'()*+,-./0123456789:<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[]^_`abcdefghijklmnopqrstuvwxyz{|}~;1",N_GSYM,0,0, 0 -.stabs "primary:G200=ered:0,green:1,blue:2,;", N_GSYM,0,0, 0 - .stabs "attr36:G335=@$ !#$%&'()*+,-./0123456789:<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[]^_`abcdefghijklmnopqrstuvwxyz{|}~;1",N_GSYM,0,0, 0 -.globl primary -.data -.align_it -primary: -.long 42 - .stabs "attr37:G337=@% !#$%&'()*+,-./0123456789:<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[]^_`abcdefghijklmnopqrstuvwxyz{|}~;1",N_GSYM,0,0, 0 # Test 'e' constant on non-enum type. @@ -301,11 +293,10 @@ primary: .stabs "bad_neg0:G201", N_GSYM,0,0, 0 -# First .long is 42. .globl bad_neg0 .data .align_it -ad_neg0: +bad_neg0: .long 42 .long 43, 44, 45 @@ -353,12 +344,13 @@ ad_neg0: .stabs "attr93:G393=@] !#$%&'()*+,-./0123456789:<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[]^_`abcdefghijklmnopqrstuvwxyz{|}~;1",N_GSYM,0,0, 0 -# Provide one of each, so this wins regardless of whether names have -# underscores. +# Do with and without underscore, so this wins regardless of whether +# names have underscores. + .globl _common0 .data .align_it - _common0: +_common0: .long 42 .long 24 .long 22 diff --git a/gdb/testsuite/gdb.stabs/weird.exp b/gdb/testsuite/gdb.stabs/weird.exp index 5f46c77..d5ecc3f 100644 --- a/gdb/testsuite/gdb.stabs/weird.exp +++ b/gdb/testsuite/gdb.stabs/weird.exp @@ -12,13 +12,6 @@ proc do_tests {} { global binfile global prompt - # Do this first because the bug only exhibits itself before partial - # symbols have been expanded. - setup_xfail "*-*-*" - # xcoffread.c doesn't (yet) use partial symbol tables. - clear_xfail "rs*-*-aix*" - gdb_test "ptype red" "type = enum \{red, green, blue\}" "ptype unnamed enum" - # Mips/alpha targets that use gcc with mips-tfile put out the stabs # assembler directives embedded in comments. If the assembler # file is then processed with native cc, all stabs directives @@ -142,8 +135,8 @@ proc do_tests {} { gdb_test "ptype inttype" "type = (unsigned int|inttype)" "ptype on inttype" gdb_test "p sizeof (float72type)" " = 9" "unrecognized floating point type" - gdb_test "p/x int256var" " = 0x0*2a0000002b0000002c0000002d\ -0000002d0000002c0000002b0000002a" "print very big integer" + # This big number needs to be kept as one piece + gdb_test "p/x int256var" " = 0x0*2a0000002b0000002c0000002d0000002d0000002c0000002b0000002a" "print very big integer" gdb_test "whatis consth" "type = inttype" "whatis consth" gdb_test "whatis consth2" "type = inttype" "whatis consth2" @@ -176,7 +169,7 @@ field3 = 0x77888877\}" "print struct constant" "whatis two_var test 2" setup_xfail "*-*-*" - gdb_test "whatis pointer_to_int_var" "type = int \*" + gdb_test "whatis pointer_to_int_var" "type = int \[*\]" setup_xfail "*-*-*" gdb_test "whatis intp_var" "type = intp" @@ -193,9 +186,8 @@ field3 = 0x77888877\}" "print struct constant" setup_xfail "*-*-*" gdb_test "p common0var2" "= 22" - gdb_test "p v_comb" "{<> = \ -{<> = {x = 42}, \[_a-zA-Z$\]* = \[0-9xa-fA-F\]*, a = 43}, \ -<> = {\[_a-zA-Z$\]* = \[0-9xa-fA-F\]*, b = 44}, comb = 45}" + # this long line must be continous, not with "/" escaping the newline + gdb_test "p v_comb" "{<> = {<> = {x = 42}, \[_a-zA-Z$.\]* = \[0-9xa-fA-F\]*, a = 43}, <> = {\[_a-zA-Z$.\]* = \[0-9xa-fA-F\]*, b = 44}, comb = 45}" } proc print_weird_var { var } { -- 2.7.4