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

File: [Power 6/32 Unix Tahoe 4.2BSD] / cci / usr / src / usr.bin / f77 / f77pass1 / tst / qqutab.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 L28: .long L27 .align 2 L31: .long L30 .align 2 L34: .long L33 .align 2 L27: .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 L30: .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 L33: .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 .align 2 L38: .long 1 .align 2 L39: .long 5 .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 _istore_ .globl _darcls_ .globl _s_wsfe .globl _e_wsfe .globl _s_copy .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 L37: .word L17-L37 addl3 $v.9-v.1,r11,r0 pushl r0 pushl $L39 pushl $L38 addl3 $v.8-v.1,r11,r0 pushl r0 pushl $_ipkt_ callf $24,_dread_ casel r0,$1,$1 .align 1 L40: .word L18-L40 .word L17-L40 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 L19 jbr L20 L19: 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 L41: .word L18-L41 .word L17-L41 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 v.15-v.1(r11),-56(fp) movl v.13-v.1(r11),r10 movl -60(fp),r9 movl v.16-v.1(r11),r8 movl -56(fp),r7 movl v.14-v.1(r11),r6 movl $1,r8 cmpl r8,r7 jgtr L22 L23: mull3 $12,r8,r0 movl r0,r9 pushl $6 pushl $6 addl3 r9,$q.2+-12,r0 pushl r0 mull3 $6,r10,r0 addl2 $_untab_+-6,r0 pushl r0 callf $20,_s_copy pushl $6 addl3 r9,$q.2+-6,r0 pushl r0 callf $12,_iload_ movl r0,q.3-v.1(r11) addl3 $1,r6,r0 movl r0,r6 movl q.3-v.1(r11),_qq3_+448[r6] movl r6,v.14-v.1(r11) addl3 $v.14-v.1,r11,r0 pushl r0 pushl $6 addl3 $-66,fp,r0 pushl r0 callf $16,_istore_ pushl $6 pushl $6 addl3 $-66,fp,r0 pushl r0 mull3 $6,r10,r0 addl2 $_untab_,r0 pushl r0 callf $20,_s_copy movl v.14-v.1(r11),r6 L21: addl3 $2,r10,r0 movl r0,r10 incl r8 cmpl r8,r7 jleq L23 L22: movl r6,v.14-v.1(r11) movl r8,v.16-v.1(r11) movl r9,-60(fp) movl r10,v.13-v.1(r11) addl3 $v.13-v.1,r11,r0 pushl r0 pushl $6 addl3 $-72,fp,r0 pushl r0 callf $16,_istore_ pushl $6 pushl $6 addl3 $-72,fp,r0 pushl r0 pushl $_untab_+24 callf $20,_s_copy pushl $6 pushl $_untab_+18 callf $12,_iload_ movl r0,-88(fp) subl3 -88(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 $-78,fp,r0 pushl r0 callf $16,_istore_ pushl $6 pushl $6 addl3 $-78,fp,r0 pushl r0 pushl $_untab_+30 callf $20,_s_copy addl3 $v.14-v.1,r11,r0 pushl r0 pushl $6 addl3 $-84,fp,r0 pushl r0 callf $16,_istore_ pushl $6 pushl $6 addl3 $-84,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 L46: .word L17-L46 jbr L14 L17: movl L28,v.18+12 pushl $v.18 callf $8,_s_wsfe callf $4,_e_wsfe movl $1,_qq3_+24 jbr L14 L18: movl L31,v.19+12 pushl $v.19 callf $8,_s_wsfe callf $4,_e_wsfe movl $1,_qq3_+24 jbr L14 L20: movl L34,v.20+12 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,88 .set LWM1,0x1FC0 .text .data 2 .align 2 v.20: .long 0 .long 6 .space 8 .align 2 v.19: .long 0 .long 6 .space 8 .align 2 v.18: .long 0 .long 6 .space 8 .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.