Home | History | Annotate | Line # | Download | only in cr16
mulb.cgs revision 1.1 
      1  1.1  christos # cr16 testcase for mulb $imm4/imm16/reg,$reg
      2  1.1  christos # mach(): cr16 
      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 mulb
      9  1.1  christos mulb:
     10  1.1  christos 	movw $0x1234,r4
     11  1.1  christos 	movw $0x4567,r5
     12  1.1  christos 
     13  1.1  christos 	mulb r4, r5
     14  1.1  christos 	cmpb $0xec, r5
     15  1.1  christos 	beq ok1
     16  1.1  christos not_ok:
     17  1.1  christos 	fail
     18  1.1  christos 
     19  1.1  christos ok1:
     20  1.1  christos 	movw $3,r4
     21  1.1  christos 	mulb $7,r4
     22  1.1  christos 	cmpb $21, r4
     23  1.1  christos 	beq ok
     24  1.1  christos 	br not_ok
     25  1.1  christos ok:
     26  1.1  christos 	movw $3,r4
     27  1.1  christos 	mulb $0x1207, r4
     28  1.1  christos 	test_h_gr r4, 21
     29  1.1  christos 
     30  1.1  christos 	pass
     31