| # frv testcase for sra $GRi,$GRj,$GRk |
| # mach: all |
| |
| .include "testutils.inc" |
| |
| start |
| |
| .global sra |
| sra: |
| set_gr_limmed 0xdead,0xbee0,gr7 ; Shift by 0 |
| set_gr_limmed 0x8000,0x0000,gr8 |
| set_icc 0x05,0 ; Set mask opposite of expected |
| sra gr8,gr7,gr8 |
| test_icc 0 1 0 1 icc0 |
| test_gr_limmed 0x8000,0x0000,gr8 |
| |
| set_gr_limmed 0xdead,0xbee1,gr7 ; Shift by 1 |
| set_gr_limmed 0x8000,0x0000,gr8 |
| set_icc 0x0f,0 ; Set mask opposite of expected |
| sra gr8,gr7,gr8 |
| test_icc 1 1 1 1 icc0 |
| test_gr_limmed 0xc000,0x0000,gr8 |
| |
| set_gr_limmed 0xdead,0xbeff,gr7 ; Shift by 31 |
| set_gr_limmed 0x8000,0x0000,gr8 |
| set_icc 0x0f,0 ; Set mask opposite of expected |
| sra gr8,gr7,gr8 |
| test_icc 1 1 1 1 icc0 |
| test_gr_immed -1,gr8 |
| |
| set_gr_limmed 0xdead,0xbeff,gr7 ; clear register |
| set_gr_limmed 0x4000,0x0000,gr8 |
| set_icc 0x0a,0 ; Set mask opposite of expected |
| sra gr8,gr7,gr8 |
| test_icc 1 0 1 0 icc0 |
| test_gr_immed 0x00000000,gr8 |
| |
| pass |
