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