File:  [Research Unix] / researchv10no / cmd / lcc / gen3 / tst / switch.s
Revision 1.1.1.1 (vendor branch): download - view: text, annotated - select for diffs
Tue Apr 24 17:21:35 2018 UTC (8 years, 1 month ago) by root
Branches: belllabs, MAIN
CVS tags: researchv10, HEAD
researchv10 Norman

.text
.globl _main
_main:.word 0x0
subl2 $68,sp
moval -4(fp),r1
moval _5,r2
movl r2,(r1)
moval L4,r1
jmp (r1)
L1:moval -4(fp),r1
movl (r1),r1
movb (r1),r1
cvtbl r1,r1
movl r1,0(sp)
moval _backslash,r1
calls $0,(r1)
movl r0,r1
moval _6,r2
movl r2,0(sp)
moval -4(fp),r2
movl (r2),r2
movb (r2),r2
cvtbl r2,r2
movl r2,4(sp)
movl r1,8(sp)
moval _printf,r1
calls $0,(r1)
movl r0,r1
L2:moval -4(fp),r1
movl (r1),r2
movl $1,r3
addl3 r3,r2,r2
movl r2,(r1)
L4:moval -4(fp),r1
movl (r1),r1
movb (r1),r1
cvtbl r1,r1
movl $0,r2
cmpl r1,r2; jneq L1
moval _f,r1
calls $0,(r1)
movl r0,r1
moval _g,r1
calls $0,(r1)
movl r0,r1
moval _h,r1
calls $0,(r1)
movl r0,r1
moval -8(fp),r1
movl $16777216,r2
movl r2,(r1)
moval L10,r1
jmp (r1)
L7:moval -8(fp),r1
movl (r1),r1
movl r1,0(sp)
moval _big,r1
calls $0,(r1)
movl r0,r1
L8:moval -8(fp),r1
movl (r1),r2
movl $16777216,r3
addl3 r3,r2,r2
movl r2,(r1)
L10:moval -8(fp),r1
movl (r1),r1
movl r1,r1
movl $0xf8ffffff,r2
bicl3 r2,r1,r1
movl r1,r1
movl $0,r2
cmpl r1,r2; jneq L7
moval _limit,r1
calls $0,(r1)
movl r0,r1
movl $0,r1
movl r1,r0; ret
.globl _backslash
_backslash:.word 0x0
subl2 $48,sp
moval 4(ap),r1
movl (r1),r1
movl $110,r2
cmpl r1,r2; jeql L15
cmpl r1,r2; jgtr L19
moval 4(ap),r1
movl (r1),r1
movl $102,r2
cmpl r1,r2; jeql L14
cmpl r1,r2; jgtr L11
moval 4(ap),r1
movl (r1),r1
movl $98,r2
cmpl r1,r2; jeql L13
moval L11,r1
jmp (r1)
L19:moval 4(ap),r1
movl (r1),r1
movl $114,r2
cmpl r1,r2; jeql L16
movl $116,r2
cmpl r1,r2; jeql L17
movl $118,r2
cmpl r1,r2; jeql L18
moval L11,r1
jmp (r1)
L13:movl $8,r1
movl r1,r0; ret
L14:movl $12,r1
movl r1,r0; ret
L15:movl $10,r1
movl r1,r0; ret
L16:movl $13,r1
movl r1,r0; ret
L17:movl $9,r1
movl r1,r0; ret
L18:movl $11,r1
movl r1,r0; ret
L11:moval 4(ap),r1
movl (r1),r1
movl r1,r0; ret
.globl _f
_f:.word 0x0
subl2 $68,sp
moval -8(fp),r1
movl $0,r2
movl r2,(r1)
moval _20,r1
movl r1,0(sp)
moval _printf,r1
calls $0,(r1)
movl r0,r1
moval -4(fp),r1
movl $0,r2
movl r2,(r1)
L21:moval -12(fp),r1
moval -4(fp),r2
movl (r2),r2
movl r2,(r1)
moval -4(fp),r1
movl (r1),r1
movl $1,r2
cmpl r1,r2; jlss L25
movl $20,r2
cmpl r1,r2; jgtr L25
movl $2,r2
ashl r2,r1,r1
moval _38-4,r2
addl3 r2,r1,r1
movl (r1),r1
jmp (r1)
.align 2; _38:.long L27
.long L28
.long L25
.long L25
.long L25
.long L25
.long L29
.long L30
.long L31
.long L25
.long L25
.long L25
.long L25
.long L25
.long L25
.long L32
.long L33
.long L34
.long L35
.long L36
L27:moval -8(fp),r1
moval -4(fp),r2
movl (r2),r2
movl r2,(r1)
moval L26,r1
jmp (r1)
L28:moval -8(fp),r1
moval -4(fp),r2
movl (r2),r2
movl r2,(r1)
moval L26,r1
jmp (r1)
L29:moval -8(fp),r1
moval -4(fp),r2
movl (r2),r2
movl r2,(r1)
moval L26,r1
jmp (r1)
L30:moval -8(fp),r1
moval -4(fp),r2
movl (r2),r2
movl r2,(r1)
moval L26,r1
jmp (r1)
L31:moval -8(fp),r1
moval -4(fp),r2
movl (r2),r2
movl r2,(r1)
moval L26,r1
jmp (r1)
L32:moval -8(fp),r1
moval -4(fp),r2
movl (r2),r2
movl r2,(r1)
moval L26,r1
jmp (r1)
L33:moval -8(fp),r1
moval -4(fp),r2
movl (r2),r2
movl r2,(r1)
moval L26,r1
jmp (r1)
L34:moval -8(fp),r1
moval -4(fp),r2
movl (r2),r2
movl r2,(r1)
moval L26,r1
jmp (r1)
L35:moval -8(fp),r1
moval -4(fp),r2
movl (r2),r2
movl r2,(r1)
moval L26,r1
jmp (r1)
L36:moval -8(fp),r1
moval -4(fp),r2
movl (r2),r2
movl r2,(r1)
L25:L26:moval _40,r1
movl r1,0(sp)
moval -8(fp),r1
movl (r1),r1
movl r1,4(sp)
moval _printf,r1
calls $0,(r1)
movl r0,r1
L22:moval -4(fp),r1
movl (r1),r2
movl $1,r3
addl3 r3,r2,r2
movl r2,(r1)
moval -4(fp),r1
movl (r1),r1
movl $20,r2
cmpl r1,r2; jleq L21
ret
.globl _g
_g:.word 0x0
subl2 $60,sp
moval _41,r1
movl r1,0(sp)
moval _printf,r1
calls $0,(r1)
movl r0,r1
moval -4(fp),r1
movl $1,r2
movl r2,(r1)
L42:moval -4(fp),r1
movl (r1),r1
movl $1001,r2
cmpl r1,r2; jlss L60
movl $1004,r2
cmpl r1,r2; jgtr L59
movl $2,r2
ashl r2,r1,r1
moval _61-4004,r2
addl3 r2,r1,r1
movl (r1),r1
jmp (r1)
.align 2; _61:.long L55
.long L55
.long L55
.long L55
L60:moval -4(fp),r1
movl (r1),r1
movl $1,r2
cmpl r1,r2; jlss L46
movl $8,r2
cmpl r1,r2; jgtr L46
movl $2,r2
ashl r2,r1,r1
moval _64-4,r2
addl3 r2,r1,r1
movl (r1),r1
jmp (r1)
.align 2; _64:.long L48
.long L48
.long L50
.long L50
.long L50
.long L52
.long L52
.long L52
L63:L59:moval -4(fp),r1
movl (r1),r1
movl $3001,r2
cmpl r1,r2; jlss L46
movl $3004,r2
cmpl r1,r2; jgtr L46
movl $2,r2
ashl r2,r1,r1
moval _67-12004,r2
addl3 r2,r1,r1
movl (r1),r1
jmp (r1)
.align 2; _67:.long L57
.long L57
.long L57
.long L57
L48:moval _49,r1
movl r1,0(sp)
moval -4(fp),r1
movl (r1),r1
movl r1,4(sp)
moval _printf,r1
calls $0,(r1)
movl r0,r1
moval L47,r1
jmp (r1)
L50:moval _51,r1
movl r1,0(sp)
moval -4(fp),r1
movl (r1),r1
movl r1,4(sp)
moval _printf,r1
calls $0,(r1)
movl r0,r1
moval L47,r1
jmp (r1)
L52:moval _53,r1
movl r1,0(sp)
moval -4(fp),r1
movl (r1),r1
movl r1,4(sp)
moval _printf,r1
calls $0,(r1)
movl r0,r1
L46:moval _54,r1
movl r1,0(sp)
moval -4(fp),r1
movl (r1),r1
movl r1,4(sp)
moval _printf,r1
calls $0,(r1)
movl r0,r1
moval L47,r1
jmp (r1)
L55:moval _56,r1
movl r1,0(sp)
moval -4(fp),r1
movl (r1),r1
movl r1,4(sp)
moval _printf,r1
calls $0,(r1)
movl r0,r1
moval L47,r1
jmp (r1)
L57:moval _58,r1
movl r1,0(sp)
moval -4(fp),r1
movl (r1),r1
movl r1,4(sp)
moval _printf,r1
calls $0,(r1)
movl r0,r1
L47:L43:moval -4(fp),r1
movl (r1),r2
movl $1,r3
addl3 r3,r2,r2
movl r2,(r1)
moval -4(fp),r1
movl (r1),r1
movl $10,r2
cmpl r1,r2; jleq L42
ret
.globl _h
_h:.word 0x0
subl2 $64,sp
moval -8(fp),r1
movl $0,r2
movl r2,(r1)
moval _69,r1
movl r1,0(sp)
moval _printf,r1
calls $0,(r1)
movl r0,r1
moval -4(fp),r1
movl $1,r2
movl r2,(r1)
L70:moval -4(fp),r1
movl (r1),r1
movl $128,r2
cmpl r1,r2; jeql L76
cmpl r1,r2; jgtr L89
moval -4(fp),r1
movl (r1),r1
movl $16,r2
cmpl r1,r2; jeql L78
cmpl r1,r2; jgtr L90
moval -4(fp),r1
movl (r1),r1
movl $8,r2
cmpl r1,r2; jeql L79
moval L74,r1
jmp (r1)
L90:moval -4(fp),r1
movl (r1),r1
movl $120,r2
cmpl r1,r2; jeql L80
moval L74,r1
jmp (r1)
L89:moval -4(fp),r1
movl (r1),r1
movl $280,r2
cmpl r1,r2; jeql L81
cmpl r1,r2; jgtr L91
moval -4(fp),r1
movl (r1),r1
movl $264,r2
cmpl r1,r2; jeql L82
cmpl r1,r2; jgtr L92
moval -4(fp),r1
movl (r1),r1
movl $248,r2
cmpl r1,r2; jeql L83
moval L74,r1
jmp (r1)
L92:moval -4(fp),r1
movl (r1),r1
movl $272,r2
cmpl r1,r2; jeql L84
moval L74,r1
jmp (r1)
L91:moval -4(fp),r1
movl (r1),r1
movl $304,r2
cmpl r1,r2; jeql L85
cmpl r1,r2; jgtr L93
moval -4(fp),r1
movl (r1),r1
movl $296,r2
cmpl r1,r2; jeql L86
cmpl r1,r2; jgtr L74
moval -4(fp),r1
movl (r1),r1
movl $288,r2
cmpl r1,r2; jeql L87
moval L74,r1
jmp (r1)
L93:moval -4(fp),r1
movl (r1),r1
movl $312,r2
cmpl r1,r2; jeql L88
moval L74,r1
jmp (r1)
L74:moval -8(fp),r1
movl (r1),r2
movl $1,r3
addl3 r3,r2,r2
movl r2,(r1)
moval L71,r1
jmp (r1)
L76:moval _77,r1
movl r1,0(sp)
moval -4(fp),r1
movl (r1),r1
movl r1,4(sp)
moval _printf,r1
calls $0,(r1)
movl r0,r1
moval L75,r1
jmp (r1)
L78:moval _77,r1
movl r1,0(sp)
moval -4(fp),r1
movl (r1),r1
movl r1,4(sp)
moval _printf,r1
calls $0,(r1)
movl r0,r1
moval L75,r1
jmp (r1)
L79:moval _77,r1
movl r1,0(sp)
moval -4(fp),r1
movl (r1),r1
movl r1,4(sp)
moval _printf,r1
calls $0,(r1)
movl r0,r1
moval L75,r1
jmp (r1)
L80:moval _77,r1
movl r1,0(sp)
moval -4(fp),r1
movl (r1),r1
movl r1,4(sp)
moval _printf,r1
calls $0,(r1)
movl r0,r1
moval L75,r1
jmp (r1)
L81:moval _77,r1
movl r1,0(sp)
moval -4(fp),r1
movl (r1),r1
movl r1,4(sp)
moval _printf,r1
calls $0,(r1)
movl r0,r1
moval L75,r1
jmp (r1)
L82:moval _77,r1
movl r1,0(sp)
moval -4(fp),r1
movl (r1),r1
movl r1,4(sp)
moval _printf,r1
calls $0,(r1)
movl r0,r1
moval L75,r1
jmp (r1)
L83:moval _77,r1
movl r1,0(sp)
moval -4(fp),r1
movl (r1),r1
movl r1,4(sp)
moval _printf,r1
calls $0,(r1)
movl r0,r1
moval L75,r1
jmp (r1)
L84:moval _77,r1
movl r1,0(sp)
moval -4(fp),r1
movl (r1),r1
movl r1,4(sp)
moval _printf,r1
calls $0,(r1)
movl r0,r1
moval L75,r1
jmp (r1)
L85:moval _77,r1
movl r1,0(sp)
moval -4(fp),r1
movl (r1),r1
movl r1,4(sp)
moval _printf,r1
calls $0,(r1)
movl r0,r1
moval L75,r1
jmp (r1)
L86:moval _77,r1
movl r1,0(sp)
moval -4(fp),r1
movl (r1),r1
movl r1,4(sp)
moval _printf,r1
calls $0,(r1)
movl r0,r1
moval L75,r1
jmp (r1)
L87:moval _77,r1
movl r1,0(sp)
moval -4(fp),r1
movl (r1),r1
movl r1,4(sp)
moval _printf,r1
calls $0,(r1)
movl r0,r1
moval L75,r1
jmp (r1)
L88:moval _77,r1
movl r1,0(sp)
moval -4(fp),r1
movl (r1),r1
movl r1,4(sp)
moval _printf,r1
calls $0,(r1)
movl r0,r1
L75:L71:moval -4(fp),r1
movl (r1),r2
movl $1,r3
addl3 r3,r2,r2
movl r2,(r1)
moval -4(fp),r1
movl (r1),r1
movl $500,r2
cmpl r1,r2; jleq L70
moval _94,r1
movl r1,0(sp)
moval -8(fp),r1
movl (r1),r1
movl r1,4(sp)
moval _printf,r1
calls $0,(r1)
movl r0,r1
ret
.globl _big
_big:.word 0x0
subl2 $60,sp
moval -4(fp),r1
moval 4(ap),r2
movl (r2),r2
movl $0xf9ffffff,r3
bicl3 r3,r2,r2
movl r2,(r1)
moval -4(fp),r1
movl (r1),r1
movl r1,r1
movl $33554432,r2
cmpl r1,r2; jeql L100
cmpl r1,r2; jgtr L103
moval -4(fp),r1
movl (r1),r1
movl r1,r1
movl $-2,r2
cmpl r1,r2; jeql L98
movl $-1,r2
cmpl r1,r2; jeql L98
movl $0,r2
cmpl r1,r2; jeql L98
moval L95,r1
jmp (r1)
L103:moval -4(fp),r1
movl (r1),r1
movl r1,r1
movl $67108864,r2
cmpl r1,r2; jeql L101
moval L95,r1
jmp (r1)
L98:moval _99,r1
movl r1,0(sp)
moval 4(ap),r1
movl (r1),r1
movl r1,4(sp)
moval _printf,r1
calls $0,(r1)
movl r0,r1
moval L96,r1
jmp (r1)
L100:moval _99,r1
movl r1,0(sp)
moval 4(ap),r1
movl (r1),r1
movl r1,4(sp)
moval _printf,r1
calls $0,(r1)
movl r0,r1
moval L96,r1
jmp (r1)
L101:moval _99,r1
movl r1,0(sp)
moval 4(ap),r1
movl (r1),r1
movl r1,4(sp)
moval _printf,r1
calls $0,(r1)
movl r0,r1
moval L96,r1
jmp (r1)
L95:moval _102,r1
movl r1,0(sp)
moval 4(ap),r1
movl (r1),r1
movl r1,4(sp)
moval _printf,r1
calls $0,(r1)
movl r0,r1
L96:ret
.globl _limit
_limit:.word 0x0
subl2 $56,sp
moval -4(fp),r1
movl $-2147483648,r2
movl r2,(r1)
L104:moval -4(fp),r1
movl (r1),r1
movl $-2147483648,r2
cmpl r1,r2; jlss L108
movl $-2147483644,r3
cmpl r1,r3; jgtr L108
movl $2,r3
ashl r3,r1,r1
ashl r3,r2,r2
subl3 r2,r1,r1
moval _122,r2
addl3 r2,r1,r1
movl (r1),r1
jmp (r1)
.align 2; _122:.long L110
.long L112
.long L114
.long L116
.long L118
L110:moval _111,r1
movl r1,0(sp)
moval _printf,r1
calls $0,(r1)
movl r0,r1
moval L109,r1
jmp (r1)
L112:moval _113,r1
movl r1,0(sp)
moval _printf,r1
calls $0,(r1)
movl r0,r1
moval L109,r1
jmp (r1)
L114:moval _115,r1
movl r1,0(sp)
moval _printf,r1
calls $0,(r1)
movl r0,r1
moval L109,r1
jmp (r1)
L116:moval _117,r1
movl r1,0(sp)
moval _printf,r1
calls $0,(r1)
movl r0,r1
moval L109,r1
jmp (r1)
L118:moval _119,r1
movl r1,0(sp)
moval _printf,r1
calls $0,(r1)
movl r0,r1
moval L109,r1
jmp (r1)
L108:moval _120,r1
movl r1,0(sp)
moval _printf,r1
calls $0,(r1)
movl r0,r1
L109:L105:moval -4(fp),r1
movl (r1),r2
movl $1,r3
addl3 r3,r2,r2
movl r2,(r1)
moval -4(fp),r1
movl (r1),r1
movl $-2147483643,r2
cmpl r1,r2; jleq L104
moval -4(fp),r1
movl $2147483647,r2
movl r2,(r1)
L123:moval -4(fp),r1
movl (r1),r1
movl $2147483643,r2
cmpl r1,r2; jlss L127
movl $2147483647,r3
cmpl r1,r3; jgtr L127
movl $2,r3
ashl r3,r1,r1
ashl r3,r2,r2
subl3 r2,r1,r1
moval _135,r2
addl3 r2,r1,r1
movl (r1),r1
jmp (r1)
.align 2; _135:.long L133
.long L132
.long L131
.long L130
.long L129
L129:moval _111,r1
movl r1,0(sp)
moval _printf,r1
calls $0,(r1)
movl r0,r1
moval L128,r1
jmp (r1)
L130:moval _113,r1
movl r1,0(sp)
moval _printf,r1
calls $0,(r1)
movl r0,r1
moval L128,r1
jmp (r1)
L131:moval _115,r1
movl r1,0(sp)
moval _printf,r1
calls $0,(r1)
movl r0,r1
moval L128,r1
jmp (r1)
L132:moval _117,r1
movl r1,0(sp)
moval _printf,r1
calls $0,(r1)
movl r0,r1
moval L128,r1
jmp (r1)
L133:moval _119,r1
movl r1,0(sp)
moval _printf,r1
calls $0,(r1)
movl r0,r1
moval L128,r1
jmp (r1)
L127:moval _120,r1
movl r1,0(sp)
moval _printf,r1
calls $0,(r1)
movl r0,r1
L128:L124:moval -4(fp),r1
movl (r1),r2
movl $1,r3
subl3 r3,r2,r2
movl r2,(r1)
moval -4(fp),r1
movl (r1),r1
movl $2147483642,r2
cmpl r1,r2; jgeq L123
ret
.text 1
_120:.byte 53
.byte 10
.byte 0
_119:.byte 52
.byte 10
.byte 0
_117:.byte 51
.byte 10
.byte 0
_115:.byte 50
.byte 10
.byte 0
_113:.byte 49
.byte 10
.byte 0
_111:.byte 48
.byte 10
.byte 0
_102:.byte 120
.byte 32
.byte 61
.byte 32
.byte 48
.byte 120
.byte 37
.byte 120
.byte 32
.byte 40
.byte 100
.byte 101
.byte 102
.byte 97
.byte 117
.byte 108
.byte 116
.byte 41
.byte 10
.byte 0
_99:.byte 120
.byte 32
.byte 61
.byte 32
.byte 48
.byte 120
.byte 37
.byte 120
.byte 10
.byte 0
_94:.byte 37
.byte 100
.byte 32
.byte 100
.byte 101
.byte 102
.byte 97
.byte 117
.byte 108
.byte 116
.byte 115
.byte 10
.byte 0
_77:.byte 105
.byte 32
.byte 61
.byte 32
.byte 37
.byte 100
.byte 10
.byte 0
_69:.byte 104
.byte 58
.byte 10
.byte 0
_58:.byte 54
.byte 32
.byte 37
.byte 100
.byte 10
.byte 0
_56:.byte 53
.byte 32
.byte 37
.byte 100
.byte 10
.byte 0
_54:.byte 100
.byte 32
.byte 37
.byte 100
.byte 10
.byte 0
_53:.byte 51
.byte 32
.byte 37
.byte 100
.byte 10
.byte 0
_51:.byte 50
.byte 32
.byte 37
.byte 100
.byte 10
.byte 0
_49:.byte 49
.byte 32
.byte 37
.byte 100
.byte 10
.byte 0
_41:.byte 103
.byte 58
.byte 10
.byte 0
_40:.byte 120
.byte 32
.byte 61
.byte 32
.byte 37
.byte 100
.byte 10
.byte 0
_20:.byte 102
.byte 58
.byte 10
.byte 0
_6:.byte 37
.byte 99
.byte 32
.byte 61
.byte 32
.byte 48
.byte 120
.byte 37
.byte 120
.byte 10
.byte 0
_5:.byte 98
.byte 102
.byte 110
.byte 114
.byte 116
.byte 118
.byte 120
.byte 0


unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.