![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to t18.t2 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 t18.t2 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: L32:
4: .long 0
5: .align 2
6: L33:
7: .long 1
8: .align 2
9: L34:
10: .long 18
11: .align 2
12: L35:
13: .long 2
14: .align 2
15: L38:
16: .long 3
17: .align 2
18: L41:
19: .long 4
20: .align 2
21: L46:
22: .long 5
23: .align 2
24: L53:
25: .long 6
26: .align 2
27: L55:
28: .long 7
29: .align 2
30: L58:
31: .long 8
32: .align 2
33: L61:
34: .long 15
35: .align 2
36: L62:
37: .long 9
38: .align 2
39: L65:
40: .long 10
41: .align 2
42: L67:
43: .long 11
44: .align 2
45: L70:
46: .long 12
47: .align 2
48: L74:
49: .long 324
50: .align 2
51: L75:
52: .long 13
53: .align 2
54: L78:
55: .long 400
56: .align 2
57: L79:
58: .long 14
59: .align 2
60: L82:
61: .long 1369
62: .data 2
63: .data 1
64: .data 0
65: .data 2
66: .data 1
67: .data 0
68: .data 2
69: .data 1
70: .data 0
71: .data 2
72: .data 1
73: .data 0
74: .data 2
75: .data 1
76: .data 0
77: .data 2
78: .data 1
79: .data 0
80: .data 2
81: .data 1
82: .data 0
83: .data 2
84: .data 1
85: .data 0
86: .data 2
87: .data 1
88: .data 0
89: .data 2
90: .data 1
91: .data 0
92: .data 2
93: .data 1
94: .data 0
95: .globl _MAIN_
96: .globl _incr_
97: .globl _e_
98: .globl _decr_
99: .globl _double_
100: .globl _eval_
101: .globl _apply_
102: .globl _x1_
103: .globl _p1_
104: .globl _x2_
105: .globl _p0_
106: .comm _p1c_,4
107: .globl _p2_
108: .align 2
109: .stabs "t18.f",0x64,0,0,0
110: .text
111: .globl _MAIN_
112: .set LF1,124
113: .set LWM1,0x1800
114: .align 1
115: _MAIN_:.word LWM1
116: subl3 $LF1,fp,sp
117: movl $v.1,r11
118: movl $10,v.3-v.1(r11)
119: movl $20,v.4-v.1(r11)
120: pushl $L32
121: callf $8,_incr_
122: cmpl r0,$1
123: jeql L15
124: pushl $L34
125: pushl $L33
126: callf $12,_e_
127: L15:addl3 $v.3-v.1,r11,-(sp)
128: callf $8,_decr_
129: cmpl r0,$9
130: jeql L16
131: pushl $L34
132: pushl $L35
133: callf $12,_e_
134: L16:addl3 v.4-v.1(r11),v.3-v.1(r11),-72(fp)
135: subl3 $72,fp,-(sp)
136: callf $8,_double_
137: cmpl r0,$60
138: jeql L17
139: pushl $L34
140: pushl $L38
141: callf $12,_e_
142: L17:addl3 $v.4-v.1,r11,-(sp)
143: callf $8,_double_
144: movl r0,-76(fp)
145: subl3 $76,fp,-(sp)
146: callf $8,_incr_
147: cmpl r0,$41
148: jeql L18
149: pushl $L34
150: pushl $L41
151: callf $12,_e_
152: L18:addl3 $v.3-v.1,r11,-(sp)
153: callf $8,_double_
154: movl r0,-88(fp)
155: subl3 $88,fp,-(sp)
156: callf $8,_incr_
157: movl r0,-84(fp)
158: subl3 $84,fp,-(sp)
159: callf $8,_double_
160: movl r0,-80(fp)
161: subl3 $80,fp,-(sp)
162: callf $8,_decr_
163: cmpl r0,$41
164: jeql L19
165: pushl $L34
166: pushl $L46
167: callf $12,_e_
168: L19:pushl $L46
169: callf $8,_incr_
170: movl r0,-104(fp)
171: subl3 $104,fp,-(sp)
172: callf $8,_incr_
173: movl r0,-100(fp)
174: subl3 $100,fp,-(sp)
175: callf $8,_incr_
176: movl r0,-96(fp)
177: subl3 $96,fp,-(sp)
178: callf $8,_incr_
179: movl r0,-92(fp)
180: subl3 $92,fp,-(sp)
181: callf $8,_incr_
182: cmpl r0,$10
183: jeql L20
184: pushl $L34
185: pushl $L53
186: callf $12,_e_
187: L20:addl3 $v.3-v.1,r11,-(sp)
188: pushl $_incr_
189: callf $12,_eval_
190: cmpl r0,$11
191: jeql L21
192: pushl $L34
193: pushl $L55
194: callf $12,_e_
195: L21:pushl $L38
196: pushl $_decr_
197: callf $12,_eval_
198: cmpl r0,$2
199: jeql L22
200: pushl $L34
201: pushl $L58
202: callf $12,_e_
203: L22:pushl $L61
204: pushl $_double_
205: callf $12,_eval_
206: movl r0,-108(fp)
207: subl3 $108,fp,-(sp)
208: callf $8,_incr_
209: cmpl r0,$31
210: jeql L23
211: pushl $L34
212: pushl $L62
213: callf $12,_e_
214: L23:pushl $L38
215: pushl $_incr_
216: callf $12,_apply_
217: cmpl r0,$4
218: jeql L24
219: pushl $L34
220: pushl $L65
221: callf $12,_e_
222: L24:addl3 $v.4-v.1,r11,-(sp)
223: addl3 $v.3-v.1,r11,-(sp)
224: pushl $_double_
225: callf $16,_x1_
226: cmpl v.4-v.1(r11),$40
227: jeql L25
228: pushl $L34
229: pushl $L67
230: callf $12,_e_
231: L25:addl3 $3,v.3-v.1(r11),-112(fp)
232: addl3 $v.4-v.1,r11,-(sp)
233: subl3 $112,fp,-(sp)
234: pushl $_incr_
235: callf $16,_x1_
236: cmpl v.4-v.1(r11),$27
237: jeql L26
238: pushl $L34
239: pushl $L70
240: callf $12,_e_
241: L26:pushl $L75
242: pushl $L74
243: pushl $L46
244: pushl $L38
245: callf $20,_p1_
246: pushl $L79
247: pushl $L78
248: pushl $L41
249: pushl $L65
250: callf $20,_p1_
251: pushl $L61
252: pushl $L82
253: pushl $L58
254: pushl $L33
255: callf $20,_p1_
256: movl $1,v.4-v.1(r11)
257: addl3 $v.4-v.1,r11,-(sp)
258: callf $8,_double_
259: movl r0,-56(fp)
260: addl3 r0,r0,-116(fp)
261: subl3 $116,fp,-(sp)
262: callf $8,_incr_
263: movl r0,-60(fp)
264: addl3 $1,r0,-120(fp)
265: subl3 $120,fp,-(sp)
266: callf $8,_double_
267: movl r0,-64(fp)
268: addl3 r0,r0,-124(fp)
269: subl3 $124,fp,-(sp)
270: callf $8,_incr_
271: movl r0,-68(fp)
272: addl3 $1,r0,r0
273: cmpl r0,$26
274: jeql L14
275: pushl $L34
276: pushl $L75
277: callf $12,_e_
278: L14:ret#0
279: .globl _incr_
280: .set LF2,60
281: .set LWM2,0x1000
282: .align 1
283: _incr_:.word LWM2
284: subl3 $LF2,fp,sp
285: movl fp,r12
286: addl3 $1,*4(r12),-60(fp)
287: movl -60(fp),r0
288: ret#1
289: .globl _decr_
290: .set LF3,60
291: .set LWM3,0x1000
292: .align 1
293: _decr_:.word LWM3
294: subl3 $LF3,fp,sp
295: movl fp,r12
296: subl3 $1,*4(r12),-60(fp)
297: movl -60(fp),r0
298: ret#1
299: .globl _double_
300: .set LF4,60
301: .set LWM4,0x1000
302: .align 1
303: _double_:.word LWM4
304: subl3 $LF4,fp,sp
305: movl fp,r12
306: addl3 *4(r12),*4(r12),-60(fp)
307: movl -60(fp),r0
308: ret#1
309: .globl _eval_
310: .set LF5,60
311: .set LWM5,0x1000
312: .align 1
313: _eval_:.word LWM5
314: subl3 $LF5,fp,sp
315: movl fp,r12
316: pushl 8(r12)
317: calls $8,*4(r12)
318: movl r0,-60(fp)
319: ret#1
320: .globl _apply_
321: .set LF6,60
322: .set LWM6,0x1000
323: .align 1
324: _apply_:.word LWM6
325: subl3 $LF6,fp,sp
326: movl fp,r12
327: pushl 8(r12)
328: pushl 4(r12)
329: callf $12,_eval_
330: movl r0,-60(fp)
331: ret#1
332: .globl _x1_
333: .set LF7,56
334: .set LWM7,0x1000
335: .align 1
336: _x1_:.word LWM7
337: subl3 $LF7,fp,sp
338: movl fp,r12
339: addl3 *8(r12),*8(r12),-56(fp)
340: pushl 12(r12)
341: subl3 $56,r12,-(sp)
342: pushl 4(r12)
343: callf $16,_x2_
344: ret#0
345: .globl _x2_
346: .set LF8,52
347: .set LWM8,0x1000
348: .align 1
349: _x2_:.word LWM8
350: subl3 $LF8,fp,sp
351: movl fp,r12
352: pushl 8(r12)
353: pushl 4(r12)
354: callf $12,_apply_
355: movl r0,*12(r12)
356: ret#0
357: .globl _p0_
358: .set LF9,60
359: .set LWM9,0x1000
360: .align 1
361: _p0_:.word LWM9
362: subl3 $LF9,fp,sp
363: movl fp,r12
364: tstl *12(r12)
365: jneq L138
366: pushl 8(r12)
367: calls $8,*4(r12)
368: jbr L134
369: L138:addl3 *12(r12),*8(r12),-56(fp)
370: subl3 $1,*12(r12),-60(fp)
371: subl3 $60,fp,-(sp)
372: subl3 $56,fp,-(sp)
373: pushl 4(r12)
374: callf $16,_p0_
375: L134:ret#0
376: .globl _p1_
377: .set LF10,52
378: .set LWM10,0x1000
379: .align 1
380: _p1_:.word LWM10
381: subl3 $LF10,fp,sp
382: movl fp,r12
383: clrl _p1c_
384: pushl 8(r12)
385: pushl 4(r12)
386: pushl $_p2_
387: callf $16,_p0_
388: cmpl _p1c_,*12(r12)
389: jeql L144
390: pushl $L34
391: pushl 16(r12)
392: callf $12,_e_
393: L144:ret#0
394: .globl _p2_
395: .set LF11,52
396: .set LWM11,0x1000
397: .align 1
398: _p2_:.word LWM11
399: subl3 $LF11,fp,sp
400: movl fp,r12
401: mull3 *4(r12),*4(r12),_p1c_
402: ret#0
403:
404: .data 2
405: .align 2
406: v.4:
407: .space 4
408: .align 2
409: v.2:
410: .space 4
411: .align 2
412: v.3:
413: .space 4
414: .set v.1,v.2
415:
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.