|
|
BSD 4.3reno
/* Apushx.c 1.1 86/07/20 */
#include "../tahoealign/align.h"
pushx(infop) process_info *infop;
/*
/* Push operand on the stack.
/*
/******************************************/
{
register long quantity;
quantity = operand(infop,0)->data ;
if (quantity < 0) negative_1; else negative_0;
if (quantity == 0) zero_1; else zero_0;
overflow_0; carry_1;
push (infop, quantity);
}
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.