1 /*- 2 * Copyright (c) 1986 The Regents of the University of California. 3 * All rights reserved. 4 * 5 * This code is derived from software contributed to Berkeley by 6 * Computer Consoles Inc. 7 * 8 * %sccs.include.redist.c% 9 * 10 * @(#)Acvlf.c 7.1 (Berkeley) 12/06/90 11 */ 12 13 #include "align.h" 14 cvlf(infop) process_info *infop; 15 /* 16 /* Convert integer to float (into accumulator). 17 /* 18 /******************************************************/ 19 { 20 register long Register_12; /* Has to be first reg ! */ 21 register long Register_11; 22 register float *Register_10; 23 /* 24 register long Register_9; 25 register long Register_8; 26 */ 27 register struct oprnd *oppnt; 28 29 Register_11 = operand(infop,0)->data; 30 Register_10 = (float *) &acc_high; 31 Register_12 = psl; 32 Set_psl (r12); 33 asm (" cvlf r11"); /* Don't change the order !! */ 34 asm (" movpsl r12"); 35 asm (" stf (r10)"); 36 New_cc ( Register_12 ); 37 } 38