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

File: [Power 6/32 Unix Tahoe 4.2BSD] / cci / usr / src / usr.bin / f77 / f77pass1 / tst / qqutab.t2
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_ .set LF1,88 .set LWM1,0x1FC0 .align 1 _qqutab_:.word LWM1 subl3 $LF1,fp,sp movl $v.1,r11 pushl $6 pushl $_untab_ callf $12,_qqtopn_ casel r0,$1,$0 .align 1 L2000005: .word L17-L2000005 addl3 $v.9-v.1,r11,-(sp) pushl $L39 pushl $L38 addl3 $v.8-v.1,r11,-(sp) pushl $_ipkt_ callf $24,_dread_ casel r0,$1,$1 .align 1 L2000006: .word L18-L2000006 .word L17-L2000006 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),v.11-v.1(r11) movl $200,v.12-v.1(r11) cmpl v.11-v.1(r11),v.12-v.1(r11) jgtr L20 pushl $6 addl3 $v.9-v.1,r11,-(sp) addl3 $v.11-v.1,r11,-(sp) addl3 $v.10-v.1,r11,-(sp) pushl $q.2 pushl $_ipkt_ callf $28,_dcread_ casel r0,$1,$1 .align 1 L2000007: .word L18-L2000007 .word L17-L2000007 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),v.15-v.1(r11) movl v.15-v.1(r11),-56(fp) movl r0,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,r9 pushl $6 pushl $6 addl3 r9,$q.2+-12,-(sp) mull3 $6,r10,r0 addl3 $_untab_+-6,r0,-(sp) callf $20,_s_copy pushl $6 addl3 r9,$q.2+-6,-(sp) callf $12,_iload_ movl r0,q.3-v.1(r11) addl2 $1,r6 movl r0,_qq3_+448[r6] movl r6,v.14-v.1(r11) addl3 $v.14-v.1,r11,-(sp) pushl $6 subl3 $66,fp,-(sp) callf $16,_istore_ pushl $6 pushl $6 subl3 $66,fp,-(sp) mull3 $6,r10,r0 addl3 $_untab_,r0,-(sp) callf $20,_s_copy movl v.14-v.1(r11),r6 addl2 $2,r10 aobleq r7,r8,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,-(sp) pushl $6 subl3 $72,fp,-(sp) callf $16,_istore_ pushl $6 pushl $6 subl3 $72,fp,-(sp) pushl $_untab_+24 callf $20,_s_copy pushl $6 pushl $_untab_+18 callf $12,_iload_ movl r0,-88(fp) subl3 r0,v.13-v.1(r11),r0 divl3 $2,r0,v.17-v.1(r11) addl3 $v.17-v.1,r11,-(sp) pushl $6 subl3 $78,fp,-(sp) callf $16,_istore_ pushl $6 pushl $6 subl3 $78,fp,-(sp) pushl $_untab_+30 callf $20,_s_copy addl3 $v.14-v.1,r11,-(sp) pushl $6 subl3 $84,fp,-(sp) callf $16,_istore_ pushl $6 pushl $6 subl3 $84,fp,-(sp) pushl $_untab_+54 callf $20,_s_copy addl3 $v.9-v.1,r11,-(sp) pushl $_ipkt_ callf $12,_darcls_ casel r0,$1,$0 .align 1 L2000008: .word L17-L2000008 L13:ret#0 L17:movl L28,v.18+12 pushl $v.18 L2000002:callf $8,_s_wsfe callf $4,_e_wsfe movl $1,_qq3_+24 jbr L13 L18:movl L31,v.19+12 pushl $v.19 jbr L2000002 L20:movl L34,v.20+12 pushl $v.20 jbr L2000002 .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.