Commit | Line | Data |
---|---|---|
b202b2da CH |
1 | #\f |
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) |