|
|
1.1 ! root 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: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.