/* 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++ ; } }