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