Home | History | Annotate | Line # | Download | only in cr16
ashub.cgs revision 1.1 
      1  1.1  christos # cr16 testcase for ashub $sr,$dr
      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 ashub
      9  1.1  christos ashub:
     10  1.1  christos 
     11  1.1  christos 	movw  $0x12f1, r4
     12  1.1  christos 	movw  $4,r5
     13  1.1  christos 	ashub       r5, r4
     14  1.1  christos 
     15  1.1  christos 	cmpw $0x1210, r4
     16  1.1  christos 	beq ok
     17  1.1  christos not_ok:
     18  1.1  christos 	fail
     19  1.1  christos ok:
     20  1.1  christos 	movw  $0x12f1, r4
     21  1.1  christos 	movw  $-4,r5
     22  1.1  christos 	ashub       r5, r4
     23  1.1  christos 
     24  1.1  christos 	test_h_gr r4, 0x12ff
     25  1.1  christos 
     26  1.1  christos 	pass
     27