28 lines
483 B
Plaintext
28 lines
483 B
Plaintext
# frv testcase for mhsetloh $s12,$FRk
|
|
# mach: all
|
|
|
|
.include "../testutils.inc"
|
|
|
|
start
|
|
|
|
.global mhsetloh
|
|
mhsetloh:
|
|
set_fr_immed 0,fr1
|
|
mhsetloh 0,fr1
|
|
test_fr_iimmed 0,fr1
|
|
mhsetloh 1,fr1
|
|
test_fr_iimmed 0x0000800,fr1
|
|
mhsetloh 0xf,fr1
|
|
test_fr_iimmed 0x00007800,fr1
|
|
mhsetloh -16,fr1
|
|
test_fr_iimmed 0x00008000,fr1
|
|
mhsetloh -1,fr1
|
|
test_fr_iimmed 0x0000f800,fr1
|
|
|
|
; Try parallel write to both hi and lo
|
|
mhsetloh.p 1,fr1
|
|
mhsethih 0xf,fr1
|
|
test_fr_iimmed 0x78000800,fr1
|
|
|
|
pass
|