xref: /csrg-svn/sys/tahoe/align/Aaddf.c (revision 45760)
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  *	@(#)Aaddf.c	7.1 (Berkeley) 12/06/90
11*45760Sbostic  */
1229586Ssam 
1345699Sbostic #include "align.h"
addf(infop)1429586Ssam addf(infop)	process_info *infop;
1529586Ssam /*
1629586Ssam /*	Add operand with accumulator to accumulator (float).
1729586Ssam /*
1829586Ssam /*************************************************************/
1929586Ssam {
2029586Ssam 	register float 	*operand_pnt;
2129586Ssam 	register float	*acc_pnt;
2229586Ssam 
2329586Ssam 	operand_pnt = (float *)&operand(infop,0)->data;
2429586Ssam 	acc_pnt = (float *) &acc_high;
2529586Ssam 	*acc_pnt = *acc_pnt + *operand_pnt;
2629586Ssam }
27