// File: /workspace/github_cpp_makefile_star2_O1/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 %r15
pushq %r14
pushq %rbx
movq %rsi, %rbx
movq %rdi, %r14
movq 0x4e012(%rip), %rax     # 0x64ab8
movq 0x38(%rax), %rcx
movq %rcx, 0x8(%rdi)
movq 0x52a13(%rip), %rcx     # 0x694c8
movq %rcx, 0x10(%rdi)
leaq 0x523c0(%rip), %rcx     # 0x68e80
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 0x16b3c
movq 0x8(%r14), %rax
leaq -0xf(%rax), %rdx
cmpq $0x3, %rdx
ja 0x16c1a
leaq 0x5e4c(%rip), %rax      # 0x1c960
movslq (%rax,%rdx,4), %rcx
addq %rax, %rcx
jmpq *%rcx
movq 0x5295c(%rip), %rdi     # 0x69480
addq %rbx, %rdi
callq 0x88e5
movq 0x5299d(%rip), %rax     # 0x694d0
movq %rax, 0x10(%r14)
jmp 0x16c2a
movq 0x28(%rax), %rcx
movq %rcx, 0x4def9(%rip)     # 0x64a40
movq 0x10(%rax), %rax
cmpq $0x1, (%rax)
jne 0x16b65
callq 0x5d49
leaq 0x4dee3(%rip), %rdi     # 0x64a40
movq %rax, %rsi
callq 0x3bf2
movq 0x4ded4(%rip), %rax     # 0x64a40
shlq $0x17, %rax
sarq $0x17, %rax
movq %rax, 0x28(%r14)
movl $0x7801, %esi           # imm = 0x7801
jmp 0x16c44
movq %r14, %rdi
callq 0x19480
movq 0x18(%r14), %rdi
testq %rdi, %rdi
je 0x16cad
addq 0x5291a(%rip), %rdi     # 0x694b8
callq 0x88e5
jmp 0x16cad
movq %r14, %rdi
callq 0x19480
movq 0x4df01(%rip), %rcx     # 0x64ab8
movq 0x30(%rcx), %rax
movq %rax, 0x18(%r14)
movq (%rcx), %rcx
movq 0x10(%rcx), %rsi
subq 0x528eb(%rip), %rsi     # 0x694b8
movq %rsi, 0x20(%r14)
testq %rax, %rax
je 0x16bfb
shlq $0x18, %rsi
addq %rax, %rsi
movq %r14, %rdi
callq 0x3bf2
movabsq $0xfffffffff, %rdi      # imm = 0xFFFFFFFFF
andq (%r14), %rdi
callq 0x5e79
movq %rax, 0x20(%r14)
movq 0x20(%r14), %rax
addq 0x30(%r14), %rax
addq 0x10(%r14), %rax
movq 0x4deaa(%rip), %rcx     # 0x64ab8
movq (%rcx), %rcx
movq %rax, 0x10(%rcx)
jmp 0x16ccc
movq 0x52897(%rip), %rdi     # 0x694b8
addq (%rcx,%rax,8), %rdi
callq 0x88e5
movq %r14, %rdi
callq 0x19480
movq 0x18(%r14), %rdi
movl $0x7803, %esi           # imm = 0x7803
cmpq 0x52246(%rip), %rdi     # 0x68e88
jne 0x16c80
movq %rsi, 0x20(%r14)
shlq $0x18, %rsi
addq 0x28(%r14), %rsi
movq %r14, %rdi
callq 0x3bf2
movabsq $0xfffffffff, %rdi      # imm = 0xFFFFFFFFF
andq (%r14), %rdi
callq 0x5e79
movq %rax, 0x28(%r14)
addq 0x30(%r14), %rax
addq 0x10(%r14), %rax
movq %rax, %rdi
callq 0x88e5
jmp 0x16ccc
testq %rdi, %rdi
je 0x16cad
addq 0x5282c(%rip), %rdi     # 0x694b8
movq 0x28(%r14), %r15
callq 0x88e5
movq 0x4de1c(%rip), %rax     # 0x64ab8
movq (%rax), %rax
movq %r15, 0x18(%rax)
movq 0x10(%r14), %rdi
addq 0x30(%r14), %rdi
jmp 0x16c79
movq 0x10(%r14), %rdi
movq 0x28(%r14), %r15
addq 0x30(%r14), %rdi
callq 0x88e5
movq 0x4ddf3(%rip), %rax     # 0x64ab8
movq (%rax), %rax
movq %r15, 0x18(%rax)
movq 0x4dde5(%rip), %rax     # 0x64ab8
movl $0x1, 0x20(%rax)
movq %rbx, 0x38(%rax)
movq $0x0, 0x30(%rax)
movzwl 0x2e(%rax), %ecx
shlq $0x30, %rcx
movabsq $0xd00000000000, %rdx   # imm = 0xD00000000000
orq %rcx, %rdx
movq %rdx, 0x28(%rax)
popq %rbx
popq %r14
popq %r15
retq
nop