Commit | Line | Data |
---|---|---|
252b5132 RH |
1 | # |
2 | # Some generic m68k tests | |
3 | # | |
4 | if [istarget m68*-*-*] then { | |
5 | gas_test "t2.s" "" "" "cross-section branch" | |
6 | if [istarget m68*-motorola-sysv] then { | |
7 | run_dump_test t2 | |
8 | } | |
9 | ||
10 | gas_test "pic1.s" "" "" "PIC generation" | |
11 | ||
12 | gas_test "disperr.s" "-m68020" "" "Incorrect Displacement too long error" | |
13 | ||
14 | gas_test_error "p2410.s" "" "out-of-range 'bras'" | |
15 | ||
16 | run_dump_test pcrel | |
17 | run_dump_test operands | |
18 | run_dump_test cas | |
19 | run_dump_test bitfield | |
20 | run_dump_test link | |
21 | run_dump_test fmoveml | |
22 | ||
23 | set testname "68000 operands" | |
24 | gas_run "operands.s" "-m68000" "2>err.out" | |
25 | if ![string match "child process exited abnormally" $comp_output] then { | |
26 | send_log "$comp_output\n" | |
27 | verbose "$comp_output" 3 | |
28 | fail $testname | |
29 | } else { | |
30 | if [regexp_diff "err.out" "$srcdir/$subdir/op68000.d"] then { | |
31 | fail $testname | |
32 | } else { | |
33 | pass $testname | |
34 | } | |
35 | } | |
36 | } | |
37 | if [info exists errorInfo] then { | |
38 | unset errorInfo | |
39 | } |