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 * @(#)Asubf.c 7.1 (Berkeley) 12/06/90 11*45760Sbostic */ 1229639Ssam 1345699Sbostic #include "align.h" subf(infop)1429639Ssamsubf(infop) process_info *infop; 1529639Ssam /* 1629639Ssam /* Subtract operand from accumulator to accumulator (float). 1729639Ssam /* 1829639Ssam /*******************************************************************/ 1929639Ssam { 2029639Ssam register float *operand_pnt; 2129639Ssam register float *acc_pnt; 2229639Ssam 2329639Ssam operand_pnt = (float *)&operand(infop,0)->data; 2429639Ssam acc_pnt = (float *) &acc_high; 2529639Ssam *acc_pnt = *acc_pnt - *operand_pnt; 2629639Ssam } 27