1 /*- 2 * Copyright (c) 1986 The Regents of the University of California. 3 * All rights reserved. 4 * 5 * This code is derived from software contributed to Berkeley by 6 * Computer Consoles Inc. 7 * 8 * %sccs.include.redist.c% 9 * 10 * @(#)Apusha.c 7.1 (Berkeley) 12/06/90 11 */ 12 13 #include "align.h" pusha(infop)14pusha(infop) process_info *infop; 15 /* 16 /* Push address of the operand 17 /* 18 /**************************************/ 19 { 20 register long new_address; 21 22 new_address = operand(infop,0)->address; 23 if (new_address < 0) negative_1; else negative_0; 24 if (new_address == 0) zero_1; else zero_0; 25 overflow_0; carry_1; 26 push (infop, new_address); 27 } 28