Home | History | Annotate | Line # | Download | only in cr16 
      1 # cr16 testcase for jal $sr
      2 # mach(): cr16
      3 
      4 	.include "testutils.inc"
      5 
      6 	start
      7 
      8 	.global jal
      9 jal:
     10 	movd $ok1, (r5, r4)
     11 	lshd $-1, (r5,r4)
     12 	jal (ra), (r5,r4)
     13 not_ok:
     14 	fail
     15 ok1:
     16 	movd $not_ok, (r7, r6)
     17 	lshd $-1, (r7,r6)
     18 	cmpd (r7,r6), (ra)
     19 	beq ok2
     20 	br not_ok
     21 ok2:
     22 	movd $ok3, (r5, r4)
     23 	lshd $-1, (r5,r4)
     24 	jal (r1,r0), (r5,r4)
     25 not_ok1:
     26 	br not_ok
     27 ok3:
     28 	movd $not_ok1, (r7, r6)
     29 	lshd $-1, (r7,r6)
     30 	cmpd (r7,r6), (r1,r0)
     31 	beq ok4
     32         br not_ok
     33 ok4:
     34 
     35 	pass
     36