|
|
1.1 root 1: .seg "text"
2: .global _main
3: .align 4
4: .proc 4
5: _main:
6: L1:
7: retl; nop
8: .global _memchar
9: .align 4
10: .proc 4
11: _memchar:save %sp,-104,%sp
12: ld [%fp+-8],%r29
13: add %r29,1,%r28
14: st %r28,[%fp+-8]
15: ldsb [%r29],%r29
16: stb %r29,[%fp+-1]
17: ld [%fp+-8],%r29
18: add %r29,1,%r29
19: st %r29,[%fp+-8]
20: ldsb [%r29],%r29
21: stb %r29,[%fp+-1]
22: ld [%fp+-8],%r29
23: add %r29,-1,%r28
24: st %r28,[%fp+-8]
25: ldsb [%r29],%r29
26: stb %r29,[%fp+-1]
27: ld [%fp+-8],%r29
28: add %r29,-1,%r29
29: st %r29,[%fp+-8]
30: ldsb [%r29],%r29
31: stb %r29,[%fp+-1]
32: L2:
33: ret; restore
34: .global _memint
35: .align 4
36: .proc 4
37: _memint:save %sp,-104,%sp
38: ld [%fp+-8],%r29
39: add %r29,4,%r28
40: st %r28,[%fp+-8]
41: ld [%r29],%r29
42: st %r29,[%fp+-4]
43: ld [%fp+-8],%r29
44: add %r29,4,%r29
45: st %r29,[%fp+-8]
46: ld [%r29],%r29
47: st %r29,[%fp+-4]
48: ld [%fp+-8],%r29
49: add %r29,-4,%r28
50: st %r28,[%fp+-8]
51: ld [%r29],%r29
52: st %r29,[%fp+-4]
53: ld [%fp+-8],%r29
54: add %r29,-4,%r29
55: st %r29,[%fp+-8]
56: ld [%r29],%r29
57: st %r29,[%fp+-4]
58: L3:
59: ret; restore
60: .global _regchar
61: .align 4
62: .proc 4
63: _regchar:
64: mov %r12,%r11
65: add %r11,1,%r12
66: ldsb [%r11],%r13
67: add %r12,1,%r11
68: mov %r11,%r12
69: ldsb [%r11],%r13
70: mov %r12,%r11
71: add %r11,-1,%r12
72: ldsb [%r11],%r13
73: add %r12,-1,%r11
74: mov %r11,%r12
75: ldsb [%r11],%r13
76: L4:
77: retl; nop
78: .global _regint
79: .align 4
80: .proc 4
81: _regint:
82: mov %r12,%r11
83: add %r11,4,%r12
84: ld [%r11],%r13
85: add %r12,4,%r11
86: mov %r11,%r12
87: ld [%r11],%r13
88: mov %r12,%r11
89: add %r11,-4,%r12
90: ld [%r11],%r13
91: add %r12,-4,%r11
92: mov %r11,%r12
93: ld [%r11],%r13
94: L5:
95: retl; nop
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.