// File: /workspace/github_cpp_makefile_star2_O3/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 0x4dcdc(%rip), %rax     # 0x64aa8
movq 0x38(%rax), %rcx
movq %rcx, 0x8(%rdi)
movq 0x526dd(%rip), %rcx     # 0x694b8
movq %rcx, 0x10(%rdi)
leaq 0x5208a(%rip), %rcx     # 0x68e70
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 0x16e62
movq 0x8(%r14), %rax
leaq -0xf(%rax), %rdx
cmpq $0x3, %rdx
ja 0x16f4c
leaq 0x5bf6(%rip), %rax      # 0x1ca30
movslq (%rax,%rdx,4), %rcx
addq %rax, %rcx
jmpq *%rcx
movq 0x52626(%rip), %rdi     # 0x69470
addq %rbx, %rdi
callq 0x88f7
movq 0x52667(%rip), %rax     # 0x694c0
movq %rax, 0x10(%r14)
jmp 0x16f5c
movq 0x28(%rax), %rsi
movq %rsi, 0x4dbc3(%rip)     # 0x64a30
movq 0x10(%rax), %rax
cmpq $0x1, (%rax)
jne 0x16e92
callq 0x5da0
leaq 0x4dbad(%rip), %rdi     # 0x64a30
movq %rax, %rsi
callq 0x3c48
movq 0x4db9e(%rip), %rsi     # 0x64a30
movabsq $0x7801000000, %rax     # imm = 0x7801000000
shlq $0x17, %rsi
sarq $0x17, %rsi
movq %rsi, 0x28(%r14)
movq $0x7801, 0x20(%r14)     # imm = 0x7801
jmp 0x16f8d
movq %r14, %rdi
callq 0x19920
movq 0x18(%r14), %rdi
testq %rdi, %rdi
je 0x16fed
addq 0x525d7(%rip), %rdi     # 0x694a8
callq 0x88f7
jmp 0x16fed
movq %r14, %rdi
callq 0x19920
movq 0x4dbbe(%rip), %rax     # 0x64aa8
movq 0x30(%rax), %rdx
movq %rdx, 0x18(%r14)
movq (%rax), %rcx
movq 0x10(%rcx), %rax
subq 0x525a8(%rip), %rax     # 0x694a8
movq %rax, 0x20(%r14)
testq %rdx, %rdx
je 0x16f3b
shlq $0x18, %rax
addq %rdx, %rax
movq %r14, %rdi
movq %rax, %rsi
callq 0x3c48
movabsq $0xfffffffff, %rdi      # imm = 0xFFFFFFFFF
andq (%r14), %rdi
callq 0x5ed0
movq %rax, 0x20(%r14)
movq 0x4db70(%rip), %rcx     # 0x64aa8
movq (%rcx), %rcx
addq 0x30(%r14), %rax
addq 0x10(%r14), %rax
movq %rax, 0x10(%rcx)
jmp 0x1700c
movq 0x52555(%rip), %rdi     # 0x694a8
addq (%rcx,%rax,8), %rdi
callq 0x88f7
movq %r14, %rdi
callq 0x19920
movq 0x18(%r14), %rdi
cmpq 0x51f09(%rip), %rdi     # 0x68e78
jne 0x16fc0
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 0x3c48
movabsq $0xfffffffff, %rdi      # imm = 0xFFFFFFFFF
andq (%r14), %rdi
callq 0x5ed0
movq %rax, 0x28(%r14)
addq 0x30(%r14), %rax
addq 0x10(%r14), %rax
movq %rax, %rdi
callq 0x88f7
jmp 0x1700c
testq %rdi, %rdi
je 0x16fed
addq 0x524dc(%rip), %rdi     # 0x694a8
movq 0x28(%r14), %r15
callq 0x88f7
movq 0x4dacc(%rip), %rax     # 0x64aa8
movq (%rax), %rax
movq %r15, 0x18(%rax)
movq 0x10(%r14), %rdi
addq 0x30(%r14), %rdi
jmp 0x16fb9
movq 0x10(%r14), %rdi
movq 0x28(%r14), %r15
addq 0x30(%r14), %rdi
callq 0x88f7
movq 0x4daa3(%rip), %rax     # 0x64aa8
movq (%rax), %rax
movq %r15, 0x18(%rax)
movq 0x4da95(%rip), %rax     # 0x64aa8
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