![[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 |
1.1 ! root 1: .data 0 ! 2: .align 2 ! 3: L38: ! 4: .long 1 ! 5: .align 2 ! 6: L39: ! 7: .long 2 ! 8: .align 2 ! 9: L42: ! 10: .long 3 ! 11: .align 2 ! 12: L44: ! 13: .long 4 ! 14: .align 2 ! 15: L46: ! 16: .long 5 ! 17: .align 2 ! 18: L48: ! 19: .long 6 ! 20: .align 2 ! 21: L50: ! 22: .long 7 ! 23: .align 2 ! 24: L52: ! 25: .long 8 ! 26: .align 2 ! 27: L54: ! 28: .long 9 ! 29: .align 2 ! 30: L56: ! 31: .long 10 ! 32: .align 2 ! 33: L58: ! 34: .long 11 ! 35: .align 2 ! 36: L60: ! 37: .long 13 ! 38: .align 2 ! 39: L62: ! 40: .long 14 ! 41: .align 2 ! 42: L64: ! 43: .long 15 ! 44: .align 2 ! 45: L66: ! 46: .long 16 ! 47: .align 2 ! 48: L68: ! 49: .long 17 ! 50: .align 2 ! 51: L70: ! 52: .long 18 ! 53: .align 2 ! 54: L72: ! 55: .long 19 ! 56: .align 2 ! 57: L74: ! 58: .long 20 ! 59: .align 2 ! 60: L76: ! 61: .long 21 ! 62: .align 2 ! 63: L78: ! 64: .long 22 ! 65: .align 2 ! 66: L80: ! 67: .long 23 ! 68: .align 2 ! 69: L82: ! 70: .long 24 ! 71: .data 2 ! 72: .data 1 ! 73: .data 0 ! 74: .globl _MAIN_ ! 75: .globl _e_ ! 76: .globl _pow_ii ! 77: .align 2 ! 78: .stabs "t02.f",0x64,0,0,0 ! 79: .text ! 80: .globl _MAIN_ ! 81: .set LF1,52 ! 82: .set LWM1,0x1800 ! 83: .align 1 ! 84: _MAIN_:.word LWM1 ! 85: subl3 $LF1,fp,sp ! 86: movl $v.1,r11 ! 87: movl $1,v.2-v.1(r11) ! 88: movl $2,v.3-v.1(r11) ! 89: movl $3,v.4-v.1(r11) ! 90: movl $4,v.5-v.1(r11) ! 91: movl $10,v.6-v.1(r11) ! 92: addl3 v.3-v.1(r11),v.2-v.1(r11),r0 ! 93: cmpl r0,v.4-v.1(r11) ! 94: jeql L15 ! 95: pushl $L39 ! 96: pushl $L38 ! 97: callf $12,_e_ ! 98: L15:addl3 v.4-v.1(r11),v.2-v.1(r11),r0 ! 99: cmpl r0,v.5-v.1(r11) ! 100: jeql L16 ! 101: pushl $L39 ! 102: pushl $L39 ! 103: callf $12,_e_ ! 104: L16:subl3 v.4-v.1(r11),v.3-v.1(r11),r0 ! 105: mnegl v.2-v.1(r11),r1 ! 106: cmpl r0,r1 ! 107: jeql L17 ! 108: pushl $L39 ! 109: pushl $L42 ! 110: callf $12,_e_ ! 111: L17:addl3 v.4-v.1(r11),v.3-v.1(r11),r0 ! 112: mull2 v.3-v.1(r11),r0 ! 113: cmpl r0,v.6-v.1(r11) ! 114: jeql L18 ! 115: pushl $L39 ! 116: pushl $L44 ! 117: callf $12,_e_ ! 118: L18:mnegl v.6-v.1(r11),r0 ! 119: addl3 v.4-v.1(r11),v.4-v.1(r11),r1 ! 120: addl2 v.5-v.1(r11),r1 ! 121: mnegl r1,r1 ! 122: cmpl r0,r1 ! 123: jeql L19 ! 124: pushl $L39 ! 125: pushl $L46 ! 126: callf $12,_e_ ! 127: L19:divl3 v.2-v.1(r11),v.2-v.1(r11),r0 ! 128: cmpl r0,$1 ! 129: jeql L20 ! 130: pushl $L39 ! 131: pushl $L48 ! 132: callf $12,_e_ ! 133: L20:mull3 v.6-v.1(r11),v.6-v.1(r11),r0 ! 134: divl2 v.6-v.1(r11),r0 ! 135: cmpl r0,v.6-v.1(r11) ! 136: jeql L21 ! 137: pushl $L39 ! 138: pushl $L50 ! 139: callf $12,_e_ ! 140: L21:mull3 $10,v.6-v.1(r11),r0 ! 141: cmpl r0,$100 ! 142: jeql L22 ! 143: pushl $L39 ! 144: pushl $L52 ! 145: callf $12,_e_ ! 146: L22:mull3 $-10,v.6-v.1(r11),r0 ! 147: cmpl r0,$-100 ! 148: jeql L23 ! 149: pushl $L39 ! 150: pushl $L54 ! 151: callf $12,_e_ ! 152: L23:divl3 v.4-v.1(r11),v.3-v.1(r11),r0 ! 153: jeql L24 ! 154: pushl $L39 ! 155: pushl $L56 ! 156: callf $12,_e_ ! 157: L24:divl3 v.4-v.1(r11),$100,r0 ! 158: cmpl r0,$33 ! 159: jeql L25 ! 160: pushl $L39 ! 161: pushl $L58 ! 162: callf $12,_e_ ! 163: L25:mull3 v.4-v.1(r11),v.3-v.1(r11),r0 ! 164: mull2 v.6-v.1(r11),r0 ! 165: divl2 $6,r0 ! 166: cmpl r0,$10 ! 167: jeql L26 ! 168: pushl $L39 ! 169: pushl $L60 ! 170: callf $12,_e_ ! 171: L26:cmpl v.4-v.1(r11),$4 ! 172: jgtr L9999 ! 173: cmpl v.4-v.1(r11),$4 ! 174: jgeq L9999 ! 175: cmpl v.4-v.1(r11),$4 ! 176: jneq L27 ! 177: L9999:pushl $L39 ! 178: pushl $L62 ! 179: callf $12,_e_ ! 180: L27:cmpl v.6-v.1(r11),v.3-v.1(r11) ! 181: jlss L9998 ! 182: cmpl v.6-v.1(r11),v.3-v.1(r11) ! 183: jleq L9998 ! 184: cmpl v.6-v.1(r11),v.3-v.1(r11) ! 185: jneq L28 ! 186: L9998:pushl $L39 ! 187: pushl $L64 ! 188: callf $12,_e_ ! 189: L28:addl3 v.3-v.1(r11),v.2-v.1(r11),r0 ! 190: cmpl v.4-v.1(r11),r0 ! 191: jeql L29 ! 192: pushl $L39 ! 193: pushl $L66 ! 194: callf $12,_e_ ! 195: L29:cmpl v.3-v.1(r11),v.2-v.1(r11) ! 196: jgeq L30 ! 197: pushl $L39 ! 198: pushl $L68 ! 199: callf $12,_e_ ! 200: L30:cmpl v.3-v.1(r11),v.2-v.1(r11) ! 201: jgtr L31 ! 202: pushl $L39 ! 203: pushl $L70 ! 204: callf $12,_e_ ! 205: L31:cmpl v.3-v.1(r11),v.2-v.1(r11) ! 206: jneq L32 ! 207: pushl $L39 ! 208: pushl $L72 ! 209: callf $12,_e_ ! 210: L32:cmpl v.3-v.1(r11),v.3-v.1(r11) ! 211: jeql L33 ! 212: pushl $L39 ! 213: pushl $L74 ! 214: callf $12,_e_ ! 215: L33:cmpl v.2-v.1(r11),v.3-v.1(r11) ! 216: jlss L34 ! 217: pushl $L39 ! 218: pushl $L76 ! 219: callf $12,_e_ ! 220: L34:cmpl v.2-v.1(r11),v.3-v.1(r11) ! 221: jleq L35 ! 222: pushl $L39 ! 223: pushl $L78 ! 224: callf $12,_e_ ! 225: L35:mull3 v.4-v.1(r11),v.4-v.1(r11),r0 ! 226: cmpl r0,$9 ! 227: jeql L36 ! 228: pushl $L39 ! 229: pushl $L80 ! 230: callf $12,_e_ ! 231: L36:addl3 $v.4-v.1,r11,-(sp) ! 232: addl3 $v.3-v.1,r11,-(sp) ! 233: callf $12,_pow_ii ! 234: cmpl r0,$8 ! 235: jeql L14 ! 236: pushl $L39 ! 237: pushl $L82 ! 238: callf $12,_e_ ! 239: L14:ret#0 ! 240: ! 241: .data 2 ! 242: .align 2 ! 243: v.3: ! 244: .space 4 ! 245: .align 2 ! 246: v.5: ! 247: .space 4 ! 248: .align 2 ! 249: v.6: ! 250: .space 4 ! 251: .align 2 ! 252: v.4: ! 253: .space 4 ! 254: .align 2 ! 255: v.2: ! 256: .space 4 ! 257: .set v.1,v.6 ! 258:
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.