|
|
BSD 4.3tahoe
/* Aloadr.c 1.1 86/07/20 */
#include "../tahoealign/align.h"
loadr(infop) process_info *infop;
/*
/* Load multiple registers.
/*
/***************************************/
{
register long mask, next_register, new_address;
mask = operand(infop,0)->data & 0x3fff; /* Bits 0 to 13 only */
new_address = operand(infop,1)->address;
next_register = 0; /* Register # */
while (next_register <= 13)
{
if (mask & 1 << next_register)
{
Replace (infop, next_register,
get_longword (infop, new_address));
new_address += 4;
}
next_register++ ;
}
}
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.