![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to t02.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 t02.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: L38:
4: .long 1
5: .align 2
6: L39:
7: .long 2
8: .align 2
9: L42:
10: .long 3
11: .align 2
12: L44:
13: .long 4
14: .align 2
15: L46:
16: .long 5
17: .align 2
18: L48:
19: .long 6
20: .align 2
21: L50:
22: .long 7
23: .align 2
24: L52:
25: .long 8
26: .align 2
27: L54:
28: .long 9
29: .align 2
30: L56:
31: .long 10
32: .align 2
33: L58:
34: .long 11
35: .align 2
36: L60:
37: .long 13
38: .align 2
39: L62:
40: .long 14
41: .align 2
42: L64:
43: .long 15
44: .align 2
45: L66:
46: .long 16
47: .align 2
48: L68:
49: .long 17
50: .align 2
51: L70:
52: .long 18
53: .align 2
54: L72:
55: .long 19
56: .align 2
57: L74:
58: .long 20
59: .align 2
60: L76:
61: .long 21
62: .align 2
63: L78:
64: .long 22
65: .align 2
66: L80:
67: .long 23
68: .align 2
69: L82:
70: .long 24
71: .data 2
72: .data 1
73: .data 0
74: .globl _MAIN_
75: .globl _e_
76: .globl _pow_ii
77: .align 2
78: .stabs "t02.f",0x64,0,0,0
79:
80: .text
81: .globl _MAIN_
82: .align 1
83: _MAIN_:
84: .word LWM1
85: subl3 $LF1,fp,sp
86: jbr L12
87: L13:
88: movl $1,v.2-v.1(r11)
89: movl $2,v.3-v.1(r11)
90: movl $3,v.4-v.1(r11)
91: movl $4,v.5-v.1(r11)
92: movl $10,v.6-v.1(r11)
93: addl3 v.3-v.1(r11),v.2-v.1(r11),r0
94: cmpl r0,v.4-v.1(r11)
95: jeql L15
96: pushl $L39
97: pushl $L38
98: callf $12,_e_
99: L15:
100: addl3 v.4-v.1(r11),v.2-v.1(r11),r0
101: cmpl r0,v.5-v.1(r11)
102: jeql L16
103: pushl $L39
104: pushl $L39
105: callf $12,_e_
106: L16:
107: subl3 v.4-v.1(r11),v.3-v.1(r11),r0
108: mnegl v.2-v.1(r11),r1
109: cmpl r0,r1
110: jeql L17
111: pushl $L39
112: pushl $L42
113: callf $12,_e_
114: L17:
115: addl3 v.4-v.1(r11),v.3-v.1(r11),r0
116: mull2 v.3-v.1(r11),r0
117: cmpl r0,v.6-v.1(r11)
118: jeql L18
119: pushl $L39
120: pushl $L44
121: callf $12,_e_
122: L18:
123: mnegl v.6-v.1(r11),r0
124: addl3 v.4-v.1(r11),v.4-v.1(r11),r1
125: addl2 v.5-v.1(r11),r1
126: mnegl r1,r1
127: cmpl r0,r1
128: jeql L19
129: pushl $L39
130: pushl $L46
131: callf $12,_e_
132: L19:
133: divl3 v.2-v.1(r11),v.2-v.1(r11),r0
134: cmpl r0,$1
135: jeql L20
136: pushl $L39
137: pushl $L48
138: callf $12,_e_
139: L20:
140: mull3 v.6-v.1(r11),v.6-v.1(r11),r0
141: divl2 v.6-v.1(r11),r0
142: cmpl r0,v.6-v.1(r11)
143: jeql L21
144: pushl $L39
145: pushl $L50
146: callf $12,_e_
147: L21:
148: mull3 $10,v.6-v.1(r11),r0
149: cmpl r0,$100
150: jeql L22
151: pushl $L39
152: pushl $L52
153: callf $12,_e_
154: L22:
155: mull3 $-10,v.6-v.1(r11),r0
156: cmpl r0,$-100
157: jeql L23
158: pushl $L39
159: pushl $L54
160: callf $12,_e_
161: L23:
162: divl3 v.4-v.1(r11),v.3-v.1(r11),r0
163: jeql L24
164: pushl $L39
165: pushl $L56
166: callf $12,_e_
167: L24:
168: divl3 v.4-v.1(r11),$100,r0
169: cmpl r0,$33
170: jeql L25
171: pushl $L39
172: pushl $L58
173: callf $12,_e_
174: L25:
175: mull3 v.4-v.1(r11),v.3-v.1(r11),r0
176: mull2 v.6-v.1(r11),r0
177: divl2 $6,r0
178: cmpl r0,$10
179: jeql L26
180: pushl $L39
181: pushl $L60
182: callf $12,_e_
183: L26:
184: cmpl v.4-v.1(r11),$4
185: jgtr L9999
186: cmpl v.4-v.1(r11),$4
187: jgeq L9999
188: cmpl v.4-v.1(r11),$4
189: jneq L27
190: L9999:
191: pushl $L39
192: pushl $L62
193: callf $12,_e_
194: L27:
195: cmpl v.6-v.1(r11),v.3-v.1(r11)
196: jlss L9998
197: cmpl v.6-v.1(r11),v.3-v.1(r11)
198: jleq L9998
199: cmpl v.6-v.1(r11),v.3-v.1(r11)
200: jneq L28
201: L9998:
202: pushl $L39
203: pushl $L64
204: callf $12,_e_
205: L28:
206: addl3 v.3-v.1(r11),v.2-v.1(r11),r0
207: cmpl v.4-v.1(r11),r0
208: jeql L29
209: pushl $L39
210: pushl $L66
211: callf $12,_e_
212: L29:
213: cmpl v.3-v.1(r11),v.2-v.1(r11)
214: jgeq L30
215: pushl $L39
216: pushl $L68
217: callf $12,_e_
218: L30:
219: cmpl v.3-v.1(r11),v.2-v.1(r11)
220: jgtr L31
221: pushl $L39
222: pushl $L70
223: callf $12,_e_
224: L31:
225: cmpl v.3-v.1(r11),v.2-v.1(r11)
226: jneq L32
227: pushl $L39
228: pushl $L72
229: callf $12,_e_
230: L32:
231: cmpl v.3-v.1(r11),v.3-v.1(r11)
232: jeql L33
233: pushl $L39
234: pushl $L74
235: callf $12,_e_
236: L33:
237: cmpl v.2-v.1(r11),v.3-v.1(r11)
238: jlss L34
239: pushl $L39
240: pushl $L76
241: callf $12,_e_
242: L34:
243: cmpl v.2-v.1(r11),v.3-v.1(r11)
244: jleq L35
245: pushl $L39
246: pushl $L78
247: callf $12,_e_
248: L35:
249: mull3 v.4-v.1(r11),v.4-v.1(r11),r0
250: cmpl r0,$9
251: jeql L36
252: pushl $L39
253: pushl $L80
254: callf $12,_e_
255: L36:
256: addl3 $v.4-v.1,r11,r0
257: pushl r0
258: addl3 $v.3-v.1,r11,r0
259: pushl r0
260: callf $12,_pow_ii
261: cmpl r0,$8
262: jeql L37
263: pushl $L39
264: pushl $L82
265: callf $12,_e_
266: L37:
267: L14:
268: ret#0
269: L12:
270: movl $v.1,r11
271: jbr L13
272: .set LF1,52
273: .set LWM1,0x1800
274: .text
275: .data 2
276: .align 2
277: v.3:
278: .space 4
279: .align 2
280: v.5:
281: .space 4
282: .align 2
283: v.6:
284: .space 4
285: .align 2
286: v.4:
287: .space 4
288: .align 2
289: v.2:
290: .space 4
291: .set v.1,v.6
292:
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.