projects / deliverable / binutils-gdb.git / blame
| Commit | Line | Data |
|---|---|---|
| cbb38b47 BE |
1 | # sh testcase for shar $rn -*- Asm -*- |
| 2 | # mach: all | |
| 3 | # as: -isa=shcompact | |
| 4 | # ld: -m shelf32 | |
| 5 | ||
| 6 | .include "compact/testutils.inc" | |
| 7 | ||
| 8 | start | |
| 9 | ||
| 10 | .global shar | |
| 11 | shar: | |
| 12 | mov #0, r0 | |
| 13 | or #192, r0 | |
| 14 | shar r0 | |
| 15 | bt wrong | |
| 16 | shar r0 | |
| 17 | bt wrong | |
| 18 | shar r0 | |
| 19 | bt wrong | |
| 20 | shar r0 | |
| 21 | bt wrong | |
| 22 | shar r0 | |
| 23 | bt wrong | |
| 24 | shar r0 | |
| 25 | bt wrong | |
| 26 | shar r0 | |
| 27 | bf wrong | |
| 28 | shar r0 | |
| 29 | bf wrong | |
| 30 | shar r0 | |
| 31 | bt wrong | |
| 32 | shar r0 | |
| 33 | bt wrong | |
| 34 | assert r0, #0 | |
| 35 | ||
| 36 | okay: | |
| 37 | pass | |
| 38 | wrong: | |
| 39 | fail | |
| 40 |