// File: /workspace/github_cpp_makefile_star2_O2/besm6[P]pascal-re/pascompl.cc
// Function: setAddrTo::setAddrTo(long)
setAddrTo(int64_t reg) {
        l4int2z = insnList->ilf7;
        opCode = InsnTemp[VTM];
        regField = indexreg[reg];
        l4var4z = insnList->ilf5.i;
        insnList->regsused = insnList->regsused + Bits(reg);
        if (insnList->ilm == ilCONST) {
            curVal = insnList->ilf5;
            if (insnList->typ->size == 1)
                curVal.i = addCurValToFCST();
            l4var6z = curVal.i;
            l4var5z = 074001;
            goto L4654;
        } else if (l4int2z == 18) {
L4650:      P4613();
            if (l4var4z == indexreg[1]) {
                l4var5z = 074003;
L4654:
                l4var1z.i = macro * l4var5z + l4var6z;
                l4var6z = allocSymtab(l4var1z.ii & 0777777777777L);
                addToInsnList(regField + opCode + l4var6z);
            } else if (l4var4z != 0) {
                addInsnAndOffset(l4var4z + InsnTemp[UTC], l4var6z);
                addToInsnList(regField + opCode);
            } else {
                addInsnAndOffset(regField + opCode, l4var6z);
            }
        } else if (l4int2z == 17) {
            P4613();
            l4var4z = insnList->ilf6;
            l4var5z = insnList->next->code - InsnTemp[UTC];
            if (l4var4z != 0) {
                l4var1z.i = macro * l4var5z + l4var4z;
                l4var5z = allocSymtab(l4var1z.ii & 0777777777777L);
            }
            insnList->next->code = regField + l4var5z + opCode;
        } else if (l4int2z == 16) {
            P4613();
            if (l4var4z != 0)
                addToInsnList(l4var4z + InsnTemp[UTC]);
            addInsnAndOffset(regField + opCode, l4var6z);
        } else if (l4int2z == 15) {
            addToInsnList(InsnTemp[ATI] + reg);
            opCode = InsnTemp[UTM];
            goto L4650;
        } else {
            addToInsnList(indexreg[l4int2z] + InsnTemp[UTC]);
            goto L4650;
        }
        insnList->ilm = il1;
        insnList->ilf7 = reg;
        insnList->ilf6 = 0;
        insnList->ilf5.i = 0;
    }

