1*45699Sbostic /* Acvlf.c 1.2 90/12/04 */ 229600Ssam 3*45699Sbostic #include "align.h" 429600Ssam cvlf(infop) process_info *infop; 529600Ssam /* 629600Ssam /* Convert integer to float (into accumulator). 729600Ssam /* 829600Ssam /******************************************************/ 929600Ssam { 1029600Ssam register long Register_12; /* Has to be first reg ! */ 1129600Ssam register long Register_11; 1229600Ssam register float *Register_10; 1329600Ssam /* 1429600Ssam register long Register_9; 1529600Ssam register long Register_8; 1629600Ssam */ 1729600Ssam register struct oprnd *oppnt; 1829600Ssam 1929600Ssam Register_11 = operand(infop,0)->data; 2029600Ssam Register_10 = (float *) &acc_high; 2129600Ssam Register_12 = psl; 2229600Ssam Set_psl (r12); 2329600Ssam asm (" cvlf r11"); /* Don't change the order !! */ 2429600Ssam asm (" movpsl r12"); 2529600Ssam asm (" stf (r10)"); 2629600Ssam New_cc ( Register_12 ); 2729600Ssam } 28