![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to spill.s CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Research Unix] / researchv10no / cmd / lcc / gen2 / sparc-sun / tst|
Return to spill.s CVS log | Up to [Research Unix] / researchv10no / cmd / lcc / gen2 / sparc-sun / tst |
1.1 root 1: .seg "text"
2: .global _main
3: .align 4
4: .proc 4
5: _main:
6: L1:
7: retl; nop
8: .global _f
9: .align 4
10: .proc 4
11: _f:save %sp,-96,%sp
12: call _f; nop
13: mov %r8,%r29
14: call _f; nop
15: add %r29,%r8,%r24
16: L2:
17: ret; restore
18: .global _f2
19: .align 4
20: .proc 4
21: _f2:save %sp,-96,%sp
22: call _f; nop
23: mov %r8,%r28
24: cmp %r24,%r0; be L6; nop
25: call _f; nop
26: mov %r8,%r29
27: ba L7; nop
28: L6:
29: set 1,%r29
30: L7:
31: add %r28,%r29,%r24
32: L4:
33: ret; restore
34: .global _f3
35: .align 4
36: .proc 4
37: _f3:save %sp,-104,%sp
38: mov %r0,%r29
39: mov %r0,%r28
40: mov %r0,%r27
41: mov %r0,%r26
42: mov %r0,%r23
43: mov %r0,%r22
44: mov %r0,%r21
45: mov %r0,%r20
46: st %r0,[%fp+-4]
47: st %r0,[%fp+-8]
48: mov %r25,%r19
49: add %r19,4,%r25
50: st %r24,[%fp+-12]
51: ld [%fp+-12],%r18
52: cmp %r18,%r0; be L11; nop
53: call _f; nop
54: st %r8,[%fp+-12]
55: L11:
56: ld [%fp+-12],%r18
57: st %r18,[%r19]
58: L9:
59: ret; restore
60: .global _f4
61: .align 4
62: .proc 4
63: _f4:save %sp,-96,%sp
64: mov %r0,%r29
65: mov %r0,%r28
66: mov %r0,%r27
67: mov %r0,%r26
68: mov %r0,%r25
69: mov %r0,%r24
70: set _i,%r22
71: ld [%r22],%r22
72: sll %r22,3,%r21
73: set _a,%r20
74: add %r21,%r20,%r20
75: ld [%r20],%f30; ld [%r20+4],%f31
76: set _b,%r20
77: add %r21,%r20,%r21
78: ld [%r21],%f28; ld [%r21+4],%f29
79: faddd %f30,%f28,%f26
80: set L17,%r21
81: ld [%r21],%f24; ld [%r21+4],%f25
82: fcmped %f26,%f24; nop; fbue L15; nop
83: cmp %r22,%r0; be L15; nop
84: fsubd %f30,%f28,%f30
85: fcmped %f30,%f24; nop; fbue L15; nop
86: set 1,%r23
87: ba L16; nop
88: L15:
89: mov %r0,%r23
90: L16:
91: set _i,%r22
92: st %r23,[%r22]
93: L13:
94: ret; restore
95: .global _f5
96: .align 4
97: .proc 4
98: _f5:save %sp,-96,%sp
99: set _k,%r29
100: ld [%r29],%r29
101: set _m,%r28
102: ld [%r28],%r28
103: mov %r28,%o1; call .mul,2; mov %r29,%o0; mov %o0,%r27
104: set _j,%r26
105: ld [%r26],%r26
106: mov %r28,%o1; call .mul,2; mov %r26,%o0; mov %o0,%r28
107: set _n,%r25
108: ld [%r25],%r25
109: mov %r25,%o1; call .mul,2; mov %r29,%o0; mov %o0,%r29
110: mov %r25,%o1; call .mul,2; mov %r26,%o0; mov %o0,%r26
111: sll %r27,3,%r27
112: set _A,%r25
113: ld [%r25],%r25
114: add %r27,%r25,%r27
115: ld [%r27],%f30; ld [%r27+4],%f31
116: sll %r28,3,%r28
117: add %r28,%r25,%r28
118: ld [%r28],%f28; ld [%r28+4],%f29
119: fmuld %f30,%f28,%f30
120: sll %r29,3,%r29
121: set _B,%r25
122: ld [%r25],%r25
123: add %r29,%r25,%r29
124: ld [%r29],%f28; ld [%r29+4],%f29
125: sll %r26,3,%r26
126: add %r26,%r25,%r26
127: ld [%r26],%f26; ld [%r26+4],%f27
128: fmuld %f28,%f26,%f28
129: faddd %f30,%f28,%f30
130: set _x,%r25
131: st %f30,[%r25]; st %f31,[%r25+4]
132: ld [%r27],%f30; ld [%r27+4],%f31
133: ld [%r26],%f28; ld [%r26+4],%f29
134: fmuld %f30,%f28,%f30
135: ld [%r29],%f28; ld [%r29+4],%f29
136: ld [%r28],%f26; ld [%r28+4],%f27
137: fmuld %f28,%f26,%f28
138: fsubd %f30,%f28,%f30
139: st %f30,[%r25]; st %f31,[%r25+4]
140: L18:
141: ret; restore
142: .seg "bss"
143: .global _x
144: .align 8; .common _x,8
145: .global _B
146: .align 4; .common _B,4
147: .global _A
148: .align 4; .common _A,4
149: .global _n
150: .align 4; .common _n,4
151: .global _m
152: .align 4; .common _m,4
153: .global _k
154: .align 4; .common _k,4
155: .global _j
156: .align 4; .common _j,4
157: .global _i
158: .align 4; .common _i,4
159: .global _b
160: .align 8; .common _b,80
161: .global _a
162: .align 8; .common _a,80
163: .seg "text"
164: .align 8; L17:.word 0x0,0x0
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.