![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to t02.t0 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.t0 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: L16: ! 4: .long 1 ! 5: .align 2 ! 6: L17: ! 7: .long 2 ! 8: .align 2 ! 9: L22: ! 10: .long 3 ! 11: .align 2 ! 12: L25: ! 13: .long 4 ! 14: .align 2 ! 15: L28: ! 16: .long 5 ! 17: .align 2 ! 18: L31: ! 19: .long 6 ! 20: .align 2 ! 21: L34: ! 22: .long 7 ! 23: .align 2 ! 24: L37: ! 25: .long 8 ! 26: .align 2 ! 27: L40: ! 28: .long 9 ! 29: .align 2 ! 30: L43: ! 31: .long 10 ! 32: .align 2 ! 33: L46: ! 34: .long 11 ! 35: .align 2 ! 36: L49: ! 37: .long 13 ! 38: .align 2 ! 39: L52: ! 40: .long 14 ! 41: .align 2 ! 42: L55: ! 43: .long 15 ! 44: .align 2 ! 45: L58: ! 46: .long 16 ! 47: .align 2 ! 48: L61: ! 49: .long 17 ! 50: .align 2 ! 51: L64: ! 52: .long 18 ! 53: .align 2 ! 54: L67: ! 55: .long 19 ! 56: .align 2 ! 57: L70: ! 58: .long 20 ! 59: .align 2 ! 60: L73: ! 61: .long 21 ! 62: .align 2 ! 63: L76: ! 64: .long 22 ! 65: .align 2 ! 66: L79: ! 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: ! 80: .text ! 81: .globl _MAIN_ ! 82: .align 1 ! 83: _MAIN_: ! 84: .word LWM1 ! 85: subl3 $LF1,fp,sp ! 86: jbr L12 ! 87: L13: ! 88: movl $1,v.2-v.1(r11) ! 89: movl $2,v.3-v.1(r11) ! 90: movl $3,v.4-v.1(r11) ! 91: movl $4,v.5-v.1(r11) ! 92: movl $10,v.6-v.1(r11) ! 93: addl3 v.3-v.1(r11),v.2-v.1(r11),r0 ! 94: cmpl r0,v.4-v.1(r11) ! 95: jeql L15 ! 96: pushl $L17 ! 97: pushl $L16 ! 98: callf $12,_e_ ! 99: L15: ! 100: addl3 v.4-v.1(r11),v.2-v.1(r11),r0 ! 101: cmpl r0,v.5-v.1(r11) ! 102: jeql L18 ! 103: pushl $L17 ! 104: pushl $L17 ! 105: callf $12,_e_ ! 106: L18: ! 107: subl3 v.4-v.1(r11),v.3-v.1(r11),r0 ! 108: mnegl v.2-v.1(r11),r1 ! 109: cmpl r0,r1 ! 110: jeql L21 ! 111: pushl $L17 ! 112: pushl $L22 ! 113: callf $12,_e_ ! 114: L21: ! 115: addl3 v.4-v.1(r11),v.3-v.1(r11),r0 ! 116: mull2 v.3-v.1(r11),r0 ! 117: cmpl r0,v.6-v.1(r11) ! 118: jeql L24 ! 119: pushl $L17 ! 120: pushl $L25 ! 121: callf $12,_e_ ! 122: L24: ! 123: mnegl v.6-v.1(r11),r0 ! 124: addl3 v.4-v.1(r11),v.4-v.1(r11),r1 ! 125: addl2 v.5-v.1(r11),r1 ! 126: mnegl r1,r1 ! 127: cmpl r0,r1 ! 128: jeql L27 ! 129: pushl $L17 ! 130: pushl $L28 ! 131: callf $12,_e_ ! 132: L27: ! 133: divl3 v.2-v.1(r11),v.2-v.1(r11),r0 ! 134: cmpl r0,$1 ! 135: jeql L30 ! 136: pushl $L17 ! 137: pushl $L31 ! 138: callf $12,_e_ ! 139: L30: ! 140: mull3 v.6-v.1(r11),v.6-v.1(r11),r0 ! 141: divl2 v.6-v.1(r11),r0 ! 142: cmpl r0,v.6-v.1(r11) ! 143: jeql L33 ! 144: pushl $L17 ! 145: pushl $L34 ! 146: callf $12,_e_ ! 147: L33: ! 148: mull3 $10,v.6-v.1(r11),r0 ! 149: cmpl r0,$100 ! 150: jeql L36 ! 151: pushl $L17 ! 152: pushl $L37 ! 153: callf $12,_e_ ! 154: L36: ! 155: mull3 $-10,v.6-v.1(r11),r0 ! 156: cmpl r0,$-100 ! 157: jeql L39 ! 158: pushl $L17 ! 159: pushl $L40 ! 160: callf $12,_e_ ! 161: L39: ! 162: divl3 v.4-v.1(r11),v.3-v.1(r11),r0 ! 163: jeql L42 ! 164: pushl $L17 ! 165: pushl $L43 ! 166: callf $12,_e_ ! 167: L42: ! 168: divl3 v.4-v.1(r11),$100,r0 ! 169: cmpl r0,$33 ! 170: jeql L45 ! 171: pushl $L17 ! 172: pushl $L46 ! 173: callf $12,_e_ ! 174: L45: ! 175: mull3 v.4-v.1(r11),v.3-v.1(r11),r0 ! 176: mull2 v.6-v.1(r11),r0 ! 177: divl2 $6,r0 ! 178: cmpl r0,$10 ! 179: jeql L48 ! 180: pushl $L17 ! 181: pushl $L49 ! 182: callf $12,_e_ ! 183: L48: ! 184: cmpl v.4-v.1(r11),$4 ! 185: jgtr L9999 ! 186: cmpl v.4-v.1(r11),$4 ! 187: jgeq L9999 ! 188: cmpl v.4-v.1(r11),$4 ! 189: jneq L51 ! 190: L9999: ! 191: pushl $L17 ! 192: pushl $L52 ! 193: callf $12,_e_ ! 194: L51: ! 195: cmpl v.6-v.1(r11),v.3-v.1(r11) ! 196: jlss L9998 ! 197: cmpl v.6-v.1(r11),v.3-v.1(r11) ! 198: jleq L9998 ! 199: cmpl v.6-v.1(r11),v.3-v.1(r11) ! 200: jneq L54 ! 201: L9998: ! 202: pushl $L17 ! 203: pushl $L55 ! 204: callf $12,_e_ ! 205: L54: ! 206: addl3 v.3-v.1(r11),v.2-v.1(r11),r0 ! 207: cmpl v.4-v.1(r11),r0 ! 208: jeql L57 ! 209: pushl $L17 ! 210: pushl $L58 ! 211: callf $12,_e_ ! 212: L57: ! 213: cmpl v.3-v.1(r11),v.2-v.1(r11) ! 214: jgeq L60 ! 215: pushl $L17 ! 216: pushl $L61 ! 217: callf $12,_e_ ! 218: L60: ! 219: cmpl v.3-v.1(r11),v.2-v.1(r11) ! 220: jgtr L63 ! 221: pushl $L17 ! 222: pushl $L64 ! 223: callf $12,_e_ ! 224: L63: ! 225: cmpl v.3-v.1(r11),v.2-v.1(r11) ! 226: jneq L66 ! 227: pushl $L17 ! 228: pushl $L67 ! 229: callf $12,_e_ ! 230: L66: ! 231: cmpl v.3-v.1(r11),v.3-v.1(r11) ! 232: jeql L69 ! 233: pushl $L17 ! 234: pushl $L70 ! 235: callf $12,_e_ ! 236: L69: ! 237: cmpl v.2-v.1(r11),v.3-v.1(r11) ! 238: jlss L72 ! 239: pushl $L17 ! 240: pushl $L73 ! 241: callf $12,_e_ ! 242: L72: ! 243: cmpl v.2-v.1(r11),v.3-v.1(r11) ! 244: jleq L75 ! 245: pushl $L17 ! 246: pushl $L76 ! 247: callf $12,_e_ ! 248: L75: ! 249: mull3 v.4-v.1(r11),v.4-v.1(r11),r0 ! 250: cmpl r0,$9 ! 251: jeql L78 ! 252: pushl $L17 ! 253: pushl $L79 ! 254: callf $12,_e_ ! 255: L78: ! 256: addl3 $v.4-v.1,r11,r0 ! 257: pushl r0 ! 258: addl3 $v.3-v.1,r11,r0 ! 259: pushl r0 ! 260: callf $12,_pow_ii ! 261: cmpl r0,$8 ! 262: jeql L81 ! 263: pushl $L17 ! 264: pushl $L82 ! 265: callf $12,_e_ ! 266: L81: ! 267: L14: ! 268: ret#0 ! 269: L12: ! 270: movl $v.1,r11 ! 271: jbr L13 ! 272: .set LF1,52 ! 273: .set LWM1,0x1800 ! 274: .text ! 275: .data 2 ! 276: .align 2 ! 277: v.3: ! 278: .space 4 ! 279: .align 2 ! 280: v.5: ! 281: .space 4 ! 282: .align 2 ! 283: v.6: ! 284: .space 4 ! 285: .align 2 ! 286: v.4: ! 287: .space 4 ! 288: .align 2 ! 289: v.2: ! 290: .space 4 ! 291: .set v.1,v.6 ! 292:
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.