|
|
1.1 root 1: #
2: # 20con.s
3: #
4: # CONOPS
5: #
6: _CON1:
7: cvtbw (r10)+,-(sp)
8: jmp (r8)
9: _CON2:
10: incl r10
11: movw (r10)+,-(sp)
12: jmp (r8)
13: _CON4:
14: incl r10
15: pushl (r10)+
16: jmp (r8)
17: _CON8:
18: incl r10
19: movd (r10)+,-(sp)
20: jmp (r8)
21: _CON:
22: cvtbl (r10)+,r0
23: bneq l2001
24: cvtwl (r10)+,r0 #r0 has length to be moved
25: l2001:
26: movl r10,r1 #r1 has addr of data to be moved
27: movl r0,r2 #r2 has length of stack space
28: blbc r2,l2002
29: incl r2
30: l2002:
31: subl2 r2,sp #allocate stack space
32: addl2 r2,r10 #advance over data
33: movc5 r0,(r1),$0,r2,(sp) #move string to stack
34: jmp (r8)
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.