Home | History | Annotate | Line # | Download | only in bfin
      1  1.1  christos //  Test extraction from accumulators:
      2  1.1  christos //  SCALE in SIGNED INTEGER mode
      3  1.1  christos # mach: bfin
      4  1.1  christos 
      5  1.1  christos .include "testutils.inc"
      6  1.1  christos 	start
      7  1.1  christos 
      8  1.1  christos 
      9  1.1  christos // load r0=0x00000fff
     10  1.1  christos // load r1=0x00007fff
     11  1.1  christos // load r2=0xffffffff
     12  1.1  christos // load r3=0xffff0fff
     13  1.1  christos // load r4=0x000000ff
     14  1.1  christos 	loadsym P0, data0;
     15  1.1  christos 	R0 = [ P0 ++ ];
     16  1.1  christos 	R1 = [ P0 ++ ];
     17  1.1  christos 	R2 = [ P0 ++ ];
     18  1.1  christos 	R3 = [ P0 ++ ];
     19  1.1  christos 	R4 = [ P0 ++ ];
     20  1.1  christos 
     21  1.1  christos // SCALE
     22  1.1  christos //  0x0000000fff -> SCALE 0x1ffe
     23  1.1  christos 	A1 = A0 = 0;
     24  1.1  christos 	A1.w = R0;
     25  1.1  christos 	A0.w = R0;
     26  1.1  christos 	R5.H = A1, R5.L = A0 (ISS2);
     27  1.1  christos 	DBGA ( R5.L , 0x1ffe );
     28  1.1  christos 	DBGA ( R5.H , 0x1ffe );
     29  1.1  christos 
     30  1.1  christos // SCALE
     31  1.1  christos //  0x0000007fff -> SCALE 0x7fff
     32  1.1  christos 	A1 = A0 = 0;
     33  1.1  christos 	A1.w = R1;
     34  1.1  christos 	A0.w = R1;
     35  1.1  christos 	R5.H = A1, R5.L = A0 (ISS2);
     36  1.1  christos 	DBGA ( R5.L , 0x7fff );
     37  1.1  christos 	DBGA ( R5.H , 0x7fff );
     38  1.1  christos 
     39  1.1  christos // SCALE
     40  1.1  christos //  0xffffffffff -> SCALE 0xfffe
     41  1.1  christos 	A1 = A0 = 0;
     42  1.1  christos 	A1.w = R2;
     43  1.1  christos 	A0.w = R2;
     44  1.1  christos 	A1.x = R4.L;
     45  1.1  christos 	A0.x = R4.L;
     46  1.1  christos 	R5.H = A1, R5.L = A0 (ISS2);
     47  1.1  christos 	DBGA ( R5.L , 0xfffe );
     48  1.1  christos 	DBGA ( R5.H , 0xfffe );
     49  1.1  christos 
     50  1.1  christos // SCALE
     51  1.1  christos //  0xffffff0fff -> SCALE 0x8000
     52  1.1  christos 	A1 = A0 = 0;
     53  1.1  christos 	A1.w = R3;
     54  1.1  christos 	A0.w = R3;
     55  1.1  christos 	A1.x = R4.L;
     56  1.1  christos 	A0.x = R4.L;
     57  1.1  christos 	R5.H = A1, R5.L = A0 (ISS2);
     58  1.1  christos 	DBGA ( R5.L , 0x8000 );
     59  1.1  christos 	DBGA ( R5.H , 0x8000 );
     60  1.1  christos 
     61  1.1  christos 	pass
     62  1.1  christos 
     63  1.1  christos 	.data
     64  1.1  christos data0:
     65  1.1  christos 	.dw 0x0fff
     66  1.1  christos 	.dw 0x0000
     67  1.1  christos 	.dw 0x7fff
     68  1.1  christos 	.dw 0x0000
     69  1.1  christos 	.dw 0xffff
     70  1.1  christos 	.dw 0xffff
     71  1.1  christos 	.dw 0x0fff
     72  1.1  christos 	.dw 0xffff
     73  1.1  christos 	.dw 0x00ff
     74  1.1  christos 	.dw 0x0000
     75