1 /* Apushx.c 1.1 86/07/20 */ 2 3 #include "../tahoealign/align.h" 4 pushx(infop) process_info *infop; 5 /* 6 /* Push operand on the stack. 7 /* 8 /******************************************/ 9 { 10 register long quantity; 11 12 quantity = operand(infop,0)->data ; 13 if (quantity < 0) negative_1; else negative_0; 14 if (quantity == 0) zero_1; else zero_0; 15 overflow_0; carry_1; 16 push (infop, quantity); 17 } 18