#define NULL ((void *)0)
typedef unsigned long size_t; // Customize by platform.
typedef long intptr_t;
typedef unsigned long uintptr_t;
typedef long scalar_t__; // Either arithmetic or pointer type.
/* By default, we understand bool (as a convenience). */
typedef int bool;
#define false 0
#define true 1

/* Forward declarations */

/* Type definitions */

/* Variables and functions */
bool scan_character(char *buffer, size_t *length, size_t *eaten,
                    const char delim) {
  char *p = buffer;
  size_t sz = *length;
  while (sz > 0 && *p != delim)
    sz--, p++;
  if (sz > 0) {
    *eaten = *length - sz + 1;
    *length = sz - 1;
  } else {
    *eaten = *length;
    *length = 0;
  }
  return (sz > 0);
}


x86 assembly (clang, -O0):
<scan_character>:
push   %rbp
mov    %rsp,%rbp
mov    %cl,%al
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %al,-0x19(%rbp)
mov    -0x8(%rbp),%rax
mov    %rax,-0x28(%rbp)
mov    -0x10(%rbp),%rax
mov    (%rax),%rax
mov    %rax,-0x30(%rbp)
xor    %eax,%eax
cmpq   $0x0,-0x30(%rbp)
mov    %al,-0x31(%rbp)
jbe    114b <scan_character+0x4b>
mov    -0x28(%rbp),%rax
movsbl (%rax),%eax
movsbl -0x19(%rbp),%ecx
cmp    %ecx,%eax
setne  %al
mov    %al,-0x31(%rbp)
mov    -0x31(%rbp),%al
test   $0x1,%al
jne    115b <scan_character+0x5b>
jmp    1178 <scan_character+0x78>
mov    -0x30(%rbp),%rax
add    $0xffffffffffffffff,%rax
mov    %rax,-0x30(%rbp)
mov    -0x28(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x28(%rbp)
jmp    1128 <scan_character+0x28>
cmpq   $0x0,-0x30(%rbp)
jbe    11ad <scan_character+0xad>
mov    -0x10(%rbp),%rax
mov    (%rax),%rcx
sub    -0x30(%rbp),%rcx
add    $0x1,%rcx
mov    -0x18(%rbp),%rax
mov    %rcx,(%rax)
mov    -0x30(%rbp),%rcx
sub    $0x1,%rcx
mov    -0x10(%rbp),%rax
mov    %rcx,(%rax)
jmp    11c6 <scan_character+0xc6>
mov    -0x10(%rbp),%rax
mov    (%rax),%rcx
mov    -0x18(%rbp),%rax
mov    %rcx,(%rax)
mov    -0x10(%rbp),%rax
movq   $0x0,(%rax)
cmpq   $0x0,-0x30(%rbp)
seta   %al
and    $0x1,%al
movzbl %al,%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<scan_character>:
mov    (%rsi),%rax
test   %rax,%rax
je     111f <scan_character+0x1f>
xor    %r8d,%r8d
nopl   0x0(%rax,%rax,1)
cmp    %cl,(%rdi,%r8,1)
je     112b <scan_character+0x2b>
add    $0x1,%r8
cmp    %r8,%rax
jne    1110 <scan_character+0x10>
mov    %rax,(%rdx)
xor    %eax,%eax
xor    %r8d,%r8d
mov    %r8,(%rsi)
ret
lea    0x1(%r8),%rcx
mov    %rcx,(%rdx)
not    %r8
add    %rax,%r8
mov    $0x1,%eax
mov    %r8,(%rsi)
ret

LLVM IR (-O0):
define i32 @scan_character(i8* %0, i64* %1, i64* %2, i8 signext %3) {
%5 = alloca i8*
%6 = alloca i64*
%7 = alloca i64*
%8 = alloca i8
%9 = alloca i8*
%10 = alloca i64
store i8* %0, i8** %5
store i64* %1, i64** %6
store i64* %2, i64** %7
store i8 %3, i8* %8
%11 = load i8*, i8** %5
store i8* %11, i8** %9
%12 = load i64*, i64** %6
%13 = load i64, i64* %12
store i64 %13, i64* %10
br label %14
14: ; preds = %26, %4
%15 = load i64, i64* %10
%16 = icmp ugt i64 %15, 0
br i1 %16, label %17, label %24
17: ; preds = %14
%18 = load i8*, i8** %9
%19 = load i8, i8* %18
%20 = sext i8 %19 to i32
%21 = load i8, i8* %8
%22 = sext i8 %21 to i32
%23 = icmp ne i32 %20, %22
br label %24
24: ; preds = %17, %14
%25 = phi i1 [ false, %14 ], [ %23, %17 ]
br i1 %25, label %26, label %31
26: ; preds = %24
%27 = load i64, i64* %10
%28 = add i64 %27, -1
store i64 %28, i64* %10
%29 = load i8*, i8** %9
%30 = getelementptr inbounds i8, i8* %29, i32 1
store i8* %30, i8** %9
br label %14
31: ; preds = %24
%32 = load i64, i64* %10
%33 = icmp ugt i64 %32, 0
br i1 %33, label %34, label %44
34: ; preds = %31
%35 = load i64*, i64** %6
%36 = load i64, i64* %35
%37 = load i64, i64* %10
%38 = sub i64 %36, %37
%39 = add i64 %38, 1
%40 = load i64*, i64** %7
store i64 %39, i64* %40
%41 = load i64, i64* %10
%42 = sub i64 %41, 1
%43 = load i64*, i64** %6
store i64 %42, i64* %43
br label %49
44: ; preds = %31
%45 = load i64*, i64** %6
%46 = load i64, i64* %45
%47 = load i64*, i64** %7
store i64 %46, i64* %47
%48 = load i64*, i64** %6
store i64 0, i64* %48
br label %49
49: ; preds = %44, %34
%50 = load i64, i64* %10
%51 = icmp ugt i64 %50, 0
%52 = zext i1 %51 to i32
ret i32 %52
}

LLVM IR (-O2):
define i32 @scan_character(i8* nocapture %0, i64* nocapture %1, i64* nocapture writeonly %2, i8 signext %3) {
%5 = load i64, i64* %1
%6 = icmp eq i64 %5, 0
br i1 %6, label %20, label %7
7: ; preds = %4, %12
%8 = phi i64 [ %13, %12 ], [ %5, %4 ]
%9 = phi i8* [ %14, %12 ], [ %0, %4 ]
%10 = load i8, i8* %9
%11 = icmp eq i8 %10, %3
br i1 %11, label %16, label %12
12: ; preds = %7
%13 = add i64 %8, -1
%14 = getelementptr inbounds i8, i8* %9, i64 1
%15 = icmp eq i64 %13, 0
br i1 %15, label %20, label %7
16: ; preds = %7
%17 = add i64 %5, 1
%18 = sub i64 %17, %8
store i64 %18, i64* %2
%19 = add i64 %8, -1
br label %21
20: ; preds = %12, %4
store i64 %5, i64* %2
br label %21
21: ; preds = %20, %16
%22 = phi i32 [ 0, %20 ], [ 1, %16 ]
%23 = phi i64 [ 0, %20 ], [ %19, %16 ]
store i64 %23, i64* %1
ret i32 %22
}