bgezal1.s 4.15 KB
/****************************************************************
  This program tests the instruction: bgezal
 ****************************************************************/

#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);
	ChkBrlWT( 1,bgezal,r3 ,0x0000,0x0000,r2 )
	ChkBrlWT( 2,bgezal,r4 ,0x0000,0x0001,r3 )
	ChkBrlWT( 3,bgezal,r5 ,0x0000,0x0002,r4 )
	ChkBrlWT( 4,bgezal,r6 ,0x0000,0x0004,r5 )
	ChkBrlWT( 5,bgezal,r7 ,0x0000,0x0008,r6 )
	ChkBrlWT( 6,bgezal,r8 ,0x0000,0x0010,r7 )
	ChkBrlWT( 7,bgezal,r9 ,0x0000,0x0020,r8 )
	ChkBrlWT( 8,bgezal,r10,0x0000,0x0040,r9 )
	ChkBrlWT( 9,bgezal,r11,0x0000,0x0080,r10)
	ChkBrlWT(10,bgezal,r12,0x0000,0x0100,r11)
	ChkBrlWT(11,bgezal,r13,0x0000,0x0200,r12)
	ChkBrlWT(12,bgezal,r14,0x0000,0x0400,r13)
	ChkBrlWT(13,bgezal,r15,0x0000,0x0800,r14)
	ChkBrlWT(14,bgezal,r16,0x0000,0x1000,r15)
	ChkBrlWT(15,bgezal,r17,0x0000,0x2000,r16)
	ChkBrlWT(16,bgezal,r18,0x0000,0x4000,r17)
	ChkBrlWT(17,bgezal,r19,0x0000,0x8000,r18)
	ChkBrlWT(18,bgezal,r20,0x0001,0x0000,r19)
	ChkBrlWT(19,bgezal,r21,0x0002,0x0000,r20)
	ChkBrlWT(20,bgezal,r22,0x0004,0x0000,r21)
	ChkBrlWT(21,bgezal,r23,0x0008,0x0000,r22)
	ChkBrlWT(22,bgezal,r24,0x0010,0x0000,r23)
	ChkBrlWT(23,bgezal,r25,0x0020,0x0000,r24)
	ChkBrlWT(24,bgezal,r26,0x0040,0x0000,r25)
	ChkBrlWT(25,bgezal,r27,0x0080,0x0000,r26)
	ChkBrlWT(26,bgezal,r28,0x0100,0x0000,r27)
	ChkBrlWT(27,bgezal,r29,0x0200,0x0000,r28)
	ChkBrlWT(28,bgezal,r30,0x0400,0x0000,r29)
	ChkBrlWT(29,bgezal,r2 ,0x0800,0x0000,r30)
	ChkBrlWT(30,bgezal,r3 ,0x1000,0x0000,r2 )
	ChkBrlWT(31,bgezal,r4 ,0x2000,0x0000,r3 )
	ChkBrlWT(32,bgezal,r5 ,0x4000,0x0000,r4 )
	ChkBrlWF(33,bgezal,r6 ,0x8000,0x0000,r5 )
	ChkBrlWF(34,bgezal,r7 ,0x8000,0x0001,r6 )
	ChkBrlWF(35,bgezal,r8 ,0x8000,0x0003,r7 )
	ChkBrlWF(36,bgezal,r9 ,0x8000,0x0007,r8 )
	ChkBrlWF(37,bgezal,r10,0x8000,0x000F,r9 )
	ChkBrlWF(38,bgezal,r11,0x8000,0x001F,r10)
	ChkBrlWF(39,bgezal,r12,0x8000,0x003F,r11)
	ChkBrlWF(40,bgezal,r13,0x8000,0x007F,r12)
	ChkBrlWF(41,bgezal,r14,0x8000,0x00FF,r13)
	ChkBrlWF(42,bgezal,r15,0x8000,0x01FF,r14)
	ChkBrlWF(43,bgezal,r16,0x8000,0x03FF,r15)
	ChkBrlWF(44,bgezal,r17,0x8000,0x07FF,r16)
	ChkBrlWF(45,bgezal,r18,0x8000,0x0FFF,r17)
	ChkBrlWF(46,bgezal,r19,0x8000,0x1FFF,r18)
	ChkBrlWF(47,bgezal,r20,0x8000,0x3FFF,r19)
	ChkBrlWF(48,bgezal,r21,0x8000,0x7FFF,r20)
	ChkBrlWF(49,bgezal,r22,0x8000,0xFFFF,r21)
	ChkBrlWF(50,bgezal,r23,0x8001,0xFFFF,r22)
	ChkBrlWF(51,bgezal,r24,0x8003,0xFFFF,r23)
	ChkBrlWF(52,bgezal,r25,0x8007,0xFFFF,r24)
	ChkBrlWF(53,bgezal,r26,0x800F,0xFFFF,r25)
	ChkBrlWF(54,bgezal,r27,0x801F,0xFFFF,r26)
	ChkBrlWF(55,bgezal,r28,0x803F,0xFFFF,r27)
	ChkBrlWF(56,bgezal,r29,0x807F,0xFFFF,r28)
	ChkBrlWF(57,bgezal,r30,0x80FF,0xFFFF,r29)
	ChkBrlWF(58,bgezal,r2 ,0x81FF,0xFFFF,r30)
	ChkBrlWF(59,bgezal,r3 ,0x83FF,0xFFFF,r2 )

	ori	r1, r0, 0xFEED;
Fail:	sw	r0, 0xf80(r0);
	sw	r1, 0xf84(r0);
	sw	r2, 0xf88(r0);
	sw	r3, 0xf8c(r0);
	sw	r4, 0xf90(r0);
	sw	r5, 0xf94(r0);
	sw	r6, 0xf98(r0);
	sw	r7, 0xf9c(r0);
	sw	r8, 0xfa0(r0);
	sw	r9, 0xfa4(r0);
	sw	r10, 0xfa8(r0);
	sw	r11, 0xfac(r0);
	sw	r12, 0xfb0(r0);
	sw	r13, 0xfb4(r0);
	sw	r14, 0xfb8(r0);
	sw	r15, 0xfbc(r0);
	sw	r16, 0xfc0(r0);
	sw	r17, 0xfc4(r0);
	sw	r18, 0xfc8(r0);
	sw	r19, 0xfcc(r0);
	sw	r20, 0xfd0(r0);
	sw	r21, 0xfd4(r0);
	sw	r22, 0xfd8(r0);
	sw	r23, 0xfdc(r0);
	sw	r24, 0xfe0(r0);
	sw	r25, 0xfe4(r0);
	sw	r26, 0xfe8(r0);
	sw	r27, 0xfec(r0);
	sw	r28, 0xff0(r0);
	sw	r29, 0xff4(r0);
	sw	r30, 0xff8(r0);
	sw	r31, 0xffc(r0);
	break;