xref: /original-bsd/sys/tahoe/align/Adivf.c (revision a4d3ae46)
1 /*	Adivf.c	1.1	86/07/20	*/
2 
3 #include "../tahoealign/align.h"
4 divf(infop)	process_info *infop;
5 /*
6 /*	Divide accumulator by operand to accumulator (float).
7 /*
8 /*******************************************************************/
9 {
10 	register float	*operand_pnt;
11 	register float	*acc_pnt;
12 
13 	operand_pnt = (float *)&operand(infop,0)->data;
14 	acc_pnt = (float *) &acc_high;
15 	*acc_pnt = *acc_pnt / *operand_pnt;
16 }
17