![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to t18.t1 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 t18.t1 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: L32: ! 4: .long 0 ! 5: .align 2 ! 6: L33: ! 7: .long 1 ! 8: .align 2 ! 9: L34: ! 10: .long 18 ! 11: .align 2 ! 12: L35: ! 13: .long 2 ! 14: .align 2 ! 15: L38: ! 16: .long 3 ! 17: .align 2 ! 18: L41: ! 19: .long 4 ! 20: .align 2 ! 21: L46: ! 22: .long 5 ! 23: .align 2 ! 24: L53: ! 25: .long 6 ! 26: .align 2 ! 27: L55: ! 28: .long 7 ! 29: .align 2 ! 30: L58: ! 31: .long 8 ! 32: .align 2 ! 33: L61: ! 34: .long 15 ! 35: .align 2 ! 36: L62: ! 37: .long 9 ! 38: .align 2 ! 39: L65: ! 40: .long 10 ! 41: .align 2 ! 42: L67: ! 43: .long 11 ! 44: .align 2 ! 45: L70: ! 46: .long 12 ! 47: .align 2 ! 48: L74: ! 49: .long 324 ! 50: .align 2 ! 51: L75: ! 52: .long 13 ! 53: .align 2 ! 54: L78: ! 55: .long 400 ! 56: .align 2 ! 57: L79: ! 58: .long 14 ! 59: .align 2 ! 60: L82: ! 61: .long 1369 ! 62: .data 2 ! 63: .data 1 ! 64: .data 0 ! 65: .data 2 ! 66: .data 1 ! 67: .data 0 ! 68: .data 2 ! 69: .data 1 ! 70: .data 0 ! 71: .data 2 ! 72: .data 1 ! 73: .data 0 ! 74: .data 2 ! 75: .data 1 ! 76: .data 0 ! 77: .data 2 ! 78: .data 1 ! 79: .data 0 ! 80: .data 2 ! 81: .data 1 ! 82: .data 0 ! 83: .data 2 ! 84: .data 1 ! 85: .data 0 ! 86: .data 2 ! 87: .data 1 ! 88: .data 0 ! 89: .data 2 ! 90: .data 1 ! 91: .data 0 ! 92: .data 2 ! 93: .data 1 ! 94: .data 0 ! 95: .globl _MAIN_ ! 96: .globl _incr_ ! 97: .globl _e_ ! 98: .globl _decr_ ! 99: .globl _double_ ! 100: .globl _eval_ ! 101: .globl _apply_ ! 102: .globl _x1_ ! 103: .globl _p1_ ! 104: .globl _x2_ ! 105: .globl _p0_ ! 106: .comm _p1c_,4 ! 107: .globl _p2_ ! 108: .align 2 ! 109: .stabs "t18.f",0x64,0,0,0 ! 110: ! 111: .text ! 112: .globl _MAIN_ ! 113: .align 1 ! 114: _MAIN_: ! 115: .word LWM1 ! 116: subl3 $LF1,fp,sp ! 117: jbr L12 ! 118: L13: ! 119: movl $10,v.3-v.1(r11) ! 120: movl $20,v.4-v.1(r11) ! 121: pushl $L32 ! 122: callf $8,_incr_ ! 123: cmpl r0,$1 ! 124: jeql L15 ! 125: pushl $L34 ! 126: pushl $L33 ! 127: callf $12,_e_ ! 128: L15: ! 129: addl3 $v.3-v.1,r11,r0 ! 130: pushl r0 ! 131: callf $8,_decr_ ! 132: cmpl r0,$9 ! 133: jeql L16 ! 134: pushl $L34 ! 135: pushl $L35 ! 136: callf $12,_e_ ! 137: L16: ! 138: addl3 v.4-v.1(r11),v.3-v.1(r11),r0 ! 139: movl r0,-72(fp) ! 140: addl3 $-72,fp,r0 ! 141: pushl r0 ! 142: callf $8,_double_ ! 143: cmpl r0,$60 ! 144: jeql L17 ! 145: pushl $L34 ! 146: pushl $L38 ! 147: callf $12,_e_ ! 148: L17: ! 149: addl3 $v.4-v.1,r11,r0 ! 150: pushl r0 ! 151: callf $8,_double_ ! 152: movl r0,-76(fp) ! 153: addl3 $-76,fp,r0 ! 154: pushl r0 ! 155: callf $8,_incr_ ! 156: cmpl r0,$41 ! 157: jeql L18 ! 158: pushl $L34 ! 159: pushl $L41 ! 160: callf $12,_e_ ! 161: L18: ! 162: addl3 $v.3-v.1,r11,r0 ! 163: pushl r0 ! 164: callf $8,_double_ ! 165: movl r0,-88(fp) ! 166: addl3 $-88,fp,r0 ! 167: pushl r0 ! 168: callf $8,_incr_ ! 169: movl r0,-84(fp) ! 170: addl3 $-84,fp,r0 ! 171: pushl r0 ! 172: callf $8,_double_ ! 173: movl r0,-80(fp) ! 174: addl3 $-80,fp,r0 ! 175: pushl r0 ! 176: callf $8,_decr_ ! 177: cmpl r0,$41 ! 178: jeql L19 ! 179: pushl $L34 ! 180: pushl $L46 ! 181: callf $12,_e_ ! 182: L19: ! 183: pushl $L46 ! 184: callf $8,_incr_ ! 185: movl r0,-104(fp) ! 186: addl3 $-104,fp,r0 ! 187: pushl r0 ! 188: callf $8,_incr_ ! 189: movl r0,-100(fp) ! 190: addl3 $-100,fp,r0 ! 191: pushl r0 ! 192: callf $8,_incr_ ! 193: movl r0,-96(fp) ! 194: addl3 $-96,fp,r0 ! 195: pushl r0 ! 196: callf $8,_incr_ ! 197: movl r0,-92(fp) ! 198: addl3 $-92,fp,r0 ! 199: pushl r0 ! 200: callf $8,_incr_ ! 201: cmpl r0,$10 ! 202: jeql L20 ! 203: pushl $L34 ! 204: pushl $L53 ! 205: callf $12,_e_ ! 206: L20: ! 207: addl3 $v.3-v.1,r11,r0 ! 208: pushl r0 ! 209: pushl $_incr_ ! 210: callf $12,_eval_ ! 211: cmpl r0,$11 ! 212: jeql L21 ! 213: pushl $L34 ! 214: pushl $L55 ! 215: callf $12,_e_ ! 216: L21: ! 217: pushl $L38 ! 218: pushl $_decr_ ! 219: callf $12,_eval_ ! 220: cmpl r0,$2 ! 221: jeql L22 ! 222: pushl $L34 ! 223: pushl $L58 ! 224: callf $12,_e_ ! 225: L22: ! 226: pushl $L61 ! 227: pushl $_double_ ! 228: callf $12,_eval_ ! 229: movl r0,-108(fp) ! 230: addl3 $-108,fp,r0 ! 231: pushl r0 ! 232: callf $8,_incr_ ! 233: cmpl r0,$31 ! 234: jeql L23 ! 235: pushl $L34 ! 236: pushl $L62 ! 237: callf $12,_e_ ! 238: L23: ! 239: pushl $L38 ! 240: pushl $_incr_ ! 241: callf $12,_apply_ ! 242: cmpl r0,$4 ! 243: jeql L24 ! 244: pushl $L34 ! 245: pushl $L65 ! 246: callf $12,_e_ ! 247: L24: ! 248: addl3 $v.4-v.1,r11,r0 ! 249: pushl r0 ! 250: addl3 $v.3-v.1,r11,r0 ! 251: pushl r0 ! 252: pushl $_double_ ! 253: callf $16,_x1_ ! 254: cmpl v.4-v.1(r11),$40 ! 255: jeql L25 ! 256: pushl $L34 ! 257: pushl $L67 ! 258: callf $12,_e_ ! 259: L25: ! 260: addl3 $3,v.3-v.1(r11),r0 ! 261: movl r0,-112(fp) ! 262: addl3 $v.4-v.1,r11,r0 ! 263: pushl r0 ! 264: addl3 $-112,fp,r0 ! 265: pushl r0 ! 266: pushl $_incr_ ! 267: callf $16,_x1_ ! 268: cmpl v.4-v.1(r11),$27 ! 269: jeql L26 ! 270: pushl $L34 ! 271: pushl $L70 ! 272: callf $12,_e_ ! 273: L26: ! 274: pushl $L75 ! 275: pushl $L74 ! 276: pushl $L46 ! 277: pushl $L38 ! 278: callf $20,_p1_ ! 279: pushl $L79 ! 280: pushl $L78 ! 281: pushl $L41 ! 282: pushl $L65 ! 283: callf $20,_p1_ ! 284: pushl $L61 ! 285: pushl $L82 ! 286: pushl $L58 ! 287: pushl $L33 ! 288: callf $20,_p1_ ! 289: movl $1,v.4-v.1(r11) ! 290: addl3 $v.4-v.1,r11,r0 ! 291: pushl r0 ! 292: callf $8,_double_ ! 293: movl r0,-56(fp) ! 294: shll $1,-56(fp),r0 ! 295: movl r0,-116(fp) ! 296: addl3 $-116,fp,r0 ! 297: pushl r0 ! 298: callf $8,_incr_ ! 299: movl r0,-60(fp) ! 300: addl3 $1,-60(fp),r0 ! 301: movl r0,-120(fp) ! 302: addl3 $-120,fp,r0 ! 303: pushl r0 ! 304: callf $8,_double_ ! 305: movl r0,-64(fp) ! 306: shll $1,-64(fp),r0 ! 307: movl r0,-124(fp) ! 308: addl3 $-124,fp,r0 ! 309: pushl r0 ! 310: callf $8,_incr_ ! 311: movl r0,-68(fp) ! 312: addl3 $1,-68(fp),r0 ! 313: cmpl r0,$26 ! 314: jeql L27 ! 315: pushl $L34 ! 316: pushl $L75 ! 317: callf $12,_e_ ! 318: L27: ! 319: L14: ! 320: ret#0 ! 321: L12: ! 322: movl $v.1,r11 ! 323: jbr L13 ! 324: .set LF1,124 ! 325: .set LWM1,0x1800 ! 326: .text ! 327: .globl _incr_ ! 328: .align 1 ! 329: _incr_: ! 330: .word LWM2 ! 331: subl3 $LF2,fp,sp ! 332: jbr L90 ! 333: L92: ! 334: addl3 $1,*4(r12),r0 ! 335: movl r0,-60(fp) ! 336: L91: ! 337: movl -60(fp),r0 ! 338: ret#1 ! 339: L90: ! 340: movl fp,r12 ! 341: jbr L92 ! 342: .set LF2,60 ! 343: .set LWM2,0x1000 ! 344: .text ! 345: .globl _decr_ ! 346: .align 1 ! 347: _decr_: ! 348: .word LWM3 ! 349: subl3 $LF3,fp,sp ! 350: jbr L96 ! 351: L98: ! 352: addl3 $-1,*4(r12),r0 ! 353: movl r0,-60(fp) ! 354: L97: ! 355: movl -60(fp),r0 ! 356: ret#1 ! 357: L96: ! 358: movl fp,r12 ! 359: jbr L98 ! 360: .set LF3,60 ! 361: .set LWM3,0x1000 ! 362: .text ! 363: .globl _double_ ! 364: .align 1 ! 365: _double_: ! 366: .word LWM4 ! 367: subl3 $LF4,fp,sp ! 368: jbr L102 ! 369: L104: ! 370: shll $1,*4(r12),r0 ! 371: movl r0,-60(fp) ! 372: L103: ! 373: movl -60(fp),r0 ! 374: ret#1 ! 375: L102: ! 376: movl fp,r12 ! 377: jbr L104 ! 378: .set LF4,60 ! 379: .set LWM4,0x1000 ! 380: .text ! 381: .globl _eval_ ! 382: .align 1 ! 383: _eval_: ! 384: .word LWM5 ! 385: subl3 $LF5,fp,sp ! 386: jbr L108 ! 387: L110: ! 388: pushl 8(r12) ! 389: calls $8,*4(r12) ! 390: movl r0,-60(fp) ! 391: L109: ! 392: movl -60(fp),r0 ! 393: ret#1 ! 394: L108: ! 395: movl fp,r12 ! 396: jbr L110 ! 397: .set LF5,60 ! 398: .set LWM5,0x1000 ! 399: .text ! 400: .globl _apply_ ! 401: .align 1 ! 402: _apply_: ! 403: .word LWM6 ! 404: subl3 $LF6,fp,sp ! 405: jbr L114 ! 406: L116: ! 407: pushl 8(r12) ! 408: pushl 4(r12) ! 409: callf $12,_eval_ ! 410: movl r0,-60(fp) ! 411: L115: ! 412: movl -60(fp),r0 ! 413: ret#1 ! 414: L114: ! 415: movl fp,r12 ! 416: jbr L116 ! 417: .set LF6,60 ! 418: .set LWM6,0x1000 ! 419: .text ! 420: .globl _x1_ ! 421: .align 1 ! 422: _x1_: ! 423: .word LWM7 ! 424: subl3 $LF7,fp,sp ! 425: jbr L120 ! 426: L123: ! 427: addl3 *8(r12),*8(r12),r0 ! 428: movl r0,-56(fp) ! 429: pushl 12(r12) ! 430: addl3 $-56,fp,r0 ! 431: pushl r0 ! 432: pushl 4(r12) ! 433: callf $16,_x2_ ! 434: L122: ! 435: L121: ! 436: ret#0 ! 437: L120: ! 438: movl fp,r12 ! 439: jbr L123 ! 440: .set LF7,56 ! 441: .set LWM7,0x1000 ! 442: .text ! 443: .globl _x2_ ! 444: .align 1 ! 445: _x2_: ! 446: .word LWM8 ! 447: subl3 $LF8,fp,sp ! 448: jbr L127 ! 449: L130: ! 450: pushl 8(r12) ! 451: pushl 4(r12) ! 452: callf $12,_apply_ ! 453: movl r0,*12(r12) ! 454: L129: ! 455: L128: ! 456: ret#0 ! 457: L127: ! 458: movl fp,r12 ! 459: jbr L130 ! 460: .set LF8,52 ! 461: .set LWM8,0x1000 ! 462: .text ! 463: .globl _p0_ ! 464: .align 1 ! 465: _p0_: ! 466: .word LWM9 ! 467: subl3 $LF9,fp,sp ! 468: jbr L133 ! 469: L136: ! 470: tstl *12(r12) ! 471: jneq L138 ! 472: pushl 8(r12) ! 473: calls $8,*4(r12) ! 474: jbr L139 ! 475: L138: ! 476: addl3 *12(r12),*8(r12),r0 ! 477: movl r0,-56(fp) ! 478: addl3 $-1,*12(r12),r0 ! 479: movl r0,-60(fp) ! 480: addl3 $-60,fp,r0 ! 481: pushl r0 ! 482: addl3 $-56,fp,r0 ! 483: pushl r0 ! 484: pushl 4(r12) ! 485: callf $16,_p0_ ! 486: L139: ! 487: L135: ! 488: L134: ! 489: ret#0 ! 490: L133: ! 491: movl fp,r12 ! 492: jbr L136 ! 493: .set LF9,60 ! 494: .set LWM9,0x1000 ! 495: .text ! 496: .globl _p1_ ! 497: .align 1 ! 498: _p1_: ! 499: .word LWM10 ! 500: subl3 $LF10,fp,sp ! 501: jbr L143 ! 502: L146: ! 503: clrl _p1c_ ! 504: pushl 8(r12) ! 505: pushl 4(r12) ! 506: pushl $_p2_ ! 507: callf $16,_p0_ ! 508: cmpl _p1c_,*12(r12) ! 509: jeql L148 ! 510: pushl $L34 ! 511: pushl 16(r12) ! 512: callf $12,_e_ ! 513: L148: ! 514: L145: ! 515: L144: ! 516: ret#0 ! 517: L143: ! 518: movl fp,r12 ! 519: jbr L146 ! 520: .set LF10,52 ! 521: .set LWM10,0x1000 ! 522: .text ! 523: .globl _p2_ ! 524: .align 1 ! 525: _p2_: ! 526: .word LWM11 ! 527: subl3 $LF11,fp,sp ! 528: jbr L151 ! 529: L154: ! 530: mull3 *4(r12),*4(r12),r0 ! 531: movl r0,_p1c_ ! 532: L153: ! 533: L152: ! 534: ret#0 ! 535: L151: ! 536: movl fp,r12 ! 537: jbr L154 ! 538: .set LF11,52 ! 539: .set LWM11,0x1000 ! 540: .text ! 541: .data 2 ! 542: .align 2 ! 543: v.4: ! 544: .space 4 ! 545: .align 2 ! 546: v.2: ! 547: .space 4 ! 548: .align 2 ! 549: v.3: ! 550: .space 4 ! 551: .set v.1,v.2 ! 552:
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.