// Assembly:
pushq %r14
pushq %rbx
pushq %rax
movq %rsi, %rbx
movq %rdi, %r14
movq 0x4fe4f(%rip), %rax     # 0x63aa8
movq 0x38(%rax), %rcx
movq %rcx, 0x8(%rdi)
movq 0x54850(%rip), %rcx     # 0x684b8
movq %rcx, 0x10(%rdi)
leaq 0x541fd(%rip), %rcx     # 0x67e70
movq (%rcx,%rsi,8), %rdx
movq %rdx, 0x30(%rdi)
movq 0x28(%rax), %rdx
shlq $0x17, %rdx
sarq $0x17, %rdx
movq %rdx, 0x18(%rdi)
movb $0x2f, %dl
subb %bl, %dl
movq 0x18(%rax), %rsi
btsq %rdx, %rsi
movabsq $0xffffffffffff, %rdx   # imm = 0xFFFFFFFFFFFF
andq %rsi, %rdx
movq %rdx, 0x18(%rax)
cmpl $0x0, 0x20(%rax)
je 0x13cef
movq 0x8(%r14), %rax
leaq -0xf(%rax), %rdx
cmpq $0x3, %rdx
ja 0x13dd9
leaq 0x5cd9(%rip), %rax      # 0x199a0
movslq (%rax,%rdx,4), %rcx
addq %rax, %rcx
jmpq *%rcx
movq 0x54799(%rip), %rdi     # 0x68470
addq %rbx, %rdi
callq 0x794e
movq 0x547da(%rip), %rax     # 0x684c0
movq %rax, 0x10(%r14)
jmp 0x13de9
movq 0x28(%rax), %rsi
movq %rsi, 0x4fd36(%rip)     # 0x63a30
movq 0x10(%rax), %rax
cmpq $0x1, (%rax)
jne 0x13d1f
callq 0x5333
leaq 0x4fd20(%rip), %rdi     # 0x63a30
movq %rax, %rsi
callq 0x381c
movq 0x4fd11(%rip), %rsi     # 0x63a30
movabsq $0x7801000000, %rax     # imm = 0x7801000000
shlq $0x17, %rsi
sarq $0x17, %rsi
movq %rsi, 0x28(%r14)
movq $0x7801, 0x20(%r14)     # imm = 0x7801
jmp 0x13e1a
movq %r14, %rdi
callq 0x1642a
movq 0x18(%r14), %rdi
testq %rdi, %rdi
je 0x13e6c
addq 0x5474a(%rip), %rdi     # 0x684a8
callq 0x794e
jmp 0x13e6c
movq %r14, %rdi
callq 0x1642a
movq 0x4fd31(%rip), %rax     # 0x63aa8
movq 0x30(%rax), %rdx
movq %rdx, 0x18(%r14)
movq (%rax), %rcx
movq 0x10(%rcx), %rax
subq 0x5471b(%rip), %rax     # 0x684a8
movq %rax, 0x20(%r14)
testq %rdx, %rdx
je 0x13dc8
shlq $0x18, %rax
addq %rdx, %rax
movq %r14, %rdi
movq %rax, %rsi
callq 0x381c
movabsq $0xfffffffff, %rdi      # imm = 0xFFFFFFFFF
andq (%r14), %rdi
callq 0x546d
movq %rax, 0x20(%r14)
movq 0x4fce3(%rip), %rcx     # 0x63aa8
movq (%rcx), %rcx
addq 0x30(%r14), %rax
addq 0x10(%r14), %rax
movq %rax, 0x10(%rcx)
jmp 0x13e7d
movq 0x546c8(%rip), %rdi     # 0x684a8
addq (%rcx,%rax,8), %rdi
callq 0x794e
movq %r14, %rdi
callq 0x1642a
movq 0x18(%r14), %rdi
cmpq 0x5407c(%rip), %rdi     # 0x67e78
jne 0x13e4d
movq $0x7803, 0x20(%r14)     # imm = 0x7803
movq 0x28(%r14), %rsi
movabsq $0x7801000000, %rax     # imm = 0x7801000000
orq $0x2000000, %rax        # imm = 0x2000000
addq %rax, %rsi
movq %r14, %rdi
callq 0x381c
movabsq $0xfffffffff, %rdi      # imm = 0xFFFFFFFFF
andq (%r14), %rdi
callq 0x546d
movq %rax, 0x28(%r14)
addq 0x30(%r14), %rax
addq 0x10(%r14), %rax
movq %rax, %rdi
callq 0x794e
jmp 0x13e7d
testq %rdi, %rdi
je 0x13e6c
addq 0x5464f(%rip), %rdi     # 0x684a8
movq 0x28(%r14), %rsi
callq 0x798d
movq 0x10(%r14), %rdi
addq 0x30(%r14), %rdi
jmp 0x13e46
movq 0x10(%r14), %rdi
movq 0x28(%r14), %rsi
addq 0x30(%r14), %rdi
callq 0x798d
movq 0x4fc24(%rip), %rax     # 0x63aa8
movl $0x1, 0x20(%rax)
movq %rbx, 0x38(%rax)
andq $0x0, 0x30(%rax)
movzwl 0x2e(%rax), %ecx
shlq $0x30, %rcx
movabsq $0xd00000000000, %rdx   # imm = 0xD00000000000
orq %rcx, %rdx
movq %rdx, 0x28(%rax)
addq $0x8, %rsp
popq %rbx
popq %r14
retq
nop