Home | History | Annotate | Line # | Download | only in frv 
      1 # frv testcase for mqlclrhs $FRi,$FRj,$FRj
      2 # mach: fr450
      3 
      4 	.include "testutils.inc"
      5 
      6 	start
      7 
      8 	.global mqlclrhs
      9 mqlclrhs:
     10 	set_fr_iimmed	0x1000,0x2000,fr4
     11 	set_fr_iimmed	0xe800,0xd800,fr5
     12 	set_fr_iimmed	0x0800,0x0800,fr6
     13 	set_fr_iimmed	0x0800,0x0800,fr7
     14 	mqlclrhs	fr4,fr6,fr8
     15 	test_fr_limmed	0x1000,0x2000,fr8
     16 	test_fr_limmed	0xe800,0xd800,fr9
     17 
     18 	set_fr_iimmed	0x1000,0x2000,fr4
     19 	set_fr_iimmed	0xe800,0xd800,fr5
     20 	set_fr_iimmed	0xf800,0xf800,fr6
     21 	set_fr_iimmed	0xf800,0xf800,fr7
     22 	mqlclrhs	fr4,fr6,fr8
     23 	test_fr_limmed	0xf000,0xe000,fr8
     24 	test_fr_limmed	0x1800,0x2800,fr9
     25 
     26 	set_fr_iimmed	0x1000,0x1000,fr4
     27 	set_fr_iimmed	0x1000,0x1000,fr5
     28 	set_fr_iimmed	0xf000,0xf800,fr6
     29 	set_fr_iimmed	0x0800,0x1000,fr7
     30 	mqlclrhs	fr4,fr6,fr8
     31 	test_fr_limmed	0x0000,0xf000,fr8
     32 	test_fr_limmed	0x1000,0x0000,fr9
     33 
     34 	set_fr_iimmed	0xf000,0xf000,fr4
     35 	set_fr_iimmed	0xf000,0xf000,fr5
     36 	set_fr_iimmed	0xf000,0xf800,fr6
     37 	set_fr_iimmed	0x0800,0x1000,fr7
     38 	mqlclrhs	fr4,fr6,fr8
     39 	test_fr_limmed	0x0000,0x1000,fr8
     40 	test_fr_limmed	0xf000,0x0000,fr9
     41 
     42 	set_fr_iimmed	0x8000,0x8000,fr4
     43 	set_fr_iimmed	0x8000,0x8000,fr5
     44 	set_fr_iimmed	0x8000,0x7fff,fr6
     45 	set_fr_iimmed	0x8001,0x0000,fr7
     46 	mqlclrhs	fr4,fr6,fr8
     47 	test_fr_limmed	0x0000,0x8000,fr8
     48 	test_fr_limmed	0x7fff,0x8000,fr9
     49 
     50 	set_fr_iimmed	0x7fff,0x7fff,fr4
     51 	set_fr_iimmed	0x7fff,0x7fff,fr5
     52 	set_fr_iimmed	0x8000,0x7fff,fr6
     53 	set_fr_iimmed	0x8001,0x0000,fr7
     54 	mqlclrhs	fr4,fr6,fr8
     55 	test_fr_limmed	0x0000,0x0000,fr8
     56 	test_fr_limmed	0x0000,0x7fff,fr9
     57 
     58 	set_fr_iimmed	0x8001,0x8001,fr4
     59 	set_fr_iimmed	0x8001,0x8001,fr5
     60 	set_fr_iimmed	0x8000,0x7fff,fr6
     61 	set_fr_iimmed	0x8001,0x0000,fr7
     62 	mqlclrhs	fr4,fr6,fr8
     63 	test_fr_limmed	0x0000,0x0000,fr8
     64 	test_fr_limmed	0x0000,0x8001,fr9
     65 
     66 	set_fr_iimmed	0x8000,0x8000,fr4
     67 	set_fr_iimmed	0x0001,0xffff,fr5
     68 	set_fr_iimmed	0x0001,0xffff,fr6
     69 	set_fr_iimmed	0x8000,0x8000,fr7
     70 	mqlclrhs	fr4,fr6,fr8
     71 	test_fr_limmed	0x8000,0x7fff,fr8
     72 	test_fr_limmed	0x0000,0x0000,fr9
     73 
     74 	pass
     75