Home | History | Annotate | Line # | Download | only in fr400
      1 # frv testcase for mhsetloh $s12,$FRk
      2 # mach: all
      3 
      4 	.include "../testutils.inc"
      5 
      6 	start
      7 
      8 	.global mhsetloh
      9 mhsetloh:
     10 	set_fr_immed	0,fr1
     11 	mhsetloh	0,fr1
     12 	test_fr_iimmed	0,fr1
     13 	mhsetloh	1,fr1
     14 	test_fr_iimmed	0x0000800,fr1 
     15 	mhsetloh	0xf,fr1
     16 	test_fr_iimmed	0x00007800,fr1
     17 	mhsetloh	-16,fr1
     18 	test_fr_iimmed	0x00008000,fr1
     19 	mhsetloh	-1,fr1
     20 	test_fr_iimmed	0x0000f800,fr1
     21 
     22 	; Try parallel write to both hi and lo
     23 	mhsetloh.p	1,fr1
     24 	mhsethih	0xf,fr1
     25 	test_fr_iimmed	0x78000800,fr1
     26 
     27 	pass
     28