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 * @(#)Astf.c 7.1 (Berkeley) 12/06/90 11*45760Sbostic */ 1229636Ssam 1345699Sbostic #include "align.h" stf(infop)1429636Ssamstf(infop) process_info *infop; 1529636Ssam /* 1629636Ssam /* Store accumulator (float) in destination. 1729636Ssam /* 1829636Ssam /*************************************************/ 1929636Ssam { 2029636Ssam 2129636Ssam write_back (infop, acc_high, operand(infop,0) ); 2229636Ssam if (acc_high < 0) negative_1; else negative_0; 2329636Ssam if ( (acc_high & 0xff800000) == 0 ) zero_1; else zero_0; 2429636Ssam carry_1; overflow_0; 2529636Ssam } 26