1*45760Sbostic /*- 2*45760Sbostic * Copyright (c) 1986 The Regents of the University of California. 3*45760Sbostic * All rights reserved. 4*45760Sbostic * 5*45760Sbostic * This code is derived from software contributed to Berkeley by 6*45760Sbostic * Computer Consoles Inc. 7*45760Sbostic * 8*45760Sbostic * %sccs.include.redist.c% 9*45760Sbostic * 10*45760Sbostic * @(#)Acvlf.c 7.1 (Berkeley) 12/06/90 11*45760Sbostic */ 1229600Ssam 1345699Sbostic #include "align.h" cvlf(infop)1429600Ssamcvlf(infop) process_info *infop; 1529600Ssam /* 1629600Ssam /* Convert integer to float (into accumulator). 1729600Ssam /* 1829600Ssam /******************************************************/ 1929600Ssam { 2029600Ssam register long Register_12; /* Has to be first reg ! */ 2129600Ssam register long Register_11; 2229600Ssam register float *Register_10; 2329600Ssam /* 2429600Ssam register long Register_9; 2529600Ssam register long Register_8; 2629600Ssam */ 2729600Ssam register struct oprnd *oppnt; 2829600Ssam 2929600Ssam Register_11 = operand(infop,0)->data; 3029600Ssam Register_10 = (float *) &acc_high; 3129600Ssam Register_12 = psl; 3229600Ssam Set_psl (r12); 3329600Ssam asm (" cvlf r11"); /* Don't change the order !! */ 3429600Ssam asm (" movpsl r12"); 3529600Ssam asm (" stf (r10)"); 3629600Ssam New_cc ( Register_12 ); 3729600Ssam } 38