![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to dob.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 dob.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: L22:
4: .long L21
5: .align 2
6: L21:
7: .byte 050,02
8: .byte 0114,0157
9: .byte 0157,0160
10: .byte 040,0160
11: .byte 0141,0163
12: .byte 0163,02
13: .byte 054,0151
14: .byte 063,051
15: .byte 00,00
16: .align 2
17: L27:
18: .long 1
19: .align 2
20: L28:
21: .byte 00,00
22: .data 2
23: .data 1
24: .data 0
25: .data 2
26: .data 1
27: .data 0
28: .globl _bug1_
29: .globl _MAIN_
30: .globl _dummy_
31: .globl _s_wsfe
32: .globl _do_fio
33: .globl _e_wsfe
34: .globl _s_stop
35: .align 2
36: .stabs "dob.f",0x64,0,0,0
37:
38: .text
39: .globl _MAIN_
40: .align 1
41: _MAIN_:
42: .word LWM1
43: subl3 $LF1,fp,sp
44: jbr L12
45: L13:
46: movl $2,v.2-v.1(r11)
47: movl $3,v.3-v.1(r11)
48: movl $4,v.4-v.1(r11)
49: movl $5,v.5-v.1(r11)
50: movl $6,v.6-v.1(r11)
51: movl $7,v.7-v.1(r11)
52: movl v.3-v.1(r11),-56(fp)
53: movl v.2-v.1(r11),r10
54: movl v.4-v.1(r11),r9
55: movl v.5-v.1(r11),r8
56: movl v.7-v.1(r11),r7
57: movl v.6-v.1(r11),r6
58: movl $1,v.8-v.1(r11)
59: cmpl v.8-v.1(r11),-56(fp)
60: jgtr L16
61: L17:
62: addl3 $1,r10,r0
63: movl r0,r10
64: addl3 $1,v.8-v.1(r11),r0
65: movl r0,-60(fp)
66: movl -60(fp),r9
67: mull3 r10,r9,r0
68: movl r0,r10
69: addl3 $-1,r10,r0
70: movl r0,r9
71: mull3 v.8-v.1(r11),r9,r0
72: movl r0,r8
73: mull3 r8,r9,r0
74: movl r0,r6
75: subl3 r9,r8,r0
76: movl r0,r7
77: addl3 $3,r7,r0
78: movl r0,r8
79: divl3 r8,r7,r0
80: movl r0,r6
81: addl3 r6,r10,r0
82: movl r0,r7
83: addl3 $2,r10,r0
84: movl r0,-64(fp)
85: addl3 $3,r9,r0
86: movl r0,-68(fp)
87: addl3 $-68,fp,r0
88: pushl r0
89: addl3 $-64,fp,r0
90: pushl r0
91: addl3 $-60,fp,r0
92: pushl r0
93: callf $16,_dummy_
94: movl L22,v.9+12
95: pushl $v.9
96: callf $8,_s_wsfe
97: pushl $4
98: addl3 $v.8-v.1,r11,r0
99: pushl r0
100: pushl $L27
101: callf $16,_do_fio
102: callf $4,_e_wsfe
103: L15:
104: incl v.8-v.1(r11)
105: cmpl v.8-v.1(r11),-56(fp)
106: jleq L17
107: L16:
108: movl r6,v.6-v.1(r11)
109: movl r7,v.7-v.1(r11)
110: movl r8,v.5-v.1(r11)
111: movl r9,v.4-v.1(r11)
112: movl r10,v.2-v.1(r11)
113: pushl $0
114: pushl $L28
115: callf $12,_s_stop
116: L14:
117: ret#0
118: .align 1
119: _bug1_:
120: .word LWM1
121: L12:
122: movl $v.1,r11
123: jbr L13
124: .set LF1,68
125: .set LWM1,0x1FC0
126: .text
127: .globl _dummy_
128: .align 1
129: _dummy_:
130: .word LWM2
131: subl3 $LF2,fp,sp
132: jbr L30
133: L33:
134: jbr L32
135: L32:
136: L31:
137: ret#0
138: L30:
139: movl fp,r12
140: jbr L33
141: .set LF2,52
142: .set LWM2,0x1000
143: .text
144: .data 2
145: .align 2
146: v.9:
147: .long 0
148: .long 6
149: .space 8
150: .align 2
151: v.2:
152: .space 4
153: .align 2
154: v.4:
155: .space 4
156: .align 2
157: v.6:
158: .space 4
159: .align 2
160: v.7:
161: .space 4
162: .align 2
163: v.5:
164: .space 4
165: .align 2
166: v.3:
167: .space 4
168: .align 2
169: v.8:
170: .space 4
171: .set v.1,v.7
172:
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.