|
|
1.1 root 1: data 1
2: even
3: global x
4: x:
5: short 1
6: text
7: global main
8: main:
9: link %fp,&F%1
10: movm.l &M%1,S%1(%fp)
11: mov.l &0,%d2
12: L%16:
13: cmp.w %d2,&10
14: bge L%15
15: add.w &1,x
16: L%14:
17: add.w &1,%d2
18: br L%16
19: L%15:
20: L%13:
21: movm.l S%1(%fp),&M%1
22: unlk %fp
23: rts
24: set S%1,-4
25: set T%1,-4
26: set F%1,-8
27: set M%1,0x0004
28: data 1
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.