cci/usr/src/usr.bin/f77/f77pass1/tst/qqutab.t0 - view

File: [Power 6/32 Unix Tahoe 4.2BSD] / cci / usr / src / usr.bin / f77 / f77pass1 / tst / qqutab.t0
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 L20: .long 1 .align 2 L21: .long 5 .align 2 L38: .byte 050,02 .byte 060,02 .byte 054,02 .byte 052,052 .byte 052,040 .byte 0105,0122 .byte 0122,0117 .byte 0122,040 .byte 052,052 .byte 052,040 .byte 055,040 .byte 0105,0122 .byte 0122,0117 .byte 0122,040 .byte 0105,0116 .byte 0103,0117 .byte 0125,0116 .byte 0124,0105 .byte 0122,0105 .byte 0104,040 .byte 0111,0116 .byte 040,0122 .byte 0105,0101 .byte 0104,0111 .byte 0116,0107 .byte 02,054 .byte 02,040 .byte 0125,0116 .byte 0124,0101 .byte 0102,040 .byte 0124,0101 .byte 0102,0114 .byte 0105,040 .byte 0111,0116 .byte 0124,0117 .byte 040,0121 .byte 0121,0111 .byte 0116,0120 .byte 0124,02 .byte 054,057 .byte 051,00 .align 2 L40: .byte 050,02 .byte 060,02 .byte 054,02 .byte 052,052 .byte 052,040 .byte 0105,0122 .byte 0122,0117 .byte 0122,040 .byte 052,052 .byte 052,040 .byte 055,040 .byte 0105,0117 .byte 0106,040 .byte 0105,0116 .byte 0103,0117 .byte 0125,0116 .byte 0124,0105 .byte 0122,0105 .byte 0104,040 .byte 0104,0125 .byte 0122,0111 .byte 0116,0107 .byte 040,0125 .byte 0116,0124 .byte 0101,0102 .byte 040,0122 .byte 0105,0101 .byte 0104,02 .byte 057,051 .byte 00,00 .align 2 L42: .byte 050,02 .byte 060,02 .byte 054,02 .byte 052,052 .byte 052,040 .byte 0105,0122 .byte 0122,0117 .byte 0122,040 .byte 052,052 .byte 052,040 .byte 055,040 .byte 0116,0117 .byte 0124,040 .byte 0105,0116 .byte 0117,0125 .byte 0107,0110 .byte 040,0123 .byte 0120,0101 .byte 0103,0105 .byte 040,0105 .byte 0130,0111 .byte 0124,0123 .byte 040,0124 .byte 0117,040 .byte 0114,0117 .byte 0101,0104 .byte 02,054 .byte 02,040 .byte 0125,0116 .byte 0124,0101 .byte 0102,040 .byte 0111,0116 .byte 0124,0117 .byte 040,0121 .byte 0121,0111 .byte 0116,0120 .byte 0124,02 .byte 054,057 .byte 051,00 .data 2 .data 1 .align 2 .lcomm q.2,1200 .data 0 .globl _qqutab_ .comm _ipkt_,176 .comm _untab_,6 .comm _qq3_,576 .globl _qqtopn_ .globl _dread_ .globl _dcread_ .globl _iload_ .globl _s_copy .globl _istore_ .globl _darcls_ .globl _s_wsfe .globl _e_wsfe .align 2 .stabs "qqutab.f",0x64,0,0,0 .text .globl _qqutab_ .align 1 _qqutab_: .word LWM1 subl3 $LF1,fp,sp jbr L12 L15: pushl $6 pushl $_untab_ callf $12,_qqtopn_ casel r0,$1,$0 .align 1 L18: .word L17-L18 addl3 $v.9-v.1,r11,r0 pushl r0 pushl $L21 pushl $L20 addl3 $v.8-v.1,r11,r0 pushl r0 pushl $_ipkt_ callf $24,_dread_ casel r0,$1,$1 .align 1 L22: .word L19-L22 .word L17-L22 movl v.8-v.1+12(r11),v.10-v.1(r11) subl3 v.8-v.1+12(r11),v.8-v.1+16(r11),r0 movl r0,v.11-v.1(r11) movl $200,v.12-v.1(r11) cmpl v.11-v.1(r11),v.12-v.1(r11) jleq L23 jbr L24 L23: pushl $6 addl3 $v.9-v.1,r11,r0 pushl r0 addl3 $v.11-v.1,r11,r0 pushl r0 addl3 $v.10-v.1,r11,r0 pushl r0 pushl $q.2 pushl $_ipkt_ callf $28,_dcread_ casel r0,$1,$1 .align 1 L25: .word L19-L25 .word L17-L25 pushl $6 pushl $_untab_+18 callf $12,_iload_ movl r0,v.13-v.1(r11) clrl v.14-v.1(r11) clrl v.14-v.1(r11) divl3 $2,v.11-v.1(r11),r0 movl r0,v.15-v.1(r11) movl $1,r10 movl v.15-v.1(r11),-56(fp) cmpl r10,-56(fp) jgtr L27 L28: movl r10,v.16-v.1(r11) pushl $6 pushl $6 mull3 $12,r10,r0 addl2 $q.2+-12,r0 pushl r0 mull3 $6,v.13-v.1(r11),r0 addl2 $_untab_+-6,r0 pushl r0 callf $20,_s_copy pushl $6 mull3 $12,r10,r0 addl2 $q.2+-6,r0 pushl r0 callf $12,_iload_ movl r0,q.3-v.1(r11) addl3 $1,v.14-v.1(r11),r0 movl r0,v.14-v.1(r11) movl v.14-v.1(r11),r0 movl q.3-v.1(r11),_qq3_+448[r0] addl3 $v.14-v.1,r11,r0 pushl r0 pushl $6 addl3 $-62,fp,r0 pushl r0 callf $16,_istore_ pushl $6 pushl $6 addl3 $-62,fp,r0 pushl r0 mull3 $6,v.13-v.1(r11),r0 addl2 $_untab_,r0 pushl r0 callf $20,_s_copy L26: addl3 $2,v.13-v.1(r11),r0 movl r0,v.13-v.1(r11) incl r10 cmpl r10,-56(fp) jleq L28 L27: movl r10,v.16-v.1(r11) addl3 $v.13-v.1,r11,r0 pushl r0 pushl $6 addl3 $-68,fp,r0 pushl r0 callf $16,_istore_ pushl $6 pushl $6 addl3 $-68,fp,r0 pushl r0 pushl $_untab_+24 callf $20,_s_copy pushl $6 pushl $_untab_+18 callf $12,_iload_ movl r0,-84(fp) subl3 -84(fp),v.13-v.1(r11),r0 divl2 $2,r0 movl r0,v.17-v.1(r11) addl3 $v.17-v.1,r11,r0 pushl r0 pushl $6 addl3 $-74,fp,r0 pushl r0 callf $16,_istore_ pushl $6 pushl $6 addl3 $-74,fp,r0 pushl r0 pushl $_untab_+30 callf $20,_s_copy addl3 $v.14-v.1,r11,r0 pushl r0 pushl $6 addl3 $-80,fp,r0 pushl r0 callf $16,_istore_ pushl $6 pushl $6 addl3 $-80,fp,r0 pushl r0 pushl $_untab_+54 callf $20,_s_copy addl3 $v.9-v.1,r11,r0 pushl r0 pushl $_ipkt_ callf $12,_darcls_ casel r0,$1,$0 .align 1 L36: .word L17-L36 jbr L14 L17: pushl $v.18 callf $8,_s_wsfe callf $4,_e_wsfe movl $1,_qq3_+24 jbr L14 L19: pushl $v.19 callf $8,_s_wsfe callf $4,_e_wsfe movl $1,_qq3_+24 jbr L14 L24: pushl $v.20 callf $8,_s_wsfe callf $4,_e_wsfe movl $1,_qq3_+24 jbr L14 L14: L13: ret#0 L12: movl $v.1,r11 jbr L15 .set LF1,84 .set LWM1,0x1C00 .text .data 2 .align 2 v.20: .long 0 .long 6 .space 4 .long L42 .align 2 v.19: .long 0 .long 6 .space 4 .long L40 .align 2 v.18: .long 0 .long 6 .space 4 .long L38 .align 2 v.16: .space 4 .align 2 v.15: .space 4 .align 2 v.12: .space 4 .align 2 v.14: .space 4 .align 2 v.17: .space 4 .align 2 q.3: .space 4 .align 2 v.10: .space 4 .align 2 v.9: .space 4 .align 2 v.13: .space 4 .align 2 v.11: .space 4 .align 2 v.8: .space 20 .set v.1,q.3

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