|
|
1.1 ! root 1: .data 0 ! 2: .align 2 ! 3: L15: ! 4: .byte 0101,00 ! 5: .align 2 ! 6: L21: ! 7: .byte 050,02 ! 8: .byte 0105,0162 ! 9: .byte 0162,0157 ! 10: .byte 0162,040 ! 11: .byte 0151,0156 ! 12: .byte 040,0143 ! 13: .byte 0150,0141 ! 14: .byte 0162,0141 ! 15: .byte 0143,0164 ! 16: .byte 0145,0162 ! 17: .byte 040,0146 ! 18: .byte 0165,0156 ! 19: .byte 0143,0164 ! 20: .byte 0151,0157 ! 21: .byte 0156,0163 ! 22: .byte 02,051 ! 23: .byte 00,00 ! 24: .align 2 ! 25: L22: ! 26: .byte 00,00 ! 27: .data 2 ! 28: .data 1 ! 29: .data 0 ! 30: .align 2 ! 31: L30: ! 32: .long 1 ! 33: .align 2 ! 34: L29: ! 35: .byte 050,02 ! 36: .byte 0151,0156 ! 37: .byte 040,0147 ! 38: .byte 0145,0164 ! 39: .byte 0143,0150 ! 40: .byte 0162,040 ! 41: .byte 0167,0151 ! 42: .byte 0164,0150 ! 43: .byte 040,0151 ! 44: .byte 0143,0150 ! 45: .byte 040,075 ! 46: .byte 040,02 ! 47: .byte 054,0141 ! 48: .byte 061,054 ! 49: .byte 02,040 ! 50: .byte 050,02 ! 51: .byte 054,061 ! 52: .byte 066,0162 ! 53: .byte 054,0151 ! 54: .byte 066,056 ! 55: .byte 062,054 ! 56: .byte 02,051 ! 57: .byte 02,051 ! 58: .byte 00,00 ! 59: .data 2 ! 60: .data 1 ! 61: .data 0 ! 62: .globl _MAIN_ ! 63: .globl _getchr_ ! 64: .globl _s_wsfe ! 65: .globl _e_wsfe ! 66: .globl _s_stop ! 67: .globl _do_fio ! 68: .align 2 ! 69: .stabs "chf.f",0x64,0,0,0 ! 70: ! 71: .text ! 72: .globl _MAIN_ ! 73: .align 1 ! 74: _MAIN_: ! 75: .word LWM1 ! 76: subl3 $LF1,fp,sp ! 77: jbr L12 ! 78: L13: ! 79: pushl $1 ! 80: pushl $L15 ! 81: pushl $1 ! 82: addl3 $-53,fp,r0 ! 83: pushl r0 ! 84: callf $20,_getchr_ ! 85: movb -53(fp),v.2-v.1(r11) ! 86: pushl $1 ! 87: pushl $L15 ! 88: pushl $1 ! 89: addl3 $-54,fp,r0 ! 90: pushl r0 ! 91: callf $20,_getchr_ ! 92: cmpb v.2-v.1(r11),-54(fp) ! 93: jeql L17 ! 94: pushl $v.3 ! 95: callf $8,_s_wsfe ! 96: callf $4,_e_wsfe ! 97: L17: ! 98: pushl $0 ! 99: pushl $L22 ! 100: callf $12,_s_stop ! 101: L14: ! 102: ret#0 ! 103: L12: ! 104: movl $v.1,r11 ! 105: jbr L13 ! 106: .set LF1,56 ! 107: .set LWM1,0x1800 ! 108: .text ! 109: .globl _getchr_ ! 110: .align 1 ! 111: _getchr_: ! 112: .word LWM2 ! 113: subl3 $LF2,fp,sp ! 114: jbr L24 ! 115: L26: ! 116: pushl $v.5 ! 117: callf $8,_s_wsfe ! 118: pushl $1 ! 119: pushl 12(r12) ! 120: pushl $L30 ! 121: callf $16,_do_fio ! 122: cvtbl *12(r12),r0 ! 123: cvtbl r0,r0 ! 124: movl r0,-56(fp) ! 125: pushl $4 ! 126: addl3 $-56,fp,r0 ! 127: pushl r0 ! 128: pushl $L30 ! 129: callf $16,_do_fio ! 130: callf $4,_e_wsfe ! 131: movb *12(r12),*4(r12) ! 132: jbr L25 ! 133: L25: ! 134: ret#0 ! 135: L24: ! 136: movl fp,r12 ! 137: jbr L26 ! 138: .set LF2,56 ! 139: .set LWM2,0x1000 ! 140: .text ! 141: .data 2 ! 142: .align 2 ! 143: v.3: ! 144: .long 0 ! 145: .long 6 ! 146: .space 4 ! 147: .long L21 ! 148: v.2: ! 149: .space 1 ! 150: .set v.1,v.2 ! 151: ! 152: .align 2 ! 153: v.5: ! 154: .long 0 ! 155: .long 6 ! 156: .space 4 ! 157: .long L29
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.