diff options
| author | H.J. Lu <hjl.tools@gmail.com> | 2001-06-06 21:07:14 +0000 |
|---|---|---|
| committer | H.J. Lu <hjl.tools@gmail.com> | 2001-06-06 21:07:14 +0000 |
| commit | 5b5032ebbdf7797fad56b9556b14667e21ecb20f (patch) | |
| tree | 9f69837865c3a6df1eef4a811f5f575a69c8a765 /gas | |
| parent | 66517a2f18e2cbae1a861b138ce9372fff501f2c (diff) | |
| download | fsf-binutils-gdb-5b5032ebbdf7797fad56b9556b14667e21ecb20f.zip fsf-binutils-gdb-5b5032ebbdf7797fad56b9556b14667e21ecb20f.tar.gz fsf-binutils-gdb-5b5032ebbdf7797fad56b9556b14667e21ecb20f.tar.bz2 | |
2001-06-06 H.J. Lu <hjl@gnu.org>
* gas/elf/elf.exp (run_list_test): New.
Run section2 with run_list_test.
* gas/elf/section2.e: New file.
* gas/elf/section2.l: Likewise.
* gas/elf/section2.s: Likewise.
Diffstat (limited to 'gas')
| -rw-r--r-- | gas/testsuite/ChangeLog | 9 | ||||
| -rw-r--r-- | gas/testsuite/gas/elf/elf.exp | 28 | ||||
| -rw-r--r-- | gas/testsuite/gas/elf/section2.e | 8 | ||||
| -rw-r--r-- | gas/testsuite/gas/elf/section2.l | 8 | ||||
| -rw-r--r-- | gas/testsuite/gas/elf/section2.s | 3 |
5 files changed, 56 insertions, 0 deletions
diff --git a/gas/testsuite/ChangeLog b/gas/testsuite/ChangeLog index b842dd8..af3b106 100644 --- a/gas/testsuite/ChangeLog +++ b/gas/testsuite/ChangeLog @@ -1,3 +1,12 @@ +2001-06-06 H.J. Lu <hjl@gnu.org> + + * gas/elf/elf.exp (run_list_test): New. + Run section2 with run_list_test. + + * gas/elf/section2.e: New file. + * gas/elf/section2.l: Likewise. + * gas/elf/section2.s: Likewise. + 2001-06-04 H.J. Lu <hjl@gnu.org> * gas/mips/mips4010.s: Add the missing ".end". diff --git a/gas/testsuite/gas/elf/elf.exp b/gas/testsuite/gas/elf/elf.exp index a25a396..3a7e4d7 100644 --- a/gas/testsuite/gas/elf/elf.exp +++ b/gas/testsuite/gas/elf/elf.exp @@ -2,6 +2,33 @@ # elf tests # +proc run_list_test { name opts } { + global READELF + global srcdir subdir + 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 { + fail $testname + verbose "output is [file_contents "dump.out"]" 2 + return + } + send_log "$READELF -s dump.o > dump.out\n" + catch "exec $READELF -s dump.o > dump.out\n" comp_output + if ![string match "" $comp_output] then { + send_log "$comp_output\n" + fail $testname + return + } + verbose_eval {[file_contents "dump.out"]} 3 + if { [regexp_diff "dump.out" "${file}.e"] } then { + fail $testname + verbose "output is [file_contents "dump.out"]" 2 + return + } + pass $testname +} + # We're testing bits in obj-elf -- don't run on anything else. if { ([istarget "*-*-elf*"] || [istarget "*-*-linux*"] @@ -14,4 +41,5 @@ if { ([istarget "*-*-elf*"] run_dump_test "ehopt0" run_dump_test "section0" run_dump_test "section1" + run_list_test "section2" "-al" } diff --git a/gas/testsuite/gas/elf/section2.e b/gas/testsuite/gas/elf/section2.e new file mode 100644 index 0000000..86628ea --- /dev/null +++ b/gas/testsuite/gas/elf/section2.e @@ -0,0 +1,8 @@ + +Symbol table '.symtab' contains 5 entries: + Num: Value Size Type Bind Vis Ndx Name + 0: 00000000 0 NOTYPE LOCAL DEFAULT UND + 1: 00000000 0 SECTION LOCAL DEFAULT 1 + 2: 00000000 0 SECTION LOCAL DEFAULT 2 + 3: 00000000 0 SECTION LOCAL DEFAULT 3 + 4: 00000000 0 SECTION LOCAL DEFAULT 4 diff --git a/gas/testsuite/gas/elf/section2.l b/gas/testsuite/gas/elf/section2.l new file mode 100644 index 0000000..282f858 --- /dev/null +++ b/gas/testsuite/gas/elf/section2.l @@ -0,0 +1,8 @@ +.*: Assembler messages: +.*:2: Warning: Section symbols are already global +GAS LISTING .* + + + 1 .section A + 2 .global A + 3 0000 31 .byte 49 diff --git a/gas/testsuite/gas/elf/section2.s b/gas/testsuite/gas/elf/section2.s new file mode 100644 index 0000000..02239e7 --- /dev/null +++ b/gas/testsuite/gas/elf/section2.s @@ -0,0 +1,3 @@ + .section A + .global A + .byte 49 |