xref: /csrg-svn/sys/tahoe/align/Astd.c (revision 45699)
1 /*	Astd.c	1.2	90/12/04	*/
2 
3 #include "align.h"
4 std(infop)	process_info *infop;
5 /*
6 /*	Store accumulator (double) in destination.
7 /*
8 /*************************************************/
9 {
10 	quadword ac;
11 
12 	ac.high = acc_high;
13 	ac.low = acc_low;
14 	write_quadword (infop, ac, operand(infop,0) );
15 	if (ac.high < 0) negative_1; else negative_0;
16 	if ( (ac.high & 0xff800000) == 0 ) zero_1; else zero_0;
17 	carry_1;
18 	overflow_0;
19 }
20