|
|
1.1 ! root 1: /* Abbs.c 1.1 86/07/20 */ ! 2: ! 3: #include "../tahoealign/align.h" ! 4: bbs(infop) process_info *infop; ! 5: /* ! 6: /* Branch on bit set. ! 7: /* ! 8: /********************************/ ! 9: { ! 10: register int position,base, new_address; ! 11: ! 12: position = operand(infop,0)-> data & 0x1f; ! 13: base = operand(infop,1)->data; ! 14: new_address = operand(infop,2) -> address; ! 15: negative_0; zero_1; overflow_0; carry_1; ! 16: if (base & 1 << position) pc = new_address; ! 17: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.