xref: /original-bsd/sys/tahoe/align/Astf.c (revision 79cf7955)
1 /*	Astf.c	1.1	86/07/20	*/
2 
3 #include "../tahoealign/align.h"
4 stf(infop)	process_info *infop;
5 /*
6 /*	Store accumulator (float) in destination.
7 /*
8 /*************************************************/
9 {
10 
11 	write_back (infop, acc_high, operand(infop,0) );
12 	if (acc_high < 0) negative_1; else negative_0;
13 	if ( (acc_high & 0xff800000) == 0 ) zero_1; else zero_0;
14 	carry_1; overflow_0;
15 }
16