Welcome to the CHICKEN Scheme pasting service
Huh? pasted by Bunny351 on Thu Feb 10 13:01:37 2022
if(C_charp(init)) { C_char buf[ 4 ]; n *= C_utf_encode(buf, C_character_code(init)) - buf; 720f11: 48 8b 45 e8 mov -0x18(%rbp),%rax 720f15: 48 89 45 b0 mov %rax,-0x50(%rbp) 720f19: 48 8b 45 b0 mov -0x50(%rbp),%rax 720f1d: 48 89 45 a8 mov %rax,-0x58(%rbp) 720f21: 48 8b 45 a8 mov -0x58(%rbp),%rax 720f25: 83 e0 0f and $0xf,%eax 720f28: 48 83 f8 0a cmp $0xa,%rax 720f2c: 74 13 je 720f41 <C_allocate_bytevector+0xb4> 720f2e: 48 8b 05 cb 0d 40 00 mov 0x400dcb(%rip),%rax # b21d00 <C_panic_hook@@Base-0x641a0> 720f35: 48 8b 00 mov (%rax),%rax 720f38: 48 8d 3d d1 32 38 00 lea 0x3832d1(%rip),%rdi # aa4210 <__PRETTY_FUNCTION__.9810+0x150a80> 720f3f: ff d0 callq *%rax 720f41: 48 8b 45 a8 mov -0x58(%rbp),%rax 720f45: 48 c1 f8 08 sar $0x8,%rax 720f49: 25 ff ff 1f 00 and $0x1fffff,%eax 720f4e: 89 c2 mov %eax,%edx 720f50: 48 8d 45 bc lea -0x44(%rbp),%rax 720f54: 89 d6 mov %edx,%esi 720f56: 48 89 c7 mov %rax,%rdi 720f59: e8 a2 0d 95 ff callq 71d00 <C_utf_encode@plt> 720f5e: 48 89 c2 mov %rax,%rdx 720f61: 48 8d 45 bc lea -0x44(%rbp),%rax 720f65: 48 29 c2 sub %rax,%rdx 720f68: 48 8b 45 e0 mov -0x20(%rbp),%rax 720f6c: 48 0f af c2 imul %rdx,%rax 720f70: 48 89 45 e0 mov %rax,-0x20(%rbp) }
no title added by Bunny351 on Thu Feb 10 13:08:19 2022
void C_allocate_bytevector(long c, long *av) { long k = av[ 1 ], size, init, align8, bytes, str, n, *p; if(c != 4) C_bad_argc(c, 4); size = av[ 2 ]; init = av[ 3 ]; n = ({ struct { typeof(size) n1; } C__TMPST = { .n1 = (size) }; typeof(C__TMPST) C__PREV_TMPST=C__TMPST; (((((((C__PREV_TMPST.n1) & 0x00000001) ? ((long)(0x00000006 | 0x00000010)) : ((long)(0x00000006 | 0x00000000)))) != ((long)(0x00000006 | 0x00000000)))) ? (void)0 : C_panic_hook(("Low-level type assertion " "C_fixnump(C_VAL1(size))""=#t" " failed at " "runtime.c" ":" "10090"))); ((C__PREV_TMPST.n1) >> 1); }); if(((((init) & 0x0000000f) == 0x0000000a) ? ((long)(0x00000006 | 0x00000010)) : ((long)(0x00000006 | 0x00000000)))) { char buf[ 4 ]; n *= C_utf_encode(buf, ({ struct { typeof(init) n1; } C__TMPST = { .n1 = (init) }; typeof(C__TMPST) C__PREV_TMPST=C__TMPST; ((((((((C__PREV_TMPST.n1) & 0x0000000f) == 0x0000000a) ? ((long)(0x00000006 | 0x00000010)) : ((long)(0x00000006 | 0x00000000)))) != ((long)(0x00000006 | 0x00000000)))) ? (void)0 : C_panic_hook(("Low-level type assertion " "C_charp(C_VAL1(init))""=#t" " failed at " "runtime.c" ":" "10094"))); ((long)(C__PREV_TMPST.n1) >> 8) & 0x1fffff; })) - buf; }