1*45699Sbostic /* Acvld.c 1.2 90/12/04 */ 229600Ssam 3*45699Sbostic #include "align.h" 429600Ssam cvld(infop) process_info *infop; 529600Ssam /* 629600Ssam /* Convert integer to double (into accumulator). 729600Ssam /* 829600Ssam /******************************************************/ 929600Ssam { 1029600Ssam register long Register_12; /* Has to be first reg ! */ 1129600Ssam register double *Register_11; 1229600Ssam register long Register_10; 1329600Ssam 1429600Ssam Register_11 = (double *) &acc_high; 1529600Ssam Register_10 = operand(infop,0)->data; 1629600Ssam Register_12=psl; 1729600Ssam Set_psl(r12); /* restore the user psl */ 1829600Ssam asm (" cvld r10"); /* Don't change the order !! */ 1929600Ssam asm (" movpsl r12"); 2029600Ssam asm (" std (r11)"); 2129600Ssam New_cc (Register_12); 2229600Ssam } 23