projects / deliverable / binutils-gdb.git / blame
| Commit | Line | Data |
|---|---|---|
| cbb38b47 BE |
1 | # sh testcase for mabs.l $rm, $rd -*- Asm -*- |
| 2 | # mach: all | |
| 3 | # as: -isa=shmedia | |
| 4 | # ld: -m shelf64 | |
| 5 | ||
| 6 | .include "media/testutils.inc" | |
| 7 | ||
| 8 | start | |
| 9 | ||
| 10 | .global mabsl | |
| 11 | init: | |
| 12 | pta wrong, tr0 | |
| 13 | ||
| 14 | mabsl1: | |
| 15 | # Pack { 1 3 } into R0. | |
| 16 | _packl 1, 3, r0 | |
| 17 | ||
| 18 | mabs.l r0, r1 | |
| 19 | ||
| 20 | # Test for { 1 3 } in R0. | |
| 21 | _packl 1, 3, r2 | |
| 22 | bne r0, r2, tr0 | |
| 23 | ||
| 24 | mabsl2: | |
| 25 | # Pack { -1, -1 } into R0. | |
| 26 | _packl 1, 1, r0 | |
| 27 | ||
| 28 | # Set the left sign bit. | |
| 29 | movi 1, r1 | |
| 30 | shlli r1, 63, r1 | |
| 31 | or r0, r1, r0 | |
| 32 | ||
| 33 | mabs.l r0, r2 | |
| 34 | ||
| 35 | okay: | |
| 36 | pass | |
| 37 | ||
| 38 | wrong: | |
| 39 | fail |