2003-05-01 H.J. Lu <hjl@gnu.org>

	* gas/elf/elf.exp (run_list_test): Accept empty $opts.
	Add type test.

	* gas/elf/type.e: New file.
	* gas/elf/type.s: Likewise.
	* gas/elf/type.e-m32r: Likewise.
	* gas/elf/type.e-mips: Likewise.
	* gas/elf/type.e-miwmmxt: Likewise.

7 files changed, 80 insertions, 1 deletions

diff --git a/gas/testsuite/ChangeLog b/gas/testsuite/ChangeLog
index 348d243..7abb132 100644
--- a/gas/testsuite/ChangeLog
+++ b/gas/testsuite/ChangeLog
@@ -1,5 +1,16 @@
 2003-05-01  H.J. Lu <hjl@gnu.org>
 
+	* gas/elf/elf.exp (run_list_test): Accept empty $opts.
+	Add type test.
+
+	* gas/elf/type.e: New file.
+	* gas/elf/type.s: Likewise.
+	* gas/elf/type.e-m32r: Likewise.
+	* gas/elf/type.e-mips: Likewise.
+	* gas/elf/type.e-miwmmxt: Likewise.
+
+2003-05-01  H.J. Lu <hjl@gnu.org>
+
 	* gas/ia64/ia64.exp: Add secname.
 
 	* gas/ia64/secname.s: New. Test the trailing '#' in section
