![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to t11.t0 CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Power 6/32 Unix Tahoe 4.2BSD] / cci / usr / src / usr.bin / f77 / f77pass1 / tst|
Return to t11.t0 CVS log | Up to [Power 6/32 Unix Tahoe 4.2BSD] / cci / usr / src / usr.bin / f77 / f77pass1 / tst |
1.1 root 1: .data 0
2: .align 2
3: L16:
4: .long 2
5: .align 2
6: L18:
7: .long 1
8: .align 2
9: L19:
10: .long 11
11: .align 2
12: L21:
13: .long 3
14: .align 2
15: L27:
16: .long 5
17: .align 2
18: L32:
19: .long 100
20: .align 2
21: L33:
22: .long 4
23: .align 2
24: L35:
25: .long 10
26: .align 2
27: L39:
28: .long 15
29: .align 2
30: L41:
31: .long 6
32: .align 2
33: L43:
34: .long 20
35: .align 2
36: L45:
37: .long 7
38: .data 2
39: .data 1
40: .data 0
41: .data 2
42: .data 1
43: .data 0
44: .data 2
45: .data 1
46: .data 0
47: .globl _MAIN_
48: .globl _ack_
49: .globl _e_
50: .globl _fib0_
51: .globl _fib_
52: .align 2
53: .stabs "t11.f",0x64,0,0,0
54:
55: .text
56: .globl _MAIN_
57: .align 1
58: _MAIN_:
59: .word LWM1
60: subl3 $LF1,fp,sp
61: jbr L12
62: L13:
63: pushl $L16
64: pushl $L16
65: callf $12,_ack_
66: cmpl r0,$7
67: jeql L15
68: pushl $L19
69: pushl $L18
70: callf $12,_e_
71: L15:
72: pushl $L21
73: pushl $L21
74: callf $12,_ack_
75: cmpl r0,$61
76: jeql L20
77: pushl $L19
78: pushl $L16
79: callf $12,_e_
80: L20:
81: pushl $L27
82: pushl $L21
83: callf $12,_ack_
84: cmpl r0,$253
85: jeql L25
86: pushl $L19
87: pushl $L21
88: callf $12,_e_
89: L25:
90: pushl $L32
91: pushl $L16
92: callf $12,_ack_
93: cmpl r0,$203
94: jeql L30
95: pushl $L19
96: pushl $L33
97: callf $12,_e_
98: L30:
99: addl3 $v.2-v.1,r11,r0
100: pushl r0
101: pushl $L35
102: callf $12,_fib0_
103: cmpl v.2-v.1(r11),$55
104: jeql L36
105: pushl $L19
106: pushl $L27
107: callf $12,_e_
108: L36:
109: addl3 $v.2-v.1,r11,r0
110: pushl r0
111: pushl $L39
112: callf $12,_fib_
113: cmpl v.2-v.1(r11),$610
114: jeql L40
115: pushl $L19
116: pushl $L41
117: callf $12,_e_
118: L40:
119: addl3 $v.2-v.1,r11,r0
120: pushl r0
121: pushl $L43
122: callf $12,_fib_
123: cmpl v.2-v.1(r11),$6765
124: jeql L44
125: pushl $L19
126: pushl $L45
127: callf $12,_e_
128: L44:
129: L14:
130: ret#0
131: L12:
132: movl $v.1,r11
133: jbr L13
134: .set LF1,52
135: .set LWM1,0x1800
136: .text
137: .globl _ack_
138: .align 1
139: _ack_:
140: .word LWM2
141: subl3 $LF2,fp,sp
142: jbr L48
143: L50:
144: tstl *4(r12)
145: jneq L53
146: jbr L54
147: L53:
148: tstl *8(r12)
149: jneq L55
150: jbr L56
151: L55:
152: addl3 $-1,*4(r12),r0
153: movl r0,-64(fp)
154: addl3 $-1,*8(r12),r0
155: movl r0,-72(fp)
156: addl3 $-72,fp,r0
157: pushl r0
158: pushl 4(r12)
159: callf $12,_ack_
160: movl r0,-68(fp)
161: addl3 $-68,fp,r0
162: pushl r0
163: addl3 $-64,fp,r0
164: pushl r0
165: callf $12,_ack_
166: movl r0,-60(fp)
167: jbr L49
168: L54:
169: addl3 $1,*8(r12),r0
170: movl r0,-60(fp)
171: jbr L49
172: L56:
173: addl3 $-1,*4(r12),r0
174: movl r0,-76(fp)
175: pushl $L18
176: addl3 $-76,fp,r0
177: pushl r0
178: callf $12,_ack_
179: movl r0,-60(fp)
180: L49:
181: movl -60(fp),r0
182: ret#1
183: L48:
184: movl fp,r12
185: jbr L50
186: .set LF2,76
187: .set LWM2,0x1000
188: .text
189: .globl _fib0_
190: .align 1
191: _fib0_:
192: .word LWM3
193: subl3 $LF3,fp,sp
194: jbr L63
195: L66:
196: movl $1,v.5-v.4(r11)
197: movl $1,v.6-v.4(r11)
198: movl $2,v.7-v.4(r11)
199: L68:
200: addl3 $1,v.7-v.4(r11),r0
201: movl r0,r10
202: movl *4(r12),-56(fp)
203: cmpl r0,-56(fp)
204: jgtr L70
205: L71:
206: movl r10,v.8-v.4(r11)
207: addl3 v.6-v.4(r11),v.5-v.4(r11),r0
208: movl r0,*8(r12)
209: movl v.6-v.4(r11),v.5-v.4(r11)
210: movl *8(r12),v.6-v.4(r11)
211: L69:
212: incl r10
213: cmpl r10,-56(fp)
214: jleq L71
215: L70:
216: movl r10,v.8-v.4(r11)
217: movl *4(r12),v.7-v.4(r11)
218: L65:
219: L64:
220: ret#0
221: L63:
222: movl $v.4,r11
223: movl 4(fp),-64(fp)
224: movl 8(fp),-60(fp)
225: subl3 $68,fp,r12
226: jbr L66
227: .align 1
228: _fib_:
229: .word LWM3
230: subl3 $LF3,fp,sp
231: movl $v.4,r11
232: movl 4(fp),-64(fp)
233: movl 8(fp),-60(fp)
234: subl3 $68,fp,r12
235: jbr L68
236: .set LF3,68
237: .set LWM3,0x1C00
238: .text
239: .data 2
240: .align 2
241: v.2:
242: .space 4
243: .set v.1,v.2
244:
245: .align 2
246: v.7:
247: .space 4
248: .align 2
249: v.5:
250: .space 4
251: .align 2
252: v.6:
253: .space 4
254: .align 2
255: v.8:
256: .space 4
257: .set v.4,v.6
258:
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.