// File: /workspace/github_c_makefile_star2_O0/johsteffens[P]beth/lib/bcore/bcore.xo.c
// Function: x_btcl_to_sink
er_t x_btcl_to_sink( bl_t detailed, const sr_s* sr, x_sink* sink )
{
    // bcore_x_btcl.x:1050:1
    
    if( detailed )
    {
        if( sr_s_o_type(sr) == ((tp_t)(TYPEOF_x_btcl_list_s)) ) BLM_TRY(x_btcl_list_s_to_sink(((const x_btcl_list_s*)(sr->o)),detailed, sink ))
        else x_btml_t_to_sink( ((const x_btml*)(sr->o)),sr_s_o_type(sr), sink );
    }
    else
    {
        if     ( !sr->o ) x_sink_push_fa(sink,"NULL" );
        else if( sr_s_type(sr) == ((tp_t)(TYPEOF_bl_t)) ) x_sink_push_fa(sink,"#<sc_t>", sr_s_to_bl(sr) ? "true" : "false" );
        else if( sr_s_is_integer(sr) ) x_sink_push_fa(sink,"#<s3_t>", sr_s_to_s3(sr) );
        else if( sr_s_is_float(sr) )   x_sink_push_fa(sink,"#<f3_t>", sr_s_to_f3(sr) );
        else if( sr_s_o_type(sr) == ((tp_t)(TYPEOF_st_s)) ) x_sink_push_fa(sink,"#<sc_t>", ((const st_s*)(sr->o))->sc );
        else if( sr_s_o_type(sr) == ((tp_t)(TYPEOF_x_btcl_list_s)) ) BLM_TRY(x_btcl_list_s_to_sink(((const x_btcl_list_s*)(sr->o)),detailed, sink ))
        else x_btml_t_to_sink( ((const x_btml*)(sr->o)),sr_s_o_type(sr), sink );
    }
    return  0;
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
subq $0x70, %rsp
movb %dil, %al
andb $0x1, %al
movb %al, -0x9(%rbp)
movq %rsi, -0x18(%rbp)
movq %rdx, -0x20(%rbp)
testb $0x1, -0x9(%rbp)
je 0x61cfc
movq -0x18(%rbp), %rdi
callq 0x52c00
movabsq $-0x240ec4eb25c1f3e8, %rcx # imm = 0xDBF13B14DA3E0C18
cmpq %rcx, %rax
jne 0x61cd3
movq -0x18(%rbp), %rax
movq (%rax), %rdi
movb -0x9(%rbp), %al
movq -0x20(%rbp), %rdx
andb $0x1, %al
movzbl %al, %esi
callq 0x67290
movq %rax, -0x28(%rbp)
cmpq $0x0, -0x28(%rbp)
je 0x61cd1
movq -0x28(%rbp), %rax
movq %rax, -0x30(%rbp)
leaq 0x150674(%rip), %rax    # 0x1b2330
movq (%rax), %rdi
callq 0xc0720
movq -0x30(%rbp), %rax
movq %rax, -0x8(%rbp)
jmp 0x61eb5
jmp 0x61cf7
movq -0x18(%rbp), %rax
movq (%rax), %rax
movq %rax, -0x48(%rbp)
movq -0x18(%rbp), %rdi
callq 0x52c00
movq -0x48(%rbp), %rdi
movq %rax, %rsi
movq -0x20(%rbp), %rdx
callq 0x4d770
jmp 0x61ead
movq -0x18(%rbp), %rax
cmpq $0x0, (%rax)
jne 0x61d1d
movq -0x20(%rbp), %rdi
leaq 0xdf1a4(%rip), %rsi     # 0x140eb5
movb $0x0, %al
callq 0x43590
jmp 0x61eab
movq -0x18(%rbp), %rdi
callq 0x45450
movabsq $-0x3ac242643d9c35a8, %rcx # imm = 0xC53DBD9BC263CA58
cmpq %rcx, %rax
jne 0x61d74
movq -0x20(%rbp), %rax
movq %rax, -0x50(%rbp)
movq -0x18(%rbp), %rdi
callq 0xfd120
movq -0x50(%rbp), %rdi
movb %al, %cl
leaq 0xd7fc2(%rip), %rdx     # 0x139d15
leaq 0xf70f1(%rip), %rax     # 0x158e4b
testb $0x1, %cl
cmovneq %rax, %rdx
leaq 0xed1bd(%rip), %rsi     # 0x14ef25
movb $0x0, %al
callq 0x43590
jmp 0x61ea9
movq -0x18(%rbp), %rdi
callq 0xfc2d0
testb $0x1, %al
jne 0x61d83
jmp 0x61dae
movq -0x20(%rbp), %rax
movq %rax, -0x58(%rbp)
movq -0x18(%rbp), %rdi
callq 0xfce10
movq -0x58(%rbp), %rdi
movq %rax, %rdx
leaq 0xebaeb(%rip), %rsi     # 0x14d88d
movb $0x0, %al
callq 0x43590
jmp 0x61ea7
movq -0x18(%rbp), %rdi
callq 0xfc2a0
testb $0x1, %al
jne 0x61dbd
jmp 0x61de5
movq -0x20(%rbp), %rax
movq %rax, -0x60(%rbp)
movq -0x18(%rbp), %rdi
callq 0xfc680
movq -0x60(%rbp), %rdi
leaq 0xdec40(%rip), %rsi     # 0x140a19
movb $0x1, %al
callq 0x43590
jmp 0x61ea5
movq -0x18(%rbp), %rdi
callq 0x52c00
movabsq $-0x503db0e6e1c2e704, %rcx # imm = 0xAFC24F191E3D18FC
cmpq %rcx, %rax
jne 0x61e1f
movq -0x20(%rbp), %rdi
movq -0x18(%rbp), %rax
movq (%rax), %rax
movq 0x8(%rax), %rdx
leaq 0xed112(%rip), %rsi     # 0x14ef25
movb $0x0, %al
callq 0x43590
jmp 0x61ea3
movq -0x18(%rbp), %rdi
callq 0x52c00
movabsq $-0x240ec4eb25c1f3e8, %rcx # imm = 0xDBF13B14DA3E0C18
cmpq %rcx, %rax
jne 0x61e7d
movq -0x18(%rbp), %rax
movq (%rax), %rdi
movb -0x9(%rbp), %al
movq -0x20(%rbp), %rdx
andb $0x1, %al
movzbl %al, %esi
callq 0x67290
movq %rax, -0x38(%rbp)
cmpq $0x0, -0x38(%rbp)
je 0x61e7b
movq -0x38(%rbp), %rax
movq %rax, -0x40(%rbp)
leaq 0x1504c7(%rip), %rax    # 0x1b2330
movq (%rax), %rdi
callq 0xc0720
movq -0x40(%rbp), %rax
movq %rax, -0x8(%rbp)
jmp 0x61eb5
jmp 0x61ea1
movq -0x18(%rbp), %rax
movq (%rax), %rax
movq %rax, -0x68(%rbp)
movq -0x18(%rbp), %rdi
callq 0x52c00
movq -0x68(%rbp), %rdi
movq %rax, %rsi
movq -0x20(%rbp), %rdx
callq 0x4d770
jmp 0x61ea3
jmp 0x61ea5
jmp 0x61ea7
jmp 0x61ea9
jmp 0x61eab
jmp 0x61ead
movq $0x0, -0x8(%rbp)
movq -0x8(%rbp), %rax
addq $0x70, %rsp
popq %rbp
retq
nop