1*29635Ssam /* Astd.c 1.1 86/07/20 */ 2*29635Ssam 3*29635Ssam #include "../tahoealign/align.h" 4*29635Ssam std(infop) process_info *infop; 5*29635Ssam /* 6*29635Ssam /* Store accumulator (double) in destination. 7*29635Ssam /* 8*29635Ssam /*************************************************/ 9*29635Ssam { 10*29635Ssam quadword ac; 11*29635Ssam 12*29635Ssam ac.high = acc_high; 13*29635Ssam ac.low = acc_low; 14*29635Ssam write_quadword (infop, ac, operand(infop,0) ); 15*29635Ssam if (ac.high < 0) negative_1; else negative_0; 16*29635Ssam if ( (ac.high & 0xff800000) == 0 ) zero_1; else zero_0; 17*29635Ssam carry_1; 18*29635Ssam overflow_0; 19*29635Ssam } 20