xref: /original-bsd/sys/tahoe/align/Apusha.c (revision b65ab6e5)
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)14 pusha(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