* 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.

diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index fda24a16c2ed8a7bfe39210203dc54ea7399e6f2..5f3755213b17499fc7fbff7c4175b7b0b28d5f03 100644 (file)
--- 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 92ccb9a0464ca13d89761beefdce2aaa1377a48b..d558f9871e48112e27f21bfb97b123fe6881a53e 100644 (file)
--- 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 5f46c77eaafbf30b68bf21c414d321cfc798bfda..d5ecc3f636007d67286bd8e69b1ccfa9c56f4bde 100644 (file)
--- 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 } {