|
|
1.1 root 1:
2: error(regs)
3: long *regs;
4: { long ix;
5:
6: asm("pushab err1");
7: asm("callf $8,_writes");
8:
9: for(ix=0;ix<14;ix++) {
10: writeh(regs[ix]);
11: if (ix==6) {
12: asm("pushab err3");
13: asm("callf $8,_writes");
14: }
15: else {
16: asm("pushab err2");
17: asm("callf $8,_writes");
18: }
19: }
20: ix = 0;
21: asm("pushab err4");
22: asm("callf $8,_writes");
23: }
24:
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.