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

File: [Power 6/32 Unix Tahoe 4.2BSD] / cci / usr / src / usr.bin / f77 / f77pass1 / tst / dob.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 L26: .long 1 .align 2 L25: .byte 050,02 .byte 0114,0157 .byte 0157,0160 .byte 040,0160 .byte 0141,0163 .byte 0163,02 .byte 054,0151 .byte 063,051 .byte 00,00 .align 2 L27: .byte 00,00 .data 2 .data 1 .data 0 .data 2 .data 1 .data 0 .globl _bug1_ .globl _MAIN_ .globl _dummy_ .globl _s_wsfe .globl _do_fio .globl _e_wsfe .globl _s_stop .align 2 .stabs "dob.f",0x64,0,0,0 .text .globl _MAIN_ .align 1 _MAIN_: .word LWM1 subl3 $LF1,fp,sp jbr L12 L13: movl $2,v.2-v.1(r11) movl $3,v.3-v.1(r11) movl $4,v.4-v.1(r11) movl $5,v.5-v.1(r11) movl $6,v.6-v.1(r11) movl $7,v.7-v.1(r11) movl $1,r10 movl v.3-v.1(r11),-56(fp) cmpl r10,-56(fp) jgtr L16 L17: movl r10,v.8-v.1(r11) addl3 $1,v.2-v.1(r11),r0 movl r0,v.2-v.1(r11) addl3 $1,r10,r0 movl r0,v.4-v.1(r11) mull3 v.2-v.1(r11),v.4-v.1(r11),r0 movl r0,v.2-v.1(r11) addl3 $-1,v.2-v.1(r11),r0 movl r0,v.4-v.1(r11) mull3 r10,v.4-v.1(r11),r0 movl r0,v.5-v.1(r11) mull3 v.5-v.1(r11),v.4-v.1(r11),r0 movl r0,v.6-v.1(r11) subl3 v.4-v.1(r11),v.5-v.1(r11),r0 movl r0,v.7-v.1(r11) addl3 $3,v.7-v.1(r11),r0 movl r0,v.5-v.1(r11) divl3 v.5-v.1(r11),v.7-v.1(r11),r0 movl r0,v.6-v.1(r11) addl3 v.6-v.1(r11),v.2-v.1(r11),r0 movl r0,v.7-v.1(r11) addl3 $1,r10,r0 movl r0,-60(fp) addl3 $2,v.2-v.1(r11),r0 movl r0,-64(fp) addl3 $3,v.4-v.1(r11),r0 movl r0,-68(fp) addl3 $-68,fp,r0 pushl r0 addl3 $-64,fp,r0 pushl r0 addl3 $-60,fp,r0 pushl r0 callf $16,_dummy_ pushl $v.9 callf $8,_s_wsfe pushl $4 addl3 $v.8-v.1,r11,r0 pushl r0 pushl $L26 callf $16,_do_fio callf $4,_e_wsfe L15: incl r10 cmpl r10,-56(fp) jleq L17 L16: movl r10,v.8-v.1(r11) pushl $0 pushl $L27 callf $12,_s_stop L14: ret#0 .align 1 _bug1_: .word LWM1 L12: movl $v.1,r11 jbr L13 .set LF1,68 .set LWM1,0x1C00 .text .globl _dummy_ .align 1 _dummy_: .word LWM2 subl3 $LF2,fp,sp jbr L29 L32: jbr L31 L31: L30: ret#0 L29: movl fp,r12 jbr L32 .set LF2,52 .set LWM2,0x1000 .text .data 2 .align 2 v.9: .long 0 .long 6 .space 4 .long L25 .align 2 v.2: .space 4 .align 2 v.4: .space 4 .align 2 v.6: .space 4 .align 2 v.7: .space 4 .align 2 v.5: .space 4 .align 2 v.3: .space 4 .align 2 v.8: .space 4 .set v.1,v.7

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