![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to whetstone.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 whetstone.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: L15:
4: .long 0x3FFFFCB9 # .float .499975
5: .align 2
6: L16:
7: .long 0x40001062 # .float .50024998
8: .align 2
9: L17:
10: .long 0x41000000 # .float 2
11: .align 2
12: L19:
13: .long 0x00000000 # .float 0
14: .align 2
15: L20:
16: .long 0x40800000 # .float 1
17: .align 2
18: L21:
19: .long 0xC0800000 # .float -1
20: .align 2
21: L75:
22: .long 0x40000000 # .float .5
23: .align 2
24: L100:
25: .long 0x41400000 # .float 3
26: .align 2
27: L117:
28: .long 0x40400000 # .float .75
29: .align 2
30: L129:
31: .long 0x457A0000 # .float 1000
32: .align 2
33: L132:
34: .long 1
35: .align 2
36: L131:
37: .byte 050,0146
38: .byte 061,060
39: .byte 056,062
40: .byte 054,02
41: .byte 040,0167
42: .byte 0150,0145
43: .byte 0164,0163
44: .byte 0164,0157
45: .byte 0156,0145
46: .byte 040,0153
47: .byte 0151,0160
48: .byte 0163,040
49: .byte 0160,0145
50: .byte 0162,040
51: .byte 0163,0145
52: .byte 0143,0157
53: .byte 0156,0144
54: .byte 056,02
55: .byte 051,00
56: .align 2
57: L133:
58: .byte 00,00
59: .data 2
60: .data 1
61: .data 0
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: .align 2
72: L161:
73: .byte 050,02
74: .byte 040,02
75: .byte 054,063
76: .byte 0151,067
77: .byte 054,064
78: .byte 0145,061
79: .byte 062,056
80: .byte 064,051
81: .byte 00,00
82: .data 2
83: .data 1
84: .data 0
85: .data 2
86: .data 1
87: .data 0
88: .globl _MAIN_
89: .comm __BLNK__,40
90: .globl _secnds_
91: .globl _pout_
92: .globl _pa_
93: .globl _p3_
94: .globl _p0_
95: .globl _s_wsfe
96: .globl _do_fio
97: .globl _e_wsfe
98: .globl _s_stop
99: .globl _prtres_
100: .align 2
101: .stabs "whetstone.f",0x64,0,0,0
102:
103: .text
104: .globl _MAIN_
105: .align 1
106: _MAIN_:
107: .word LWM1
108: subl3 $LF1,fp,sp
109: jbr L12
110: L13:
111: movl L15,__BLNK__
112: movl L16,__BLNK__+4
113: movl L17,__BLNK__+8
114: movl $10,v.2-v.1(r11)
115: L18:
116: pushl $L19
117: callf $8,_secnds_
118: movl r0,v.3-v.1(r11)
119: movl v.2-v.1(r11),v.4-v.1(r11)
120: clrl v.5-v.1(r11)
121: mull3 $12,v.2-v.1(r11),r0
122: movl r0,v.6-v.1(r11)
123: mull3 $14,v.2-v.1(r11),r0
124: movl r0,v.7-v.1(r11)
125: mull3 $345,v.2-v.1(r11),r0
126: movl r0,v.8-v.1(r11)
127: clrl v.9-v.1(r11)
128: mull3 $210,v.2-v.1(r11),r0
129: movl r0,v.10-v.1(r11)
130: shll $5,v.2-v.1(r11),r0
131: movl r0,v.11-v.1(r11)
132: mull3 $899,v.2-v.1(r11),r0
133: movl r0,v.12-v.1(r11)
134: mull3 $616,v.2-v.1(r11),r0
135: movl r0,v.13-v.1(r11)
136: clrl v.14-v.1(r11)
137: mull3 $93,v.2-v.1(r11),r0
138: movl r0,v.15-v.1(r11)
139: clrl v.16-v.1(r11)
140: movl L20,v.17-v.1(r11)
141: movl L21,v.18-v.1(r11)
142: movl L21,v.19-v.1(r11)
143: movl L21,v.20-v.1(r11)
144: tstl v.5-v.1(r11)
145: jgtr L25
146: jbr L24
147: L25:
148: movl $1,r10
149: movl v.5-v.1(r11),-56(fp)
150: cmpl r10,-56(fp)
151: jgtr L27
152: L28:
153: movl r10,v.2-v.1(r11)
154: ldf v.17-v.1(r11)
155: addf v.18-v.1(r11)
156: stf r0
157: ldf r0
158: addf v.19-v.1(r11)
159: stf r0
160: ldf r0
161: subf v.20-v.1(r11)
162: stf r0
163: ldf r0
164: mulf __BLNK__
165: stf r0
166: movl r0,v.17-v.1(r11)
167: ldf v.17-v.1(r11)
168: addf v.18-v.1(r11)
169: stf r0
170: ldf r0
171: subf v.19-v.1(r11)
172: stf r0
173: ldf r0
174: addf v.20-v.1(r11)
175: stf r0
176: ldf r0
177: mulf __BLNK__
178: stf r0
179: movl r0,v.18-v.1(r11)
180: lnf v.17-v.1(r11)
181: stf r0
182: ldf r0
183: addf v.18-v.1(r11)
184: stf r0
185: ldf r0
186: addf v.19-v.1(r11)
187: stf r0
188: ldf r0
189: addf v.20-v.1(r11)
190: stf r0
191: ldf r0
192: mulf __BLNK__
193: stf r0
194: movl r0,v.20-v.1(r11)
195: ldf v.17-v.1(r11)
196: subf v.18-v.1(r11)
197: stf r0
198: ldf r0
199: addf v.19-v.1(r11)
200: stf r0
201: ldf r0
202: addf v.20-v.1(r11)
203: stf r0
204: ldf r0
205: mulf __BLNK__
206: stf r0
207: movl r0,v.19-v.1(r11)
208: L26:
209: incl r10
210: cmpl r10,-56(fp)
211: jleq L28
212: L27:
213: movl r10,v.2-v.1(r11)
214: L24:
215: addl3 $v.20-v.1,r11,r0
216: pushl r0
217: addl3 $v.19-v.1,r11,r0
218: pushl r0
219: addl3 $v.18-v.1,r11,r0
220: pushl r0
221: addl3 $v.17-v.1,r11,r0
222: pushl r0
223: addl3 $v.5-v.1,r11,r0
224: pushl r0
225: addl3 $v.5-v.1,r11,r0
226: pushl r0
227: addl3 $v.5-v.1,r11,r0
228: pushl r0
229: callf $32,_pout_
230: movl L21,__BLNK__+16
231: movl L21,__BLNK__+20
232: movl L21,__BLNK__+24
233: tstl v.6-v.1(r11)
234: jgtr L36
235: jbr L35
236: L36:
237: movl $1,r10
238: movl v.6-v.1(r11),-60(fp)
239: cmpl r10,-60(fp)
240: jgtr L38
241: L39:
242: movl r10,v.2-v.1(r11)
243: ldf __BLNK__+12
244: addf __BLNK__+16
245: stf r0
246: ldf r0
247: addf __BLNK__+20
248: stf r0
249: ldf r0
250: subf __BLNK__+24
251: stf r0
252: ldf r0
253: mulf __BLNK__
254: stf r0
255: movl r0,__BLNK__+12
256: ldf __BLNK__+12
257: addf __BLNK__+16
258: stf r0
259: ldf r0
260: subf __BLNK__+20
261: stf r0
262: ldf r0
263: addf __BLNK__+24
264: stf r0
265: ldf r0
266: mulf __BLNK__
267: stf r0
268: movl r0,__BLNK__+16
269: ldf __BLNK__+12
270: subf __BLNK__+16
271: stf r0
272: ldf r0
273: addf __BLNK__+20
274: stf r0
275: ldf r0
276: addf __BLNK__+24
277: stf r0
278: ldf r0
279: mulf __BLNK__
280: stf r0
281: movl r0,__BLNK__+20
282: lnf __BLNK__+12
283: stf r0
284: ldf r0
285: addf __BLNK__+16
286: stf r0
287: ldf r0
288: addf __BLNK__+20
289: stf r0
290: ldf r0
291: addf __BLNK__+24
292: stf r0
293: ldf r0
294: mulf __BLNK__
295: stf r0
296: movl r0,__BLNK__+24
297: L37:
298: incl r10
299: cmpl r10,-60(fp)
300: jleq L39
301: L38:
302: movl r10,v.2-v.1(r11)
303: L35:
304: pushl $__BLNK__+24
305: pushl $__BLNK__+20
306: pushl $__BLNK__+16
307: pushl $__BLNK__+12
308: addl3 $v.6-v.1,r11,r0
309: pushl r0
310: addl3 $v.7-v.1,r11,r0
311: pushl r0
312: addl3 $v.6-v.1,r11,r0
313: pushl r0
314: callf $32,_pout_
315: L43:
316: movl $1,r10
317: movl v.7-v.1(r11),-64(fp)
318: cmpl r10,-64(fp)
319: jgtr L45
320: L46:
321: movl r10,v.2-v.1(r11)
322: L44:
323: pushl $__BLNK__+12
324: callf $8,_pa_
325: incl r10
326: cmpl r10,-64(fp)
327: jleq L46
328: L45:
329: movl r10,v.2-v.1(r11)
330: L50:
331: pushl $__BLNK__+24
332: pushl $__BLNK__+20
333: pushl $__BLNK__+16
334: pushl $__BLNK__+12
335: addl3 $v.6-v.1,r11,r0
336: pushl r0
337: addl3 $v.6-v.1,r11,r0
338: pushl r0
339: addl3 $v.7-v.1,r11,r0
340: pushl r0
341: callf $32,_pout_
342: tstl v.8-v.1(r11)
343: jgtr L52
344: jbr L51
345: L52:
346: movl $1,r10
347: movl v.8-v.1(r11),-68(fp)
348: cmpl r10,-68(fp)
349: jgtr L54
350: L55:
351: movl r10,v.2-v.1(r11)
352: addl3 $-1,__BLNK__+28,r0
353: jeql L60
354: jbr L59
355: L60:
356: movl $2,__BLNK__+28
357: jbr L61
358: L59:
359: movl $3,__BLNK__+28
360: L61:
361: addl3 $-2,__BLNK__+28,r0
362: jgtr L63
363: jbr L62
364: L63:
365: clrl __BLNK__+28
366: jbr L64
367: L62:
368: movl $1,__BLNK__+28
369: L64:
370: addl3 $-1,__BLNK__+28,r0
371: jlss L65
372: jbr L66
373: L65:
374: movl $1,__BLNK__+28
375: jbr L53
376: L66:
377: clrl __BLNK__+28
378: L53:
379: incl r10
380: cmpl r10,-68(fp)
381: jleq L55
382: L54:
383: movl r10,v.2-v.1(r11)
384: L51:
385: addl3 $v.20-v.1,r11,r0
386: pushl r0
387: addl3 $v.19-v.1,r11,r0
388: pushl r0
389: addl3 $v.18-v.1,r11,r0
390: pushl r0
391: addl3 $v.17-v.1,r11,r0
392: pushl r0
393: pushl $__BLNK__+28
394: pushl $__BLNK__+28
395: addl3 $v.8-v.1,r11,r0
396: pushl r0
397: callf $32,_pout_
398: movl $1,__BLNK__+28
399: movl $2,__BLNK__+32
400: movl $3,__BLNK__+36
401: tstl v.10-v.1(r11)
402: jgtr L68
403: jbr L67
404: L68:
405: movl $1,r10
406: movl v.10-v.1(r11),-72(fp)
407: cmpl r10,-72(fp)
408: jgtr L70
409: L71:
410: movl r10,v.2-v.1(r11)
411: subl3 __BLNK__+28,__BLNK__+32,r0
412: mull2 __BLNK__+28,r0
413: subl3 __BLNK__+32,__BLNK__+36,r1
414: mull2 r1,r0
415: movl r0,__BLNK__+28
416: mull3 __BLNK__+32,__BLNK__+36,r0
417: subl3 __BLNK__+28,__BLNK__+36,r1
418: mull2 __BLNK__+32,r1
419: subl2 r1,r0
420: movl r0,__BLNK__+32
421: subl3 __BLNK__+32,__BLNK__+36,r0
422: addl3 __BLNK__+28,__BLNK__+32,r1
423: mull2 r1,r0
424: movl r0,__BLNK__+36
425: addl3 __BLNK__+32,__BLNK__+28,r0
426: addl2 __BLNK__+36,r0
427: cvlf r0
428: stf r0
429: movl __BLNK__+36,r1
430: movl r0,__BLNK__+4[r1]
431: addl3 __BLNK__+32,__BLNK__+28,r0
432: addl2 __BLNK__+36,r0
433: cvlf r0
434: stf r0
435: movl __BLNK__+32,r1
436: movl r0,__BLNK__+4[r1]
437: L69:
438: incl r10
439: cmpl r10,-72(fp)
440: jleq L71
441: L70:
442: movl r10,v.2-v.1(r11)
443: L67:
444: pushl $__BLNK__+24
445: pushl $__BLNK__+20
446: pushl $__BLNK__+16
447: pushl $__BLNK__+12
448: pushl $__BLNK__+32
449: pushl $__BLNK__+28
450: addl3 $v.10-v.1,r11,r0
451: pushl r0
452: callf $32,_pout_
453: movl L75,v.21-v.1(r11)
454: movl L75,v.22-v.1(r11)
455: tstl v.11-v.1(r11)
456: jgtr L78
457: jbr L77
458: L78:
459: movl $1,r10
460: movl v.11-v.1(r11),-76(fp)
461: cmpl r10,-76(fp)
462: jgtr L80
463: L81:
464: movl r10,v.2-v.1(r11)
465: ldf v.21-v.1(r11)
466: cosf
467: stf r0
468: ldf v.21-v.1(r11)
469: addf v.22-v.1(r11)
470: stf r1
471: ldf r1
472: cosf
473: stf r1
474: ldf r0
475: divf r1
476: stf r0
477: ldf v.21-v.1(r11)
478: sinf
479: stf r1
480: ldf r1
481: mulf __BLNK__+8
482: stf r1
483: ldf r0
484: addf r1
485: stf r0
486: ldf v.21-v.1(r11)
487: subf v.22-v.1(r11)
488: stf r1
489: ldf r1
490: cosf
491: stf r1
492: ldf r0
493: addf r1
494: stf r0
495: ldf r0
496: addf L21
497: stf r0
498: ldf r0
499: atanf
500: stf r0
501: ldf r0
502: mulf __BLNK__
503: stf r0
504: movl r0,v.21-v.1(r11)
505: ldf v.22-v.1(r11)
506: cosf
507: stf r0
508: ldf v.21-v.1(r11)
509: addf v.22-v.1(r11)
510: stf r1
511: ldf r1
512: cosf
513: stf r1
514: ldf r0
515: divf r1
516: stf r0
517: ldf v.22-v.1(r11)
518: sinf
519: stf r1
520: ldf r1
521: mulf __BLNK__+8
522: stf r1
523: ldf r0
524: addf r1
525: stf r0
526: ldf v.21-v.1(r11)
527: subf v.22-v.1(r11)
528: stf r1
529: ldf r1
530: cosf
531: stf r1
532: ldf r0
533: addf r1
534: stf r0
535: ldf r0
536: addf L21
537: stf r0
538: ldf r0
539: atanf
540: stf r0
541: ldf r0
542: mulf __BLNK__
543: stf r0
544: movl r0,v.22-v.1(r11)
545: L79:
546: incl r10
547: cmpl r10,-76(fp)
548: jleq L81
549: L80:
550: movl r10,v.2-v.1(r11)
551: L77:
552: addl3 $v.22-v.1,r11,r0
553: pushl r0
554: addl3 $v.22-v.1,r11,r0
555: pushl r0
556: addl3 $v.21-v.1,r11,r0
557: pushl r0
558: addl3 $v.21-v.1,r11,r0
559: pushl r0
560: pushl $__BLNK__+32
561: pushl $__BLNK__+28
562: addl3 $v.11-v.1,r11,r0
563: pushl r0
564: callf $32,_pout_
565: movl L20,v.21-v.1(r11)
566: movl L20,v.22-v.1(r11)
567: movl L20,v.23-v.1(r11)
568: tstl v.12-v.1(r11)
569: jgtr L91
570: jbr L90
571: L91:
572: movl $1,r10
573: movl v.12-v.1(r11),-80(fp)
574: cmpl r10,-80(fp)
575: jgtr L93
576: L94:
577: movl r10,v.2-v.1(r11)
578: L92:
579: addl3 $v.23-v.1,r11,r0
580: pushl r0
581: addl3 $v.22-v.1,r11,r0
582: pushl r0
583: addl3 $v.21-v.1,r11,r0
584: pushl r0
585: callf $16,_p3_
586: incl r10
587: cmpl r10,-80(fp)
588: jleq L94
589: L93:
590: movl r10,v.2-v.1(r11)
591: L90:
592: addl3 $v.23-v.1,r11,r0
593: pushl r0
594: addl3 $v.23-v.1,r11,r0
595: pushl r0
596: addl3 $v.22-v.1,r11,r0
597: pushl r0
598: addl3 $v.21-v.1,r11,r0
599: pushl r0
600: pushl $__BLNK__+32
601: pushl $__BLNK__+28
602: addl3 $v.12-v.1,r11,r0
603: pushl r0
604: callf $32,_pout_
605: movl $1,__BLNK__+28
606: movl $2,__BLNK__+32
607: movl $3,__BLNK__+36
608: movl L20,__BLNK__+12
609: movl L17,__BLNK__+16
610: movl L100,__BLNK__+20
611: tstl v.13-v.1(r11)
612: jgtr L102
613: jbr L101
614: L102:
615: movl $1,r10
616: movl v.13-v.1(r11),-84(fp)
617: cmpl r10,-84(fp)
618: jgtr L104
619: L105:
620: movl r10,v.2-v.1(r11)
621: L103:
622: callf $4,_p0_
623: incl r10
624: cmpl r10,-84(fp)
625: jleq L105
626: L104:
627: movl r10,v.2-v.1(r11)
628: L101:
629: pushl $__BLNK__+24
630: pushl $__BLNK__+20
631: pushl $__BLNK__+16
632: pushl $__BLNK__+12
633: pushl $__BLNK__+32
634: pushl $__BLNK__+28
635: addl3 $v.13-v.1,r11,r0
636: pushl r0
637: callf $32,_pout_
638: movl $2,__BLNK__+28
639: movl $3,__BLNK__+32
640: tstl v.14-v.1(r11)
641: jgtr L110
642: jbr L109
643: L110:
644: movl $1,r10
645: movl v.14-v.1(r11),-88(fp)
646: cmpl r10,-88(fp)
647: jgtr L112
648: L113:
649: movl r10,v.2-v.1(r11)
650: addl3 __BLNK__+32,__BLNK__+28,r0
651: movl r0,__BLNK__+28
652: addl3 __BLNK__+32,__BLNK__+28,r0
653: movl r0,__BLNK__+32
654: subl3 __BLNK__+32,__BLNK__+28,r0
655: movl r0,__BLNK__+28
656: subl3 __BLNK__+28,__BLNK__+32,r0
657: subl2 __BLNK__+28,r0
658: movl r0,__BLNK__+32
659: L111:
660: incl r10
661: cmpl r10,-88(fp)
662: jleq L113
663: L112:
664: movl r10,v.2-v.1(r11)
665: L109:
666: addl3 $v.20-v.1,r11,r0
667: pushl r0
668: addl3 $v.19-v.1,r11,r0
669: pushl r0
670: addl3 $v.18-v.1,r11,r0
671: pushl r0
672: addl3 $v.17-v.1,r11,r0
673: pushl r0
674: pushl $__BLNK__+32
675: pushl $__BLNK__+28
676: addl3 $v.14-v.1,r11,r0
677: pushl r0
678: callf $32,_pout_
679: movl L117,v.21-v.1(r11)
680: tstl v.15-v.1(r11)
681: jgtr L119
682: jbr L118
683: L119:
684: movl $1,r10
685: movl v.15-v.1(r11),-92(fp)
686: cmpl r10,-92(fp)
687: jgtr L121
688: L122:
689: movl r10,v.2-v.1(r11)
690: L120:
691: ldf v.21-v.1(r11)
692: logf
693: stf r0
694: ldf r0
695: divf __BLNK__+4
696: stf r0
697: ldf r0
698: expf
699: stf r0
700: ldf r0
701: sqrtf
702: stf r0
703: movl r0,v.21-v.1(r11)
704: incl r10
705: cmpl r10,-92(fp)
706: jleq L122
707: L121:
708: movl r10,v.2-v.1(r11)
709: L118:
710: addl3 $v.3-v.1,r11,r0
711: pushl r0
712: callf $8,_secnds_
713: ldf r0
714: subf v.3-v.1(r11)
715: stf r0
716: movl r0,v.24-v.1(r11)
717: cmpl v.4-v.1(r11),$20
718: jneq L126
719: jbr L127
720: L126:
721: movl v.24-v.1(r11),v.25-v.1(r11)
722: movl $20,v.2-v.1(r11)
723: jbr L18
724: L127:
725: movl v.24-v.1(r11),v.26-v.1(r11)
726: ldf v.26-v.1(r11)
727: subf v.25-v.1(r11)
728: stf r0
729: ldf L20
730: divf r0
731: stf r0
732: ldf r0
733: mulf L129
734: stf r0
735: movl r0,v.27-v.1(r11)
736: pushl $v.28
737: callf $8,_s_wsfe
738: pushl $4
739: addl3 $v.27-v.1,r11,r0
740: pushl r0
741: pushl $L132
742: callf $16,_do_fio
743: callf $4,_e_wsfe
744: pushl $0
745: pushl $L133
746: callf $12,_s_stop
747: L14:
748: ret#0
749: L12:
750: movl $v.1,r11
751: jbr L13
752: .set LF1,92
753: .set LWM1,0x1C00
754: .text
755: .globl _pa_
756: .align 1
757: _pa_:
758: .word LWM2
759: subl3 $LF2,fp,sp
760: jbr L135
761: L138:
762: clrl v.30-v.29(r11)
763: L140:
764: movl 4(r12),r0
765: movl 4(r12),r1
766: ldf 4(r0)
767: addf 8(r1)
768: stf r0
769: movl 4(r12),r1
770: ldf r0
771: addf 12(r1)
772: stf r0
773: movl 4(r12),r1
774: ldf r0
775: subf 16(r1)
776: stf r0
777: ldf r0
778: mulf __BLNK__
779: stf r0
780: movl 4(r12),r1
781: movl r0,4(r1)
782: movl 4(r12),r0
783: movl 4(r12),r1
784: ldf 4(r0)
785: addf 8(r1)
786: stf r0
787: movl 4(r12),r1
788: ldf r0
789: subf 12(r1)
790: stf r0
791: movl 4(r12),r1
792: ldf r0
793: addf 16(r1)
794: stf r0
795: ldf r0
796: mulf __BLNK__
797: stf r0
798: movl 4(r12),r1
799: movl r0,8(r1)
800: movl 4(r12),r0
801: movl 4(r12),r1
802: ldf 4(r0)
803: subf 8(r1)
804: stf r0
805: movl 4(r12),r1
806: ldf r0
807: addf 12(r1)
808: stf r0
809: movl 4(r12),r1
810: ldf r0
811: addf 16(r1)
812: stf r0
813: ldf r0
814: mulf __BLNK__
815: stf r0
816: movl 4(r12),r1
817: movl r0,12(r1)
818: movl 4(r12),r0
819: lnf 4(r0)
820: stf r0
821: movl 4(r12),r1
822: ldf r0
823: addf 8(r1)
824: stf r0
825: movl 4(r12),r1
826: ldf r0
827: addf 12(r1)
828: stf r0
829: movl 4(r12),r1
830: ldf r0
831: addf 16(r1)
832: stf r0
833: ldf r0
834: divf __BLNK__+8
835: stf r0
836: movl 4(r12),r1
837: movl r0,16(r1)
838: addl3 $1,v.30-v.29(r11),r0
839: movl r0,v.30-v.29(r11)
840: addl3 $-6,v.30-v.29(r11),r0
841: jlss L140
842: jbr L141
843: L141:
844: jbr L137
845: L137:
846: L136:
847: ret#0
848: L135:
849: movl $v.29,r11
850: movl fp,r12
851: subl2 $4,4(r12)
852: jbr L138
853: .set LF2,52
854: .set LWM2,0x1800
855: .text
856: .globl _p0_
857: .align 1
858: _p0_:
859: .word LWM3
860: subl3 $LF3,fp,sp
861: jbr L143
862: L146:
863: movl __BLNK__+32,r0
864: movl __BLNK__+28,r1
865: movl __BLNK__+8[r0],__BLNK__+8[r1]
866: movl __BLNK__+36,r0
867: movl __BLNK__+32,r1
868: movl __BLNK__+8[r0],__BLNK__+8[r1]
869: movl __BLNK__+28,r0
870: movl __BLNK__+36,r1
871: movl __BLNK__+8[r0],__BLNK__+8[r1]
872: jbr L145
873: L145:
874: L144:
875: ret#0
876: L143:
877: jbr L146
878: .set LF3,52
879: .set LWM3,0x1000
880: .text
881: .globl _p3_
882: .align 1
883: _p3_:
884: .word LWM4
885: subl3 $LF4,fp,sp
886: jbr L149
887: L152:
888: movl *4(r12),v.33-v.32(r11)
889: movl *8(r12),v.34-v.32(r11)
890: ldf v.33-v.32(r11)
891: addf v.34-v.32(r11)
892: stf r0
893: ldf r0
894: mulf __BLNK__
895: stf r0
896: movl r0,v.33-v.32(r11)
897: ldf v.33-v.32(r11)
898: addf v.34-v.32(r11)
899: stf r0
900: ldf r0
901: mulf __BLNK__
902: stf r0
903: movl r0,v.34-v.32(r11)
904: ldf v.33-v.32(r11)
905: addf v.34-v.32(r11)
906: stf r0
907: ldf r0
908: divf __BLNK__+8
909: stf r0
910: movl r0,*12(r12)
911: jbr L151
912: L151:
913: L150:
914: ret#0
915: L149:
916: movl $v.32,r11
917: movl fp,r12
918: jbr L152
919: .set LF4,52
920: .set LWM4,0x1800
921: .text
922: .globl _pout_
923: .align 1
924: _pout_:
925: .word LWM5
926: subl3 $LF5,fp,sp
927: jbr L155
928: L158:
929: pushl $v.36
930: callf $8,_s_wsfe
931: pushl $4
932: pushl 4(r12)
933: pushl $L132
934: callf $16,_do_fio
935: pushl $4
936: pushl 8(r12)
937: pushl $L132
938: callf $16,_do_fio
939: pushl $4
940: pushl 12(r12)
941: pushl $L132
942: callf $16,_do_fio
943: pushl $4
944: pushl 16(r12)
945: pushl $L132
946: callf $16,_do_fio
947: pushl $4
948: pushl 20(r12)
949: pushl $L132
950: callf $16,_do_fio
951: pushl $4
952: pushl 24(r12)
953: pushl $L132
954: callf $16,_do_fio
955: pushl $4
956: pushl 28(r12)
957: pushl $L132
958: callf $16,_do_fio
959: callf $4,_e_wsfe
960: jbr L157
961: L157:
962: L156:
963: ret#0
964: L155:
965: movl fp,r12
966: jbr L158
967: .set LF5,52
968: .set LWM5,0x1000
969: .text
970: .globl _prtres_
971: .align 1
972: _prtres_:
973: .word LWM6
974: subl3 $LF6,fp,sp
975: jbr L170
976: L173:
977: jbr L172
978: L172:
979: L171:
980: ret#0
981: L170:
982: movl fp,r12
983: jbr L173
984: .set LF6,52
985: .set LWM6,0x1000
986: .text
987: .data 2
988: .align 2
989: v.28:
990: .long 0
991: .long 6
992: .space 4
993: .long L131
994: .align 2
995: v.2:
996: .space 4
997: .align 2
998: v.22:
999: .space 4
1000: .align 2
1001: v.5:
1002: .space 4
1003: .align 2
1004: v.7:
1005: .space 4
1006: .align 2
1007: v.9:
1008: .space 4
1009: .align 2
1010: v.11:
1011: .space 4
1012: .align 2
1013: v.13:
1014: .space 4
1015: .align 2
1016: v.18:
1017: .space 4
1018: .align 2
1019: v.20:
1020: .space 4
1021: .align 2
1022: v.15:
1023: .space 4
1024: .align 2
1025: v.27:
1026: .space 4
1027: .align 2
1028: v.26:
1029: .space 4
1030: .align 2
1031: v.3:
1032: .space 4
1033: .align 2
1034: v.4:
1035: .space 4
1036: .align 2
1037: v.24:
1038: .space 4
1039: .align 2
1040: v.25:
1041: .space 4
1042: .align 2
1043: v.16:
1044: .space 4
1045: .align 2
1046: v.14:
1047: .space 4
1048: .align 2
1049: v.19:
1050: .space 4
1051: .align 2
1052: v.17:
1053: .space 4
1054: .align 2
1055: v.12:
1056: .space 4
1057: .align 2
1058: v.10:
1059: .space 4
1060: .align 2
1061: v.8:
1062: .space 4
1063: .align 2
1064: v.6:
1065: .space 4
1066: .align 2
1067: v.23:
1068: .space 4
1069: .align 2
1070: v.21:
1071: .space 4
1072: .set v.1,v.4
1073:
1074: .align 2
1075: v.30:
1076: .space 4
1077: .set v.29,v.30
1078:
1079: .align 2
1080: v.33:
1081: .space 4
1082: .align 2
1083: v.34:
1084: .space 4
1085: .set v.32,v.34
1086:
1087: .align 2
1088: v.36:
1089: .long 0
1090: .long 6
1091: .space 4
1092: .long L161
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.