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