jalr1.s 1.91 KB
/****************************************************************
  This program tests the instruction: jalr
 ****************************************************************/

#include "suregre.h"

.base 0x04001000

	LI(r0 , 0xFFFF, 0xFFFF);
	LI(r1 , 0x0101, 0x0101);
	LI(r2 , 0x0202, 0x0202);
	LI(r3 , 0x0303, 0x0303);
	LI(r4 , 0x0404, 0x0404);
	LI(r5 , 0x0505, 0x0505);
	LI(r6 , 0x0606, 0x0606);
	LI(r7 , 0x0707, 0x0707);
	LI(r8 , 0x0808, 0x0808);
	LI(r9 , 0x0909, 0x0909);
	LI(r10, 0x0A0A, 0x0A0A);
	LI(r11, 0x0B0B, 0x0B0B);
	LI(r12, 0x0C0C, 0x0C0C);
	LI(r13, 0x0D0D, 0x0D0D);
	LI(r14, 0x0E0E, 0x0E0E);
	LI(r15, 0x0F0F, 0x0F0F);
	LI(r16, 0x1010, 0x1010);
	LI(r17, 0x1111, 0x1111);
	LI(r18, 0x1212, 0x1212);
	LI(r19, 0x1313, 0x1313);
	LI(r20, 0x1414, 0x1414);
	LI(r21, 0x1515, 0x1515);
	LI(r22, 0x1616, 0x1616);
	LI(r23, 0x1717, 0x1717);
	LI(r24, 0x1818, 0x1818);
	LI(r25, 0x1919, 0x1919);
	LI(r26, 0x1A1A, 0x1A1A);
	LI(r27, 0x1B1B, 0x1B1B);
	LI(r28, 0x1C1C, 0x1C1C);
	LI(r29, 0x1D1D, 0x1D1D);
	LI(r30, 0x1E1E, 0x1E1E);
	LI(r31, 0x1F1F, 0x1F1F);
	ChkJALR( 1,jalr,r3 ,r4 ,r2 )
	ChkJALR( 2,jalr,r4 ,r5 ,r3 )
	ChkJALR( 3,jalr,r5 ,r6 ,r4 )
	ChkJALR( 4,jalr,r6 ,r7 ,r5 )
	ChkJALR( 5,jalr,r7 ,r8 ,r6 )
	ChkJALR( 6,jalr,r8 ,r9 ,r7 )
	ChkJALR( 7,jalr,r9 ,r10,r8 )
	ChkJALR( 8,jalr,r10,r11,r9 )
	ChkJALR( 9,jalr,r11,r12,r10)
	ChkJALR(10,jalr,r12,r13,r11)
	ChkJALR(11,jalr,r13,r14,r12)
	ChkJALR(12,jalr,r14,r15,r13)
	ChkJALR(13,jalr,r15,r16,r14)
	ChkJALR(14,jalr,r16,r17,r15)
	ChkJALR(15,jalr,r17,r18,r16)
	ChkJALR(16,jalr,r18,r19,r17)
	ChkJALR(17,jalr,r19,r20,r18)
	ChkJALR(18,jalr,r20,r21,r19)
	ChkJALR(19,jalr,r21,r22,r20)
	ChkJALR(20,jalr,r22,r23,r21)
	ChkJALR(21,jalr,r23,r24,r22)
	ChkJALR(22,jalr,r24,r25,r23)
	ChkJALR(23,jalr,r25,r26,r24)
	ChkJALR(24,jalr,r26,r27,r25)
	ChkJALR(25,jalr,r27,r28,r26)
	ChkJALR(26,jalr,r28,r29,r27)
	ChkJALR(27,jalr,r29,r30,r28)
	ChkJALR(28,jalr,r30,r2 ,r29)
	ChkJALR(29,jalr,r2 ,r3 ,r30)

	ori	r1, r0, 0xFEED;
Fail:	break;