![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to t02.t2 CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Power 6/32 Unix Tahoe 4.2BSD] / cci / usr / src / usr.bin / f77 / f77pass1 / tst|
Return to t02.t2 CVS log | Up to [Power 6/32 Unix Tahoe 4.2BSD] / cci / usr / src / usr.bin / f77 / f77pass1 / tst |
Power 6/32 Unix version 1.21
.data 0 .align 2 L38: .long 1 .align 2 L39: .long 2 .align 2 L42: .long 3 .align 2 L44: .long 4 .align 2 L46: .long 5 .align 2 L48: .long 6 .align 2 L50: .long 7 .align 2 L52: .long 8 .align 2 L54: .long 9 .align 2 L56: .long 10 .align 2 L58: .long 11 .align 2 L60: .long 13 .align 2 L62: .long 14 .align 2 L64: .long 15 .align 2 L66: .long 16 .align 2 L68: .long 17 .align 2 L70: .long 18 .align 2 L72: .long 19 .align 2 L74: .long 20 .align 2 L76: .long 21 .align 2 L78: .long 22 .align 2 L80: .long 23 .align 2 L82: .long 24 .data 2 .data 1 .data 0 .globl _MAIN_ .globl _e_ .globl _pow_ii .align 2 .stabs "t02.f",0x64,0,0,0 .text .globl _MAIN_ .set LF1,52 .set LWM1,0x1800 .align 1 _MAIN_:.word LWM1 subl3 $LF1,fp,sp movl $v.1,r11 movl $1,v.2-v.1(r11) movl $2,v.3-v.1(r11) movl $3,v.4-v.1(r11) movl $4,v.5-v.1(r11) movl $10,v.6-v.1(r11) addl3 v.3-v.1(r11),v.2-v.1(r11),r0 cmpl r0,v.4-v.1(r11) jeql L15 pushl $L39 pushl $L38 callf $12,_e_ L15:addl3 v.4-v.1(r11),v.2-v.1(r11),r0 cmpl r0,v.5-v.1(r11) jeql L16 pushl $L39 pushl $L39 callf $12,_e_ L16:subl3 v.4-v.1(r11),v.3-v.1(r11),r0 mnegl v.2-v.1(r11),r1 cmpl r0,r1 jeql L17 pushl $L39 pushl $L42 callf $12,_e_ L17:addl3 v.4-v.1(r11),v.3-v.1(r11),r0 mull2 v.3-v.1(r11),r0 cmpl r0,v.6-v.1(r11) jeql L18 pushl $L39 pushl $L44 callf $12,_e_ L18:mnegl v.6-v.1(r11),r0 addl3 v.4-v.1(r11),v.4-v.1(r11),r1 addl2 v.5-v.1(r11),r1 mnegl r1,r1 cmpl r0,r1 jeql L19 pushl $L39 pushl $L46 callf $12,_e_ L19:divl3 v.2-v.1(r11),v.2-v.1(r11),r0 cmpl r0,$1 jeql L20 pushl $L39 pushl $L48 callf $12,_e_ L20:mull3 v.6-v.1(r11),v.6-v.1(r11),r0 divl2 v.6-v.1(r11),r0 cmpl r0,v.6-v.1(r11) jeql L21 pushl $L39 pushl $L50 callf $12,_e_ L21:mull3 $10,v.6-v.1(r11),r0 cmpl r0,$100 jeql L22 pushl $L39 pushl $L52 callf $12,_e_ L22:mull3 $-10,v.6-v.1(r11),r0 cmpl r0,$-100 jeql L23 pushl $L39 pushl $L54 callf $12,_e_ L23:divl3 v.4-v.1(r11),v.3-v.1(r11),r0 jeql L24 pushl $L39 pushl $L56 callf $12,_e_ L24:divl3 v.4-v.1(r11),$100,r0 cmpl r0,$33 jeql L25 pushl $L39 pushl $L58 callf $12,_e_ L25:mull3 v.4-v.1(r11),v.3-v.1(r11),r0 mull2 v.6-v.1(r11),r0 divl2 $6,r0 cmpl r0,$10 jeql L26 pushl $L39 pushl $L60 callf $12,_e_ L26:cmpl v.4-v.1(r11),$4 jgtr L9999 cmpl v.4-v.1(r11),$4 jgeq L9999 cmpl v.4-v.1(r11),$4 jneq L27 L9999:pushl $L39 pushl $L62 callf $12,_e_ L27:cmpl v.6-v.1(r11),v.3-v.1(r11) jlss L9998 cmpl v.6-v.1(r11),v.3-v.1(r11) jleq L9998 cmpl v.6-v.1(r11),v.3-v.1(r11) jneq L28 L9998:pushl $L39 pushl $L64 callf $12,_e_ L28:addl3 v.3-v.1(r11),v.2-v.1(r11),r0 cmpl v.4-v.1(r11),r0 jeql L29 pushl $L39 pushl $L66 callf $12,_e_ L29:cmpl v.3-v.1(r11),v.2-v.1(r11) jgeq L30 pushl $L39 pushl $L68 callf $12,_e_ L30:cmpl v.3-v.1(r11),v.2-v.1(r11) jgtr L31 pushl $L39 pushl $L70 callf $12,_e_ L31:cmpl v.3-v.1(r11),v.2-v.1(r11) jneq L32 pushl $L39 pushl $L72 callf $12,_e_ L32:cmpl v.3-v.1(r11),v.3-v.1(r11) jeql L33 pushl $L39 pushl $L74 callf $12,_e_ L33:cmpl v.2-v.1(r11),v.3-v.1(r11) jlss L34 pushl $L39 pushl $L76 callf $12,_e_ L34:cmpl v.2-v.1(r11),v.3-v.1(r11) jleq L35 pushl $L39 pushl $L78 callf $12,_e_ L35:mull3 v.4-v.1(r11),v.4-v.1(r11),r0 cmpl r0,$9 jeql L36 pushl $L39 pushl $L80 callf $12,_e_ L36:addl3 $v.4-v.1,r11,-(sp) addl3 $v.3-v.1,r11,-(sp) callf $12,_pow_ii cmpl r0,$8 jeql L14 pushl $L39 pushl $L82 callf $12,_e_ L14:ret#0 .data 2 .align 2 v.3: .space 4 .align 2 v.5: .space 4 .align 2 v.6: .space 4 .align 2 v.4: .space 4 .align 2 v.2: .space 4 .set v.1,v.6
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.