projects / thirdparty / binutils-gdb.git / blame
| Commit | Line | Data |
|---|---|---|
| 3bf97905 DB |
1 | # fr30 testcase for asr2 $u4,$Rj |
| 2 | # mach(): fr30 | |
| 3 | ||
| 4 | .include "testutils.inc" | |
| 5 | ||
| 6 | START | |
| 7 | ||
| 8 | .text | |
| 9 | .global asr2 | |
| 10 | asr2: | |
| 11 | ; Test asr2 $u4Ri | |
| 12 | mvi_h_gr 0x80000000,r8 | |
| 13 | set_cc 0x05 ; Set mask opposite of expected | |
| 14 | asr2 0,r8 | |
| 15 | test_cc 1 0 0 0 | |
| 16 | test_h_gr 0xffff8000,r8 | |
| 17 | ||
| 18 | mvi_h_gr 0x80000000,r8 | |
| 19 | set_cc 0x07 ; Set mask opposite of expected | |
| 20 | asr2 1,r8 | |
| 21 | test_cc 1 0 1 0 | |
| 22 | test_h_gr 0xffffc000,r8 | |
| 23 | ||
| 24 | mvi_h_gr 0x80000000,r8 | |
| 25 | set_cc 0x07 ; Set mask opposite of expected | |
| 26 | asr2 15,r8 | |
| 27 | test_cc 1 0 1 0 | |
| 28 | test_h_gr -1,r8 | |
| 29 | ||
| 30 | mvi_h_gr 0x40000000,r8 | |
| 31 | set_cc 0x0a ; Set mask opposite of expected | |
| 32 | asr2 15,r8 | |
| 33 | test_cc 0 1 1 1 | |
| 34 | test_h_gr 0x00000000,r8 | |
| 35 | ||
| 36 | pass |