![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to t10.t1 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 t10.t1 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: L33:
4: .long 1
5: .align 2
6: L34:
7: .long 10
8: .align 2
9: L35:
10: .long 2
11: .align 2
12: L37:
13: .long 3
14: .align 2
15: L39:
16: .long 4
17: .align 2
18: L41:
19: .long 5
20: .align 2
21: L43:
22: .long 6
23: .align 2
24: L45:
25: .long 7
26: .align 2
27: L47:
28: .long 8
29: .align 2
30: L49:
31: .long 0x3ECCCCCD # .float .1
32: .align 2
33: L50:
34: .long 0x3F4CCCCD # .float .2
35: .align 2
36: L51:
37: .long 0x3F99999A # .float .30000001
38: .align 2
39: L52:
40: .long 0x41000000 # .float 2
41: .align 2
42: L53:
43: .long 0xC0800000 # .float -1
44: .align 2
45: L54:
46: .long 0xC7FFFE00 # .float -32767
47: .align 2
48: L55:
49: .long 0x00000000 # .float 0
50: .align 2
51: L56:
52: .long 0x39D1B717 # .float 9.9999997e-05
53: .align 2
54: L57:
55: .long 9
56: .align 2
57: L59:
58: .long 0x43C80000 # .float 100
59: .align 2
60: L60:
61: .long 0x40000000 # .float .5
62: .align 2
63: L63:
64: .long 0x47FFFE00 # .float 32767
65: .align 2
66: L64:
67: .long 11
68: .data 2
69: .data 1
70: .data 0
71: .globl _MAIN_
72: .globl _e_
73: .align 2
74: .stabs "t10.f",0x64,0,0,0
75:
76: .text
77: .globl _MAIN_
78: .align 1
79: _MAIN_:
80: .word LWM1
81: subl3 $LF1,fp,sp
82: jbr L12
83: L13:
84: movl $3,v.2-v.1(r11)
85: movl $2,v.3-v.1(r11)
86: movl $-100,v.4-v.1(r11)
87: shll $1,v.3-v.1(r11),r0
88: addl2 v.2-v.1(r11),r0
89: mull2 v.3-v.1(r11),r0
90: addl2 $3,r0
91: mull2 v.2-v.1(r11),r0
92: addl2 v.3-v.1(r11),r0
93: mull2 v.2-v.1(r11),r0
94: addl2 v.3-v.1(r11),r0
95: mull2 v.2-v.1(r11),r0
96: addl2 v.3-v.1(r11),r0
97: mull2 v.2-v.1(r11),r0
98: incl r0
99: movl r0,v.5-v.1(r11)
100: cmpl v.5-v.1(r11),$1456
101: jeql L15
102: pushl $L34
103: pushl $L33
104: callf $12,_e_
105: L15:
106: clrl v.5-v.1(r11)
107: tstl v.5-v.1(r11)
108: jeql L16
109: pushl $L34
110: pushl $L35
111: callf $12,_e_
112: L16:
113: mull3 v.3-v.1(r11),v.2-v.1(r11),r0
114: mull3 $3,v.2-v.1(r11),r1
115: addl2 r1,r0
116: addl2 $-5,r0
117: divl2 $10,r0
118: movl r0,-56(fp)
119: mull3 -56(fp),-56(fp),r0
120: mull2 -56(fp),r0
121: movl r0,-60(fp)
122: addl3 -60(fp),-60(fp),r0
123: movl r0,v.5-v.1(r11)
124: cmpl v.5-v.1(r11),$2
125: jeql L17
126: pushl $L34
127: pushl $L37
128: callf $12,_e_
129: L17:
130: addl3 v.3-v.1(r11),v.3-v.1(r11),r0
131: divl2 $4,r0
132: movl r0,-64(fp)
133: divl3 $3,v.3-v.1(r11),r0
134: divl3 $4,v.3-v.1(r11),r1
135: addl2 r1,r0
136: addl2 $3,r0
137: mull3 -64(fp),-64(fp),r1
138: mull2 -64(fp),r1
139: mull2 r1,r0
140: movl r0,-68(fp)
141: addl3 -68(fp),-68(fp),r0
142: movl r0,v.5-v.1(r11)
143: cmpl v.5-v.1(r11),$6
144: jeql L18
145: pushl $L34
146: pushl $L39
147: callf $12,_e_
148: L18:
149: mull3 v.3-v.1(r11),v.3-v.1(r11),r0
150: mull2 v.3-v.1(r11),r0
151: mull2 v.3-v.1(r11),r0
152: mull2 v.3-v.1(r11),r0
153: mull2 v.3-v.1(r11),r0
154: mull2 v.3-v.1(r11),r0
155: mull2 v.3-v.1(r11),r0
156: mull2 v.3-v.1(r11),r0
157: mull2 v.3-v.1(r11),r0
158: mull2 v.3-v.1(r11),r0
159: mull2 v.3-v.1(r11),r0
160: mull2 v.3-v.1(r11),r0
161: mull2 v.3-v.1(r11),r0
162: addl2 $-16383,r0
163: movl r0,v.2-v.1(r11)
164: cmpl v.2-v.1(r11),$1
165: jeql L19
166: pushl $L34
167: pushl $L41
168: callf $12,_e_
169: L19:
170: addl3 v.2-v.1(r11),v.2-v.1(r11),r0
171: addl2 v.2-v.1(r11),r0
172: addl2 v.2-v.1(r11),r0
173: addl2 v.2-v.1(r11),r0
174: addl2 v.2-v.1(r11),r0
175: addl2 v.2-v.1(r11),r0
176: addl2 v.2-v.1(r11),r0
177: addl2 v.2-v.1(r11),r0
178: addl2 v.2-v.1(r11),r0
179: addl2 v.2-v.1(r11),r0
180: addl2 v.2-v.1(r11),r0
181: addl2 v.2-v.1(r11),r0
182: addl2 v.2-v.1(r11),r0
183: addl2 v.2-v.1(r11),r0
184: addl2 v.2-v.1(r11),r0
185: movl r0,v.5-v.1(r11)
186: cmpl v.5-v.1(r11),$16
187: jeql L20
188: pushl $L34
189: pushl $L43
190: callf $12,_e_
191: L20:
192: addl3 v.3-v.1(r11),v.3-v.1(r11),r0
193: addl2 v.3-v.1(r11),r0
194: addl2 v.3-v.1(r11),r0
195: addl2 v.3-v.1(r11),r0
196: addl2 v.3-v.1(r11),r0
197: addl2 v.3-v.1(r11),r0
198: addl2 v.3-v.1(r11),r0
199: addl2 v.3-v.1(r11),r0
200: addl2 v.3-v.1(r11),r0
201: addl2 v.3-v.1(r11),r0
202: addl2 v.3-v.1(r11),r0
203: addl2 v.3-v.1(r11),r0
204: addl2 v.3-v.1(r11),r0
205: addl2 v.3-v.1(r11),r0
206: addl2 v.3-v.1(r11),r0
207: addl2 v.3-v.1(r11),r0
208: movl r0,v.5-v.1(r11)
209: cmpl v.5-v.1(r11),$34
210: jeql L21
211: pushl $L34
212: pushl $L45
213: callf $12,_e_
214: L21:
215: mnegl v.3-v.1(r11),r0
216: mnegl r0,r0
217: mnegl r0,r0
218: mnegl r0,r0
219: mnegl r0,r0
220: mnegl r0,r0
221: mnegl r0,r0
222: mnegl r0,r0
223: mnegl r0,r0
224: movl r0,v.5-v.1(r11)
225: cmpl v.5-v.1(r11),$-2
226: jeql L22
227: pushl $L34
228: pushl $L47
229: callf $12,_e_
230: L22:
231: movl L49,v.6-v.1(r11)
232: movl L50,v.7-v.1(r11)
233: movl L51,v.8-v.1(r11)
234: ldf v.6-v.1(r11)
235: addf v.7-v.1(r11)
236: stf r0
237: ldf r0
238: divf v.8-v.1(r11)
239: stf r0
240: ldf r0
241: mulf L52
242: stf r0
243: movl r0,-72(fp)
244: ldf -72(fp)
245: addf -72(fp)
246: stf r0
247: ldf r0
248: addf -72(fp)
249: stf r0
250: ldf r0
251: addf -72(fp)
252: stf r0
253: movl r0,-76(fp)
254: ldf -76(fp)
255: mulf -76(fp)
256: stf r0
257: ldf r0
258: mulf -76(fp)
259: stf r0
260: ldf r0
261: mulf -76(fp)
262: stf r0
263: ldf r0
264: mulf -76(fp)
265: stf r0
266: ldf r0
267: addf L53
268: stf r0
269: movl r0,v.9-v.1(r11)
270: ldf v.9-v.1(r11)
271: addf L54
272: stf r0
273: movl r0,-80(fp)
274: cmpf2 L55,-80(fp)
275: jgtr L9999
276: movl -80(fp),r0
277: jbr L9998
278: L9999:
279: lnf -80(fp)
280: stf r0
281: L9998:
282: cmpf2 r0,L56
283: jleq L23
284: pushl $L34
285: pushl $L57
286: callf $12,_e_
287: L23:
288: ldf v.7-v.1(r11)
289: mulf L59
290: stf r0
291: ldf r0
292: addf L60
293: stf r0
294: ldf r0
295: cvfl r0
296: movl r0,v.2-v.1(r11)
297: cmpl v.2-v.1(r11),$20
298: jeql L24
299: pushl $L34
300: pushl $L34
301: callf $12,_e_
302: L24:
303: movl $32767,v.2-v.1(r11)
304: cvlf v.2-v.1(r11)
305: stf r0
306: movl r0,v.9-v.1(r11)
307: cmpf2 v.9-v.1(r11),L63
308: jeql L25
309: pushl $L34
310: pushl $L64
311: callf $12,_e_
312: L25:
313: L14:
314: ret#0
315: L12:
316: movl $v.1,r11
317: jbr L13
318: .set LF1,80
319: .set LWM1,0x1800
320: .text
321: .data 2
322: .align 2
323: v.2:
324: .space 4
325: .align 2
326: v.4:
327: .space 4
328: .align 2
329: v.9:
330: .space 4
331: .align 2
332: v.7:
333: .space 4
334: .align 2
335: v.8:
336: .space 4
337: .align 2
338: v.6:
339: .space 4
340: .align 2
341: v.5:
342: .space 4
343: .align 2
344: v.3:
345: .space 4
346: .set v.1,v.8
347:
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.