URL
https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk
Subversion Repositories openrisc_me
[/] [openrisc/] [trunk/] [gnu-src/] [gdb-6.8/] [sim/] [testsuite/] [sim/] [frv/] [munpackh.cgs] - Rev 157
Compare with Previous | Blame | View Log
# frv testcase for munpackh $FRi,$FRj
# mach: all
.include "testutils.inc"
start
.global munpackh
munpackh:
set_fr_iimmed 0xdead,0xbeef,fr10
set_fr_iimmed 0x1234,0x5678,fr11
munpackh fr10,fr12
test_fr_limmed 0xdead,0xdead,fr12
test_fr_limmed 0xbeef,0xbeef,fr13
set_fr_iimmed 0x1234,0x5678,fr10
set_fr_iimmed 0xdead,0xbeef,fr11
munpackh fr10,fr12
test_fr_limmed 0x1234,0x1234,fr12
test_fr_limmed 0x5678,0x5678,fr13
pass