![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to t02.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 t02.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: 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: .text
80: .globl _MAIN_
81: .set LF1,52
82: .set LWM1,0x1800
83: .align 1
84: _MAIN_:.word LWM1
85: subl3 $LF1,fp,sp
86: movl $v.1,r11
87: movl $1,v.2-v.1(r11)
88: movl $2,v.3-v.1(r11)
89: movl $3,v.4-v.1(r11)
90: movl $4,v.5-v.1(r11)
91: movl $10,v.6-v.1(r11)
92: addl3 v.3-v.1(r11),v.2-v.1(r11),r0
93: cmpl r0,v.4-v.1(r11)
94: jeql L15
95: pushl $L39
96: pushl $L38
97: callf $12,_e_
98: L15:addl3 v.4-v.1(r11),v.2-v.1(r11),r0
99: cmpl r0,v.5-v.1(r11)
100: jeql L16
101: pushl $L39
102: pushl $L39
103: callf $12,_e_
104: L16:subl3 v.4-v.1(r11),v.3-v.1(r11),r0
105: mnegl v.2-v.1(r11),r1
106: cmpl r0,r1
107: jeql L17
108: pushl $L39
109: pushl $L42
110: callf $12,_e_
111: L17:addl3 v.4-v.1(r11),v.3-v.1(r11),r0
112: mull2 v.3-v.1(r11),r0
113: cmpl r0,v.6-v.1(r11)
114: jeql L18
115: pushl $L39
116: pushl $L44
117: callf $12,_e_
118: L18:mnegl v.6-v.1(r11),r0
119: addl3 v.4-v.1(r11),v.4-v.1(r11),r1
120: addl2 v.5-v.1(r11),r1
121: mnegl r1,r1
122: cmpl r0,r1
123: jeql L19
124: pushl $L39
125: pushl $L46
126: callf $12,_e_
127: L19:divl3 v.2-v.1(r11),v.2-v.1(r11),r0
128: cmpl r0,$1
129: jeql L20
130: pushl $L39
131: pushl $L48
132: callf $12,_e_
133: L20:mull3 v.6-v.1(r11),v.6-v.1(r11),r0
134: divl2 v.6-v.1(r11),r0
135: cmpl r0,v.6-v.1(r11)
136: jeql L21
137: pushl $L39
138: pushl $L50
139: callf $12,_e_
140: L21:mull3 $10,v.6-v.1(r11),r0
141: cmpl r0,$100
142: jeql L22
143: pushl $L39
144: pushl $L52
145: callf $12,_e_
146: L22:mull3 $-10,v.6-v.1(r11),r0
147: cmpl r0,$-100
148: jeql L23
149: pushl $L39
150: pushl $L54
151: callf $12,_e_
152: L23:divl3 v.4-v.1(r11),v.3-v.1(r11),r0
153: jeql L24
154: pushl $L39
155: pushl $L56
156: callf $12,_e_
157: L24:divl3 v.4-v.1(r11),$100,r0
158: cmpl r0,$33
159: jeql L25
160: pushl $L39
161: pushl $L58
162: callf $12,_e_
163: L25:mull3 v.4-v.1(r11),v.3-v.1(r11),r0
164: mull2 v.6-v.1(r11),r0
165: divl2 $6,r0
166: cmpl r0,$10
167: jeql L26
168: pushl $L39
169: pushl $L60
170: callf $12,_e_
171: L26:cmpl v.4-v.1(r11),$4
172: jgtr L9999
173: cmpl v.4-v.1(r11),$4
174: jgeq L9999
175: cmpl v.4-v.1(r11),$4
176: jneq L27
177: L9999:pushl $L39
178: pushl $L62
179: callf $12,_e_
180: L27:cmpl v.6-v.1(r11),v.3-v.1(r11)
181: jlss L9998
182: cmpl v.6-v.1(r11),v.3-v.1(r11)
183: jleq L9998
184: cmpl v.6-v.1(r11),v.3-v.1(r11)
185: jneq L28
186: L9998:pushl $L39
187: pushl $L64
188: callf $12,_e_
189: L28:addl3 v.3-v.1(r11),v.2-v.1(r11),r0
190: cmpl v.4-v.1(r11),r0
191: jeql L29
192: pushl $L39
193: pushl $L66
194: callf $12,_e_
195: L29:cmpl v.3-v.1(r11),v.2-v.1(r11)
196: jgeq L30
197: pushl $L39
198: pushl $L68
199: callf $12,_e_
200: L30:cmpl v.3-v.1(r11),v.2-v.1(r11)
201: jgtr L31
202: pushl $L39
203: pushl $L70
204: callf $12,_e_
205: L31:cmpl v.3-v.1(r11),v.2-v.1(r11)
206: jneq L32
207: pushl $L39
208: pushl $L72
209: callf $12,_e_
210: L32:cmpl v.3-v.1(r11),v.3-v.1(r11)
211: jeql L33
212: pushl $L39
213: pushl $L74
214: callf $12,_e_
215: L33:cmpl v.2-v.1(r11),v.3-v.1(r11)
216: jlss L34
217: pushl $L39
218: pushl $L76
219: callf $12,_e_
220: L34:cmpl v.2-v.1(r11),v.3-v.1(r11)
221: jleq L35
222: pushl $L39
223: pushl $L78
224: callf $12,_e_
225: L35:mull3 v.4-v.1(r11),v.4-v.1(r11),r0
226: cmpl r0,$9
227: jeql L36
228: pushl $L39
229: pushl $L80
230: callf $12,_e_
231: L36:addl3 $v.4-v.1,r11,-(sp)
232: addl3 $v.3-v.1,r11,-(sp)
233: callf $12,_pow_ii
234: cmpl r0,$8
235: jeql L14
236: pushl $L39
237: pushl $L82
238: callf $12,_e_
239: L14:ret#0
240:
241: .data 2
242: .align 2
243: v.3:
244: .space 4
245: .align 2
246: v.5:
247: .space 4
248: .align 2
249: v.6:
250: .space 4
251: .align 2
252: v.4:
253: .space 4
254: .align 2
255: v.2:
256: .space 4
257: .set v.1,v.6
258:
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.