// File: /workspace/github_c_makefile_star2_O1/AK6DN[P]dec-utilities-for-pdp/d8tape/flow.c
// Function: flow
void
flow (void)
{
    pass1 ();
    pass2 ();
    pass3 ();
#ifdef PASS4_ENABLED
    pass4 ();   // this pass is fundamentally broken (well, maybe not the pass, but the interpretation of the results in dasm.c)
#endif
    verify_subroutines ();
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
pushq %rax
leaq 0x770a(%rip), %r14      # 0xcf40
movl $0xe00, %ebp            # imm = 0xE00
leaq 0x96fe(%rip), %r12      # 0xef40
leaq 0x76e7(%rip), %rbx      # 0xcf30
leaq 0x4477(%rip), %r15      # 0x9cc7
xorl %r13d, %r13d
movswl (%r14,%r13,2), %edx
cmpl $-0x1, %edx
je 0x5973
movl %edx, %eax
andl %ebp, %eax
cmpl %ebp, %eax
je 0x588d
cmpl $0xc00, %eax            # imm = 0xC00
jne 0x58aa
movl %edx, %edi
xorl %esi, %esi
xorl %edx, %edx
callq 0x54d1
testl %eax, %eax
jne 0x5973
orb $0x1, (%r12,%r13,2)
jmp 0x5973
movl %edx, %ecx
andl $0xf00, %ecx            # imm = 0xF00
movl %edx, %eax
notl %eax
cmpl $0xe00, %ecx            # imm = 0xE00
jne 0x5907
testb $0xc, %al
je 0x5919
jmp 0x5973
movl %r13d, %edi
movl %edx, %esi
xorl %edx, %edx
xorl %ecx, %ecx
callq 0x5490
movslq %eax, %rcx
movswl (%r14,%rcx,2), %r8d
cmpl $-0x1, %r8d
je 0x5932
movswl (%r14,%r13,2), %edx
movl %edx, %esi
andl $0xf00, %esi            # imm = 0xF00
cmpl $0x800, %esi            # imm = 0x800
jne 0x5973
testw %r8w, %r8w
sete %sil
cmpl %r8d, %eax
sete %dil
orb %sil, %dil
je 0x5956
orb $0x1, 0x1(%r12,%rcx,2)
cmpl $0x2, (%rbx)
jl 0x5973
leaq 0x4479(%rip), %rdi      # 0x9d7e
jmp 0x5948
testl $0xf01, %eax            # imm = 0xF01
setne %al
testb $0x2e, %dl
sete %cl
orb %al, %cl
jne 0x5973
orb $0x1, (%r12,%r13,2)
cmpl $0x2, (%rbx)
jl 0x5973
movq %r15, %rdi
movl %r13d, %esi
xorl %eax, %eax
callq 0x30c0
jmp 0x5973
orb $0x1, (%r12,%r13,2)
cmpl $0x2, (%rbx)
jl 0x5973
movswl (%r14,%r13,2), %edx
leaq 0x43a9(%rip), %rdi      # 0x9cf1
movl %r13d, %esi
movl %eax, %ecx
xorl %eax, %eax
callq 0x30c0
jmp 0x5973
orb $0x1, (%r12,%r13,2)
cmpl $0x2, (%rbx)
jl 0x5973
leaq 0x43d7(%rip), %rdi      # 0x9d3e
movl %r13d, %esi
movl %eax, %ecx
xorl %eax, %eax
callq 0x30c0
incq %r13
cmpq $0x1000, %r13           # imm = 0x1000
jne 0x5853
xorl %ebp, %ebp
movswl (%r14,%rbp,2), %esi
cmpl $-0x1, %esi
je 0x5a8c
testb $0x1, (%r12,%rbp,2)
jne 0x5a8c
movl %ebp, %edi
xorl %edx, %edx
xorl %ecx, %ecx
callq 0x5490
movl %eax, %r15d
movswl (%r14,%rbp,2), %edx
movl %edx, %eax
shrl $0x8, %eax
andl $0xf, %eax
cmpl $0x8, %eax
jae 0x5a1e
movslq %r15d, %r13
orb $0x1, (%r12,%r13,2)
cmpl $0x2, (%rbx)
jl 0x59de
leaq 0x43f6(%rip), %rdi      # 0x9dc8
movl %ebp, %esi
movl %r15d, %ecx
xorl %eax, %eax
callq 0x30c0
movswl (%r14,%rbp,2), %edx
movl %edx, %eax
orl $0x200, %eax            # imm = 0x200
andl $0xf00, %eax            # imm = 0xF00
cmpl $0x600, %eax            # imm = 0x600
jne 0x5a8c
orb $0x1, 0x1(%r12,%r13,2)
cmpl $0x2, (%rbx)
jl 0x5a8c
leaq 0x43f6(%rip), %rdi      # 0x9e06
movl %ebp, %esi
movl %r15d, %ecx
xorl %eax, %eax
callq 0x30c0
jmp 0x5a8c
je 0x5a3b
cmpl $0xa, %eax
jne 0x5a8c
movslq %r15d, %rax
orb $0x4, (%r12,%rax,2)
cmpl $0x2, (%rbx)
jl 0x5a8c
leaq 0x449f(%rip), %rdi      # 0x9ed8
jmp 0x5a10
movslq %r15d, %rax
movzwl (%r14,%rax,2), %ecx
testw %cx, %cx
sete %sil
movswl %cx, %r8d
cmpl %r8d, %r15d
sete %cl
orb %sil, %cl
cmpb $0x1, %cl
jne 0x5a6f
orb $0x2, (%r12,%rax,2)
cmpl $0x2, (%rbx)
jl 0x5a8c
leaq 0x43cd(%rip), %rdi      # 0x9e3a
jmp 0x5a80
orb $0x1, (%r12,%rbp,2)
cmpl $0x2, (%rbx)
jl 0x5a8c
leaq 0x4409(%rip), %rdi      # 0x9e89
movl %ebp, %esi
movl %r15d, %ecx
xorl %eax, %eax
callq 0x30c0
incq %rbp
cmpq $0x1000, %rbp           # imm = 0x1000
jne 0x5985
xorl %r13d, %r13d
movswl (%r14,%r13,2), %edx
cmpl $-0x1, %edx
je 0x5b62
btl $0x8, %edx
jae 0x5b62
movswl %dx, %eax
cmpl $0xbff, %eax            # imm = 0xBFF
jg 0x5b62
movzwl (%r12,%r13,2), %eax
andl $0x1, %eax
jne 0x5b62
movl %r13d, %edi
movl %edx, %esi
xorl %edx, %edx
xorl %ecx, %ecx
callq 0x5490
movl %eax, %r15d
movswl (%r14,%r13,2), %edx
movl %edx, %eax
shrl $0x9, %eax
andl $0x7, %eax
cmpl $0x4, %eax
jae 0x5b98
movslq %r15d, %rbp
movswq (%r14,%rbp,2), %r8
cmpq $-0x1, %r8
je 0x5b83
testb $0x1, 0x1(%r12,%rbp,2)
jne 0x5b83
orb $0x1, (%r12,%r8,2)
cmpl $0x2, (%rbx)
jl 0x5b2e
leaq 0x440a(%rip), %rdi      # 0x9f2b
movl %r13d, %esi
movl %r15d, %ecx
xorl %eax, %eax
callq 0x30c0
movswl (%r14,%r13,2), %edx
movl %edx, %eax
orl $0x200, %eax            # imm = 0x200
andl $0xe00, %eax            # imm = 0xE00
cmpl $0x600, %eax            # imm = 0x600
jne 0x5b83
movswq (%r14,%rbp,2), %r8
orb $0x1, 0x1(%r12,%r8,2)
cmpl $0x2, (%rbx)
jl 0x5b83
leaq 0x4425(%rip), %rdi      # 0x9f82
jmp 0x5c40
cmpw $-0x1, %dx
je 0x5b83
cmpl $0x3, (%rbx)
jl 0x5b83
movzwl (%r12,%r13,2), %ecx
leaq 0x438c(%rip), %rdi      # 0x9f05
movl %r13d, %esi
xorl %eax, %eax
callq 0x30c0
incq %r13
cmpq $0x1000, %r13           # imm = 0x1000
jne 0x5a9f
jmp 0x5c79
je 0x5bde
cmpl $0x5, %eax
jne 0x5b83
movslq %r15d, %rax
movswq (%r14,%rax,2), %r8
cmpq $-0x1, %r8
je 0x5c2b
movzwl (%r12,%rax,2), %ecx
btl $0x8, %ecx
jb 0x5b83
orl $0x401, %ecx            # imm = 0x401
movw %cx, (%r12,%rax,2)
orb $0x4, (%r12,%r8,2)
cmpl $0x2, (%rbx)
jl 0x5b83
movswl (%r14,%r8,2), %r9d
leaq 0x44d5(%rip), %rdi      # 0xa0ae
jmp 0x5c67
movslq %r15d, %rax
movswq (%r14,%rax,2), %r8
cmpq $-0x1, %r8
je 0x5b83
testb $0x1, 0x1(%r12,%rax,2)
jne 0x5b83
movswl (%r14,%r8,2), %r9d
testw %r9w, %r9w
setne %cl
cmpw %r8w, %r9w
setne %sil
testb %sil, %cl
jne 0x5c52
orb $0x2, (%r12,%r8,2)
orw $0x401, (%r12,%rax,2)   # imm = 0x401
cmpl $0x2, (%rbx)
jl 0x5b83
leaq 0x43ac(%rip), %rdi      # 0x9fd5
jmp 0x5c67
orb $0x1, (%r12,%r13,2)
cmpl $0x2, (%rbx)
jl 0x5b83
leaq 0x4501(%rip), %rdi      # 0xa141
movl %r13d, %esi
movl %r15d, %ecx
xorl %eax, %eax
callq 0x30c0
jmp 0x5b83
orb $0x1, (%r12,%r13,2)
cmpl $0x2, (%rbx)
jl 0x5b83
leaq 0x43d8(%rip), %rdi      # 0xa03f
movl %r13d, %esi
movl %r15d, %ecx
xorl %eax, %eax
callq 0x30c0
jmp 0x5b83
xorl %r15d, %r15d
testb $0x2, (%r12,%r15,2)
je 0x5ccf
movl %r15d, %r13d
orl $0x7f, %r13d
incl %r13d
xorl %ebp, %ebp
movq %r15, %rbx
movswl (%r14,%rbx,2), %esi
movl %esi, %eax
andl $0xf00, %eax            # imm = 0xF00
cmpl $0xb00, %eax            # imm = 0xB00
jne 0x5cbe
movl %ebx, %edi
xorl %edx, %edx
xorl %ecx, %ecx
callq 0x5490
movl %eax, %eax
cmpq %rax, %r15
jne 0x5cbe
orb $0x8, (%r12,%rbx,2)
incl %ebp
incq %rbx
cmpq %rbx, %r13
jne 0x5c92
testl %ebp, %ebp
jne 0x5ccf
andb $-0x3, (%r12,%r15,2)
incq %r15
cmpq $0x1000, %r15           # imm = 0x1000
jne 0x5c7c
addq $0x8, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
nop