/* Apusha.c 1.1 86/07/20 */ #include "../tahoealign/align.h" pusha(infop) process_info *infop; /* /* Push address of the operand /* /**************************************/ { register long new_address; new_address = operand(infop,0)->address; if (new_address < 0) negative_1; else negative_0; if (new_address == 0) zero_1; else zero_0; overflow_0; carry_1; push (infop, new_address); }