Home | History | Annotate | Line # | Download | only in bfin 
      1  1.1  christos //  test RND setting AZ
      2  1.1  christos # mach: bfin
      3  1.1  christos 
      4  1.1  christos .include "testutils.inc"
      5  1.1  christos 	start
      6  1.1  christos 
      7  1.1  christos 
      8  1.1  christos //  result is zero with overflow ==> AZ, therefore, is not set
      9  1.1  christos 	R0.L = 0x8000;
     10  1.1  christos 	R0 = R0.L (X);
     11  1.1  christos 	R1.L = R0 (RND);
     12  1.1  christos 	CC = AZ;	R7 = CC;
     13  1.1  christos 	DBGA(R1.L, 0);
     14  1.1  christos 	DBGA ( R7.L , 0x1 );
     15  1.1  christos 
     16  1.1  christos // No Overflow, result is zero, AZ is set
     17  1.1  christos 	R0 = 1 (X);
     18  1.1  christos 	R1.L = r0 (RND);
     19  1.1  christos 	CC = AZ;	R7 = CC;
     20  1.1  christos 	DBGA(R1.L, 0);
     21  1.1  christos 	DBGA ( R7.L , 0x1 );
     22  1.1  christos 
     23  1.1  christos // result should be 1
     24  1.1  christos 	R0.L = 0x8000;
     25  1.1  christos 	R0.H = 0;
     26  1.1  christos 	R1.L = R0 (RND);
     27  1.1  christos 	CC = AZ;	R7 = CC;
     28  1.1  christos 	DBGA(R1.L, 1);
     29  1.1  christos 	DBGA ( R7.L , 0x0 );
     30  1.1  christos 
     31  1.1  christos // Result should be non-zero
     32  1.1  christos 	R0.H = 0x7ff0;
     33  1.1  christos 	R0.L = 0x8000;
     34  1.1  christos 	R1.L = R0 (RND);
     35  1.1  christos 	CC = AZ;	R7 = CC;
     36  1.1  christos 	DBGA(R1.L, 0x7ff1);
     37  1.1  christos 	DBGA ( R7.L , 0x0 );
     38  1.1  christos 
     39  1.1  christos 	pass
     40