diff --git a/gas/testsuite/gas/elf/elf.exp b/gas/testsuite/gas/elf/elf.exp
index c9aa34d..27adc36 100644
--- a/gas/testsuite/gas/elf/elf.exp
+++ b/gas/testsuite/gas/elf/elf.exp
@@ -8,7 +8,8 @@ proc run_list_test { name suffix opts } {
     set testname "elf $name list"
     set file $srcdir/$subdir/$name
     gas_run ${name}.s "$opts -o dump.o" ">&dump.out"
-    if { [regexp_diff "dump.out" "${file}.l"] } then {
+    if { ![string match "" $opts]
+	  && [regexp_diff "dump.out" "${file}.l"] } then {
 	fail $testname
 	verbose "output is [file_contents "dump.out"]" 2
 	return
@@ -54,4 +55,5 @@ if { ([istarget "*-*-elf*"]
     run_dump_test "section1" 
     run_list_test "section2" "$target_machine" "-al"
     run_dump_test "symver" 
+    run_list_test "type" "$target_machine" ""
 }
diff --git a/gas/testsuite/gas/elf/type.e b/gas/testsuite/gas/elf/type.e
new file mode 100644
index 0000000..ad96001
--- /dev/null
+++ b/gas/testsuite/gas/elf/type.e
@@ -0,0 +1,11 @@
+
+Symbol table '.symtab' contains 8 entries:
+   Num:    Value[ 	]* Size Type    Bind   Vis      Ndx Name
+     0: 0+0     0 NOTYPE  LOCAL  DEFAULT  UND 
+     1: 0+0     0 SECTION LOCAL  DEFAULT    1 
+     2: 0+0     0 SECTION LOCAL  DEFAULT    2 
+     3: 0+0     0 SECTION LOCAL  DEFAULT    3 
+     4: 0+0     1 FUNC    LOCAL  DEFAULT    . function
+     5: 0+0     1 OBJECT  LOCAL  DEFAULT    . object
+     6: 0+1     1 TLS     LOCAL  DEFAULT    . tls_object
+     7: 0+2     1 NOTYPE  LOCAL  DEFAULT    . notype
diff --git a/gas/testsuite/gas/elf/type.e-m32r b/gas/testsuite/gas/elf/type.e-m32r
new file mode 100644
index 0000000..2835a20
--- /dev/null
+++ b/gas/testsuite/gas/elf/type.e-m32r
@@ -0,0 +1,12 @@
+
+Symbol table '.symtab' contains 9 entries:
+   Num:    Value[ 	]* Size Type    Bind   Vis      Ndx Name
+     0: 0+0     0 NOTYPE  LOCAL  DEFAULT  UND 
+     1: 0+0     0 SECTION LOCAL  DEFAULT    1 
+     2: 0+0     0 SECTION LOCAL  DEFAULT    2 
+     3: 0+0     0 SECTION LOCAL  DEFAULT    3 
+     4: 0+0     1 FUNC    LOCAL  DEFAULT    . function
+     5: 0+0     1 OBJECT  LOCAL  DEFAULT    . object
+     6: 0+1     1 TLS     LOCAL  DEFAULT    . tls_object
+     7: 0+2     1 NOTYPE  LOCAL  DEFAULT    . notype
+     8: 0+0     0 SECTION LOCAL  DEFAULT    . 
diff --git a/gas/testsuite/gas/elf/type.e-mips b/gas/testsuite/gas/elf/type.e-mips
new file mode 100644
index 0000000..7c915da
--- /dev/null
+++ b/gas/testsuite/gas/elf/type.e-mips
@@ -0,0 +1,13 @@
+
+Symbol table '.symtab' contains 10 entries:
+   Num:    Value[ 	]* Size Type    Bind   Vis      Ndx Name
+     0: 0+0     0 NOTYPE  LOCAL  DEFAULT  UND 
+     1: 0+0     0 SECTION LOCAL  DEFAULT    1 
+     2: 0+0     0 SECTION LOCAL  DEFAULT    2 
+     3: 0+0     0 SECTION LOCAL  DEFAULT    3 
+     4: 0+0     1 FUNC    LOCAL  DEFAULT    . function
+     5: 0+0     1 OBJECT  LOCAL  DEFAULT    . object
+     6: 0+1     1 TLS     LOCAL  DEFAULT    . tls_object
+     7: 0+2     1 NOTYPE  LOCAL  DEFAULT    . notype
+     8: 0+0     0 SECTION LOCAL  DEFAULT    . 
+     9: 0+0     0 SECTION LOCAL  DEFAULT    . 
diff --git a/gas/testsuite/gas/elf/type.e-miwmmxt b/gas/testsuite/gas/elf/type.e-miwmmxt
new file mode 100644
index 0000000..2835a20
--- /dev/null
+++ b/gas/testsuite/gas/elf/type.e-miwmmxt
@@ -0,0 +1,12 @@
+
+Symbol table '.symtab' contains 9 entries:
+   Num:    Value[ 	]* Size Type    Bind   Vis      Ndx Name
+     0: 0+0     0 NOTYPE  LOCAL  DEFAULT  UND 
+     1: 0+0     0 SECTION LOCAL  DEFAULT    1 
+     2: 0+0     0 SECTION LOCAL  DEFAULT    2 
+     3: 0+0     0 SECTION LOCAL  DEFAULT    3 
+     4: 0+0     1 FUNC    LOCAL  DEFAULT    . function
+     5: 0+0     1 OBJECT  LOCAL  DEFAULT    . object
+     6: 0+1     1 TLS     LOCAL  DEFAULT    . tls_object
+     7: 0+2     1 NOTYPE  LOCAL  DEFAULT    . notype
+     8: 0+0     0 SECTION LOCAL  DEFAULT    . 
diff --git a/gas/testsuite/gas/elf/type.s b/gas/testsuite/gas/elf/type.s
new file mode 100644
index 0000000..1e53086
--- /dev/null
+++ b/gas/testsuite/gas/elf/type.s
@@ -0,0 +1,18 @@
+	.text
+        .size   function,1
+        .type   function,@function
+function:
+	.byte	0x0
+        .data
+        .type   object,@object
+        .size   object,1
+object:
+	.byte	0x0
+        .type   tls_object,@tls_object
+        .size   tls_object,1
+tls_object:
+	.byte	0x0
+        .type   notype,@notype
+        .size   notype,1
+notype:
+	.byte	0x0