![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to switch.s CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Research Unix] / researchv10no / cmd / lcc / gen2 / mc-sun / tst|
Return to switch.s CVS log | Up to [Research Unix] / researchv10no / cmd / lcc / gen2 / mc-sun / tst |
1.1 ! root 1: .text ! 2: .globl _main ! 3: .align 2 ! 4: _main:link a6,#-24 ! 5: moveml #0x2090,a6@(-12) ! 6: lea L6:l,a5 ! 7: jra L5 ! 8: L2: ! 9: movb a5@,d4 ! 10: extbl d4 ! 11: movl d4,sp@ ! 12: jbsr _backslash:l ! 13: movl #L7,sp@ ! 14: movb a5@,d4 ! 15: extbl d4 ! 16: movl d4,sp@(4) ! 17: movl d0,sp@(8) ! 18: jbsr _printf:l ! 19: L3: ! 20: addql #1,a5 ! 21: L5: ! 22: tstb a5@; jne L2 ! 23: jbsr _f:l ! 24: jbsr _g:l ! 25: jbsr _h:l ! 26: movl #16777216,d7 ! 27: jra L11 ! 28: L8: ! 29: movl d7,sp@ ! 30: jbsr _big:l ! 31: L9: ! 32: addl #16777216,d7 ! 33: L11: ! 34: movl d7,d4; andl #0x7000000,d4 ! 35: tstl d4; jne L8 ! 36: jbsr _limit:l ! 37: clrl d0 ! 38: L1: ! 39: moveml a6@(-12),#0x2090 ! 40: unlk a6 ! 41: rts ! 42: .globl _backslash ! 43: .align 2 ! 44: _backslash:link a6,#-4 ! 45: moveml #0x10,a6@(-4) ! 46: movl a6@(8),d4 ! 47: cmpl #110,d4; jeq L17 ! 48: cmpl #110,d4; jgt L21 ! 49: movl a6@(8),d4 ! 50: cmpl #102,d4; jeq L16 ! 51: cmpl #102,d4; jgt L13 ! 52: cmpl #98,a6@(8); jeq L15 ! 53: jra L13 ! 54: L21: ! 55: movl a6@(8),d4 ! 56: cmpl #114,d4; jeq L18 ! 57: cmpl #116,d4; jeq L19 ! 58: cmpl #118,d4; jeq L20 ! 59: jra L13 ! 60: L15: ! 61: movl #8,d0 ! 62: jra L12 ! 63: L16: ! 64: movl #12,d0 ! 65: jra L12 ! 66: L17: ! 67: movl #10,d0 ! 68: jra L12 ! 69: L18: ! 70: movl #13,d0 ! 71: jra L12 ! 72: L19: ! 73: movl #9,d0 ! 74: jra L12 ! 75: L20: ! 76: movl #11,d0 ! 77: jra L12 ! 78: L13: ! 79: movl a6@(8),d0 ! 80: L12: ! 81: moveml a6@(-4),#0x10 ! 82: unlk a6 ! 83: rts ! 84: .globl _f ! 85: .align 2 ! 86: _f:link a6,#-24 ! 87: moveml #0x4e0,a6@(-16) ! 88: clrl d6 ! 89: movl #L23,sp@ ! 90: jbsr _printf:l ! 91: clrl d7 ! 92: L24: ! 93: movl d7,d5 ! 94: cmpl #1,d7; jlt L28 ! 95: cmpl #20,d7; jgt L28 ! 96: movl @(L41-4:l,d7:l:4),a2 ! 97: jra a2@ ! 98: L41: ! 99: .align 2; .long L30 ! 100: .align 2; .long L31 ! 101: .align 2; .long L28 ! 102: .align 2; .long L28 ! 103: .align 2; .long L28 ! 104: .align 2; .long L28 ! 105: .align 2; .long L32 ! 106: .align 2; .long L33 ! 107: .align 2; .long L34 ! 108: .align 2; .long L28 ! 109: .align 2; .long L28 ! 110: .align 2; .long L28 ! 111: .align 2; .long L28 ! 112: .align 2; .long L28 ! 113: .align 2; .long L28 ! 114: .align 2; .long L35 ! 115: .align 2; .long L36 ! 116: .align 2; .long L37 ! 117: .align 2; .long L38 ! 118: .align 2; .long L39 ! 119: L30: ! 120: movl d7,d6 ! 121: jra L29 ! 122: L31: ! 123: movl d7,d6 ! 124: jra L29 ! 125: L32: ! 126: movl d7,d6 ! 127: jra L29 ! 128: L33: ! 129: movl d7,d6 ! 130: jra L29 ! 131: L34: ! 132: movl d7,d6 ! 133: jra L29 ! 134: L35: ! 135: movl d7,d6 ! 136: jra L29 ! 137: L36: ! 138: movl d7,d6 ! 139: jra L29 ! 140: L37: ! 141: movl d7,d6 ! 142: jra L29 ! 143: L38: ! 144: movl d7,d6 ! 145: jra L29 ! 146: L39: ! 147: movl d7,d6 ! 148: L28: ! 149: L29: ! 150: movl #L43,sp@ ! 151: movl d6,sp@(4) ! 152: jbsr _printf:l ! 153: L25: ! 154: addql #1,d7 ! 155: cmpl #20,d7; jle L24 ! 156: L22: ! 157: moveml a6@(-16),#0x4e0 ! 158: unlk a6 ! 159: rts ! 160: .globl _g ! 161: .align 2 ! 162: _g:link a6,#-16 ! 163: moveml #0x480,a6@(-8) ! 164: movl #L45,sp@ ! 165: jbsr _printf:l ! 166: movl #1,d7 ! 167: L46: ! 168: cmpl #1001,d7; jlt L64 ! 169: cmpl #1004,d7; jgt L63 ! 170: movl @(L65-4004:l,d7:l:4),a2 ! 171: jra a2@ ! 172: L65: ! 173: .align 2; .long L59 ! 174: .align 2; .long L59 ! 175: .align 2; .long L59 ! 176: .align 2; .long L59 ! 177: L64: ! 178: cmpl #1,d7; jlt L50 ! 179: cmpl #8,d7; jgt L50 ! 180: movl @(L68-4:l,d7:l:4),a2 ! 181: jra a2@ ! 182: L68: ! 183: .align 2; .long L52 ! 184: .align 2; .long L52 ! 185: .align 2; .long L54 ! 186: .align 2; .long L54 ! 187: .align 2; .long L54 ! 188: .align 2; .long L56 ! 189: .align 2; .long L56 ! 190: .align 2; .long L56 ! 191: L67: ! 192: L63: ! 193: cmpl #3001,d7; jlt L50 ! 194: cmpl #3004,d7; jgt L50 ! 195: movl @(L71-12004:l,d7:l:4),a2 ! 196: jra a2@ ! 197: L71: ! 198: .align 2; .long L61 ! 199: .align 2; .long L61 ! 200: .align 2; .long L61 ! 201: .align 2; .long L61 ! 202: L52: ! 203: movl #L53,sp@ ! 204: movl d7,sp@(4) ! 205: jbsr _printf:l ! 206: jra L51 ! 207: L54: ! 208: movl #L55,sp@ ! 209: movl d7,sp@(4) ! 210: jbsr _printf:l ! 211: jra L51 ! 212: L56: ! 213: movl #L57,sp@ ! 214: movl d7,sp@(4) ! 215: jbsr _printf:l ! 216: L50: ! 217: movl #L58,sp@ ! 218: movl d7,sp@(4) ! 219: jbsr _printf:l ! 220: jra L51 ! 221: L59: ! 222: movl #L60,sp@ ! 223: movl d7,sp@(4) ! 224: jbsr _printf:l ! 225: jra L51 ! 226: L61: ! 227: movl #L62,sp@ ! 228: movl d7,sp@(4) ! 229: jbsr _printf:l ! 230: L51: ! 231: L47: ! 232: addql #1,d7 ! 233: cmpl #10,d7; jle L46 ! 234: L44: ! 235: moveml a6@(-8),#0x480 ! 236: unlk a6 ! 237: rts ! 238: .globl _h ! 239: .align 2 ! 240: _h:link a6,#-16 ! 241: moveml #0xc0,a6@(-8) ! 242: clrl d6 ! 243: movl #L74,sp@ ! 244: jbsr _printf:l ! 245: movl #1,d7 ! 246: L75: ! 247: cmpl #128,d7; jeq L81 ! 248: cmpl #128,d7; jgt L94 ! 249: cmpl #16,d7; jeq L83 ! 250: cmpl #16,d7; jgt L95 ! 251: cmpl #8,d7; jeq L84 ! 252: jra L79 ! 253: L95: ! 254: cmpl #120,d7; jeq L85 ! 255: jra L79 ! 256: L94: ! 257: cmpl #280,d7; jeq L86 ! 258: cmpl #280,d7; jgt L96 ! 259: cmpl #264,d7; jeq L87 ! 260: cmpl #264,d7; jgt L97 ! 261: cmpl #248,d7; jeq L88 ! 262: jra L79 ! 263: L97: ! 264: cmpl #272,d7; jeq L89 ! 265: jra L79 ! 266: L96: ! 267: cmpl #304,d7; jeq L90 ! 268: cmpl #304,d7; jgt L98 ! 269: cmpl #296,d7; jeq L91 ! 270: cmpl #296,d7; jgt L79 ! 271: cmpl #288,d7; jeq L92 ! 272: jra L79 ! 273: L98: ! 274: cmpl #312,d7; jeq L93 ! 275: jra L79 ! 276: L79: ! 277: addql #1,d6 ! 278: jra L76 ! 279: L81: ! 280: movl #L82,sp@ ! 281: movl d7,sp@(4) ! 282: jbsr _printf:l ! 283: jra L80 ! 284: L83: ! 285: movl #L82,sp@ ! 286: movl d7,sp@(4) ! 287: jbsr _printf:l ! 288: jra L80 ! 289: L84: ! 290: movl #L82,sp@ ! 291: movl d7,sp@(4) ! 292: jbsr _printf:l ! 293: jra L80 ! 294: L85: ! 295: movl #L82,sp@ ! 296: movl d7,sp@(4) ! 297: jbsr _printf:l ! 298: jra L80 ! 299: L86: ! 300: movl #L82,sp@ ! 301: movl d7,sp@(4) ! 302: jbsr _printf:l ! 303: jra L80 ! 304: L87: ! 305: movl #L82,sp@ ! 306: movl d7,sp@(4) ! 307: jbsr _printf:l ! 308: jra L80 ! 309: L88: ! 310: movl #L82,sp@ ! 311: movl d7,sp@(4) ! 312: jbsr _printf:l ! 313: jra L80 ! 314: L89: ! 315: movl #L82,sp@ ! 316: movl d7,sp@(4) ! 317: jbsr _printf:l ! 318: jra L80 ! 319: L90: ! 320: movl #L82,sp@ ! 321: movl d7,sp@(4) ! 322: jbsr _printf:l ! 323: jra L80 ! 324: L91: ! 325: movl #L82,sp@ ! 326: movl d7,sp@(4) ! 327: jbsr _printf:l ! 328: jra L80 ! 329: L92: ! 330: movl #L82,sp@ ! 331: movl d7,sp@(4) ! 332: jbsr _printf:l ! 333: jra L80 ! 334: L93: ! 335: movl #L82,sp@ ! 336: movl d7,sp@(4) ! 337: jbsr _printf:l ! 338: L80: ! 339: L76: ! 340: addql #1,d7 ! 341: cmpl #500,d7; jle L75 ! 342: movl #L99,sp@ ! 343: movl d6,sp@(4) ! 344: jbsr _printf:l ! 345: L73: ! 346: moveml a6@(-8),#0xc0 ! 347: unlk a6 ! 348: rts ! 349: .globl _big ! 350: .align 2 ! 351: _big:link a6,#-16 ! 352: moveml #0x90,a6@(-8) ! 353: movl a6@(8),d4 ! 354: andl #0x6000000,d4 ! 355: movl d4,d7 ! 356: cmpl #33554432,d7; jeq L106 ! 357: cmpl #33554432,d7; jgt L109 ! 358: cmpl #-2,d7; jeq L104 ! 359: cmpl #-1,d7; jeq L104 ! 360: tstl d7; jeq L104 ! 361: jra L101 ! 362: L109: ! 363: cmpl #67108864,d7; jeq L107 ! 364: jra L101 ! 365: L104: ! 366: movl #L105,sp@ ! 367: movl a6@(8),sp@(4) ! 368: jbsr _printf:l ! 369: jra L102 ! 370: L106: ! 371: movl #L105,sp@ ! 372: movl a6@(8),sp@(4) ! 373: jbsr _printf:l ! 374: jra L102 ! 375: L107: ! 376: movl #L105,sp@ ! 377: movl a6@(8),sp@(4) ! 378: jbsr _printf:l ! 379: jra L102 ! 380: L101: ! 381: movl #L108,sp@ ! 382: movl a6@(8),sp@(4) ! 383: jbsr _printf:l ! 384: L102: ! 385: L100: ! 386: moveml a6@(-8),#0x90 ! 387: unlk a6 ! 388: rts ! 389: .globl _limit ! 390: .align 2 ! 391: _limit:link a6,#-20 ! 392: moveml #0x498,a6@(-16) ! 393: movl #-2147483648,d7 ! 394: L111: ! 395: cmpl #-2147483648,d7; jlt L115 ! 396: cmpl #-2147483644,d7; jgt L115 ! 397: movl d7,d4; asll #2,d4 ! 398: movl #-2147483648,d3 ! 399: asll #2,d3 ! 400: subl d3,d4 ! 401: movl @(L129:l,d4:l:1),a2 ! 402: jra a2@ ! 403: L129: ! 404: .align 2; .long L117 ! 405: .align 2; .long L119 ! 406: .align 2; .long L121 ! 407: .align 2; .long L123 ! 408: .align 2; .long L125 ! 409: L117: ! 410: movl #L118,sp@ ! 411: jbsr _printf:l ! 412: jra L116 ! 413: L119: ! 414: movl #L120,sp@ ! 415: jbsr _printf:l ! 416: jra L116 ! 417: L121: ! 418: movl #L122,sp@ ! 419: jbsr _printf:l ! 420: jra L116 ! 421: L123: ! 422: movl #L124,sp@ ! 423: jbsr _printf:l ! 424: jra L116 ! 425: L125: ! 426: movl #L126,sp@ ! 427: jbsr _printf:l ! 428: jra L116 ! 429: L115: ! 430: movl #L127,sp@ ! 431: jbsr _printf:l ! 432: L116: ! 433: L112: ! 434: addql #1,d7 ! 435: cmpl #-2147483643,d7; jle L111 ! 436: movl #2147483647,d7 ! 437: L130: ! 438: cmpl #2147483643,d7; jlt L134 ! 439: cmpl #2147483647,d7; jgt L134 ! 440: movl d7,d4; asll #2,d4 ! 441: movl #2147483643,d3 ! 442: asll #2,d3 ! 443: subl d3,d4 ! 444: movl @(L142:l,d4:l:1),a2 ! 445: jra a2@ ! 446: L142: ! 447: .align 2; .long L140 ! 448: .align 2; .long L139 ! 449: .align 2; .long L138 ! 450: .align 2; .long L137 ! 451: .align 2; .long L136 ! 452: L136: ! 453: movl #L118,sp@ ! 454: jbsr _printf:l ! 455: jra L135 ! 456: L137: ! 457: movl #L120,sp@ ! 458: jbsr _printf:l ! 459: jra L135 ! 460: L138: ! 461: movl #L122,sp@ ! 462: jbsr _printf:l ! 463: jra L135 ! 464: L139: ! 465: movl #L124,sp@ ! 466: jbsr _printf:l ! 467: jra L135 ! 468: L140: ! 469: movl #L126,sp@ ! 470: jbsr _printf:l ! 471: jra L135 ! 472: L134: ! 473: movl #L127,sp@ ! 474: jbsr _printf:l ! 475: L135: ! 476: L131: ! 477: subql #1,d7 ! 478: cmpl #2147483642,d7; jge L130 ! 479: L110: ! 480: moveml a6@(-16),#0x498 ! 481: unlk a6 ! 482: rts ! 483: .text ! 484: .align 2; L127:.byte 53,10,0 ! 485: .align 2; L126:.byte 52,10,0 ! 486: .align 2; L124:.byte 51,10,0 ! 487: .align 2; L122:.byte 50,10,0 ! 488: .align 2; L120:.byte 49,10,0 ! 489: .align 2; L118:.byte 48,10,0 ! 490: .align 2; L108:.ascii "x = 0x%x (default)\012\000" ! 491: .align 2; L105:.ascii "x = 0x%x\012\000" ! 492: .align 2; L99:.ascii "%d defaults\012\000" ! 493: .align 2; L82:.ascii "i = %d\012\000" ! 494: .align 2; L74:.byte 104,58,10,0 ! 495: .align 2; L62:.ascii "6 %d\012\000" ! 496: .align 2; L60:.ascii "5 %d\012\000" ! 497: .align 2; L58:.ascii "d %d\012\000" ! 498: .align 2; L57:.ascii "3 %d\012\000" ! 499: .align 2; L55:.ascii "2 %d\012\000" ! 500: .align 2; L53:.ascii "1 %d\012\000" ! 501: .align 2; L45:.byte 103,58,10,0 ! 502: .align 2; L43:.ascii "x = %d\012\000" ! 503: .align 2; L23:.byte 102,58,10,0 ! 504: .align 2; L7:.ascii "%c = 0x%x\012\000" ! 505: .align 2; L6:.ascii "bfnrtvx\000"
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.