|
|
BSD 4.3reno
/* 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);
}
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.