cci/usr/src/usr.bin/f77/f77pass1/tst/t10.t1 - view

File: [Power 6/32 Unix Tahoe 4.2BSD] / cci / usr / src / usr.bin / f77 / f77pass1 / tst / t10.t1
Revision 1.1.1.1 (vendor branch): download - view: text, annotated - select for diffs
Sun Jul 28 12:26:07 2019 UTC (7 years ago) by root
Branches: bsd, MAIN
CVS tags: v121, HEAD

Power 6/32 Unix version 1.21

.data 0 .align 2 L33: .long 1 .align 2 L34: .long 10 .align 2 L35: .long 2 .align 2 L37: .long 3 .align 2 L39: .long 4 .align 2 L41: .long 5 .align 2 L43: .long 6 .align 2 L45: .long 7 .align 2 L47: .long 8 .align 2 L49: .long 0x3ECCCCCD # .float .1 .align 2 L50: .long 0x3F4CCCCD # .float .2 .align 2 L51: .long 0x3F99999A # .float .30000001 .align 2 L52: .long 0x41000000 # .float 2 .align 2 L53: .long 0xC0800000 # .float -1 .align 2 L54: .long 0xC7FFFE00 # .float -32767 .align 2 L55: .long 0x00000000 # .float 0 .align 2 L56: .long 0x39D1B717 # .float 9.9999997e-05 .align 2 L57: .long 9 .align 2 L59: .long 0x43C80000 # .float 100 .align 2 L60: .long 0x40000000 # .float .5 .align 2 L63: .long 0x47FFFE00 # .float 32767 .align 2 L64: .long 11 .data 2 .data 1 .data 0 .globl _MAIN_ .globl _e_ .align 2 .stabs "t10.f",0x64,0,0,0 .text .globl _MAIN_ .align 1 _MAIN_: .word LWM1 subl3 $LF1,fp,sp jbr L12 L13: movl $3,v.2-v.1(r11) movl $2,v.3-v.1(r11) movl $-100,v.4-v.1(r11) shll $1,v.3-v.1(r11),r0 addl2 v.2-v.1(r11),r0 mull2 v.3-v.1(r11),r0 addl2 $3,r0 mull2 v.2-v.1(r11),r0 addl2 v.3-v.1(r11),r0 mull2 v.2-v.1(r11),r0 addl2 v.3-v.1(r11),r0 mull2 v.2-v.1(r11),r0 addl2 v.3-v.1(r11),r0 mull2 v.2-v.1(r11),r0 incl r0 movl r0,v.5-v.1(r11) cmpl v.5-v.1(r11),$1456 jeql L15 pushl $L34 pushl $L33 callf $12,_e_ L15: clrl v.5-v.1(r11) tstl v.5-v.1(r11) jeql L16 pushl $L34 pushl $L35 callf $12,_e_ L16: mull3 v.3-v.1(r11),v.2-v.1(r11),r0 mull3 $3,v.2-v.1(r11),r1 addl2 r1,r0 addl2 $-5,r0 divl2 $10,r0 movl r0,-56(fp) mull3 -56(fp),-56(fp),r0 mull2 -56(fp),r0 movl r0,-60(fp) addl3 -60(fp),-60(fp),r0 movl r0,v.5-v.1(r11) cmpl v.5-v.1(r11),$2 jeql L17 pushl $L34 pushl $L37 callf $12,_e_ L17: addl3 v.3-v.1(r11),v.3-v.1(r11),r0 divl2 $4,r0 movl r0,-64(fp) divl3 $3,v.3-v.1(r11),r0 divl3 $4,v.3-v.1(r11),r1 addl2 r1,r0 addl2 $3,r0 mull3 -64(fp),-64(fp),r1 mull2 -64(fp),r1 mull2 r1,r0 movl r0,-68(fp) addl3 -68(fp),-68(fp),r0 movl r0,v.5-v.1(r11) cmpl v.5-v.1(r11),$6 jeql L18 pushl $L34 pushl $L39 callf $12,_e_ L18: mull3 v.3-v.1(r11),v.3-v.1(r11),r0 mull2 v.3-v.1(r11),r0 mull2 v.3-v.1(r11),r0 mull2 v.3-v.1(r11),r0 mull2 v.3-v.1(r11),r0 mull2 v.3-v.1(r11),r0 mull2 v.3-v.1(r11),r0 mull2 v.3-v.1(r11),r0 mull2 v.3-v.1(r11),r0 mull2 v.3-v.1(r11),r0 mull2 v.3-v.1(r11),r0 mull2 v.3-v.1(r11),r0 mull2 v.3-v.1(r11),r0 addl2 $-16383,r0 movl r0,v.2-v.1(r11) cmpl v.2-v.1(r11),$1 jeql L19 pushl $L34 pushl $L41 callf $12,_e_ L19: addl3 v.2-v.1(r11),v.2-v.1(r11),r0 addl2 v.2-v.1(r11),r0 addl2 v.2-v.1(r11),r0 addl2 v.2-v.1(r11),r0 addl2 v.2-v.1(r11),r0 addl2 v.2-v.1(r11),r0 addl2 v.2-v.1(r11),r0 addl2 v.2-v.1(r11),r0 addl2 v.2-v.1(r11),r0 addl2 v.2-v.1(r11),r0 addl2 v.2-v.1(r11),r0 addl2 v.2-v.1(r11),r0 addl2 v.2-v.1(r11),r0 addl2 v.2-v.1(r11),r0 addl2 v.2-v.1(r11),r0 movl r0,v.5-v.1(r11) cmpl v.5-v.1(r11),$16 jeql L20 pushl $L34 pushl $L43 callf $12,_e_ L20: addl3 v.3-v.1(r11),v.3-v.1(r11),r0 addl2 v.3-v.1(r11),r0 addl2 v.3-v.1(r11),r0 addl2 v.3-v.1(r11),r0 addl2 v.3-v.1(r11),r0 addl2 v.3-v.1(r11),r0 addl2 v.3-v.1(r11),r0 addl2 v.3-v.1(r11),r0 addl2 v.3-v.1(r11),r0 addl2 v.3-v.1(r11),r0 addl2 v.3-v.1(r11),r0 addl2 v.3-v.1(r11),r0 addl2 v.3-v.1(r11),r0 addl2 v.3-v.1(r11),r0 addl2 v.3-v.1(r11),r0 addl2 v.3-v.1(r11),r0 movl r0,v.5-v.1(r11) cmpl v.5-v.1(r11),$34 jeql L21 pushl $L34 pushl $L45 callf $12,_e_ L21: mnegl v.3-v.1(r11),r0 mnegl r0,r0 mnegl r0,r0 mnegl r0,r0 mnegl r0,r0 mnegl r0,r0 mnegl r0,r0 mnegl r0,r0 mnegl r0,r0 movl r0,v.5-v.1(r11) cmpl v.5-v.1(r11),$-2 jeql L22 pushl $L34 pushl $L47 callf $12,_e_ L22: movl L49,v.6-v.1(r11) movl L50,v.7-v.1(r11) movl L51,v.8-v.1(r11) ldf v.6-v.1(r11) addf v.7-v.1(r11) stf r0 ldf r0 divf v.8-v.1(r11) stf r0 ldf r0 mulf L52 stf r0 movl r0,-72(fp) ldf -72(fp) addf -72(fp) stf r0 ldf r0 addf -72(fp) stf r0 ldf r0 addf -72(fp) stf r0 movl r0,-76(fp) ldf -76(fp) mulf -76(fp) stf r0 ldf r0 mulf -76(fp) stf r0 ldf r0 mulf -76(fp) stf r0 ldf r0 mulf -76(fp) stf r0 ldf r0 addf L53 stf r0 movl r0,v.9-v.1(r11) ldf v.9-v.1(r11) addf L54 stf r0 movl r0,-80(fp) cmpf2 L55,-80(fp) jgtr L9999 movl -80(fp),r0 jbr L9998 L9999: lnf -80(fp) stf r0 L9998: cmpf2 r0,L56 jleq L23 pushl $L34 pushl $L57 callf $12,_e_ L23: ldf v.7-v.1(r11) mulf L59 stf r0 ldf r0 addf L60 stf r0 ldf r0 cvfl r0 movl r0,v.2-v.1(r11) cmpl v.2-v.1(r11),$20 jeql L24 pushl $L34 pushl $L34 callf $12,_e_ L24: movl $32767,v.2-v.1(r11) cvlf v.2-v.1(r11) stf r0 movl r0,v.9-v.1(r11) cmpf2 v.9-v.1(r11),L63 jeql L25 pushl $L34 pushl $L64 callf $12,_e_ L25: L14: ret#0 L12: movl $v.1,r11 jbr L13 .set LF1,80 .set LWM1,0x1800 .text .data 2 .align 2 v.2: .space 4 .align 2 v.4: .space 4 .align 2 v.9: .space 4 .align 2 v.7: .space 4 .align 2 v.8: .space 4 .align 2 v.6: .space 4 .align 2 v.5: .space 4 .align 2 v.3: .space 4 .set v.1,v.8

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.