Commit | Line | Data |
---|---|---|
7c27088c KB |
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) %G% | |
11 | */ | |
ee982d5e | 12 | |
6499767c | 13 | #include "align.h" |
ee982d5e SL |
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 | } |