int scan_chr(char *str, int *pos, int toc) {
  int value = 0;
  while (str[*pos] != '\0' && str[*pos] != toc) {
    value = (value * 256) + (unsigned char)str[*pos];
    *pos += 1;
  }
  if (str[*pos] == toc)
    *pos += 1;
  return value;
}


x86 assembly (clang, -O0):
<scan_chr>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %edx,-0x14(%rbp)
movl   $0x0,-0x18(%rbp)
mov    -0x8(%rbp),%rax
mov    -0x10(%rbp),%rcx
movslq (%rcx),%rcx
movsbl (%rax,%rcx,1),%ecx
xor    %eax,%eax
cmp    $0x0,%ecx
mov    %al,-0x19(%rbp)
je     114b <scan_chr+0x4b>
mov    -0x8(%rbp),%rax
mov    -0x10(%rbp),%rcx
movslq (%rcx),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    -0x14(%rbp),%eax
setne  %al
mov    %al,-0x19(%rbp)
mov    -0x19(%rbp),%al
test   $0x1,%al
jne    115b <scan_chr+0x5b>
jmp    1185 <scan_chr+0x85>
mov    -0x18(%rbp),%eax
shl    $0x8,%eax
mov    -0x8(%rbp),%rcx
mov    -0x10(%rbp),%rdx
movslq (%rdx),%rdx
movzbl (%rcx,%rdx,1),%ecx
add    %ecx,%eax
mov    %eax,-0x18(%rbp)
mov    -0x10(%rbp),%rax
mov    (%rax),%ecx
add    $0x1,%ecx
mov    %ecx,(%rax)
jmp    1116 <scan_chr+0x16>
mov    -0x8(%rbp),%rax
mov    -0x10(%rbp),%rcx
movslq (%rcx),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    -0x14(%rbp),%eax
jne    11a8 <scan_chr+0xa8>
mov    -0x10(%rbp),%rax
mov    (%rax),%ecx
add    $0x1,%ecx
mov    %ecx,(%rax)
mov    -0x18(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<scan_chr>:
mov    (%rsi),%r8d
movslq %r8d,%r10
movsbl (%rdi,%r10,1),%r11d
cmp    %edx,%r11d
sete   %r9b
xor    %eax,%eax
test   %r11d,%r11d
je     115b <scan_chr+0x5b>
cmp    %edx,%r11d
je     115b <scan_chr+0x5b>
add    %r10,%rdi
add    $0x1,%rdi
xor    %eax,%eax
nopw   0x0(%rax,%rax,1)
mov    %eax,%ecx
shl    $0x8,%ecx
movzbl %r11b,%eax
or     %ecx,%eax
add    $0x1,%r8d
mov    %r8d,(%rsi)
movsbl (%rdi),%r11d
cmp    %edx,%r11d
sete   %r9b
test   %r11d,%r11d
je     115b <scan_chr+0x5b>
add    $0x1,%rdi
cmp    %edx,%r11d
jne    1130 <scan_chr+0x30>
test   %r9b,%r9b
je     1167 <scan_chr+0x67>
add    $0x1,%r8d
mov    %r8d,(%rsi)
ret

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

LLVM IR (-O2):
define i32 @scan_chr(i8* nocapture %0, i32* nocapture %1, i32 %2) {
%4 = load i32, i32* %1
%5 = sext i32 %4 to i64
%6 = getelementptr inbounds i8, i8* %0, i64 %5
%7 = load i8, i8* %6
%8 = icmp eq i8 %7, 0
%9 = sext i8 %7 to i32
%10 = icmp eq i32 %9, %2
%11 = or i1 %8, %10
br i1 %11, label %29, label %12
12: ; preds = %3, %12
%13 = phi i64 [ %19, %12 ], [ %5, %3 ]
%14 = phi i8 [ %22, %12 ], [ %7, %3 ]
%15 = phi i32 [ %18, %12 ], [ 0, %3 ]
%16 = shl nsw i32 %15, 8
%17 = zext i8 %14 to i32
%18 = or i32 %16, %17
%19 = add i64 %13, 1
%20 = trunc i64 %19 to i32
store i32 %20, i32* %1
%21 = getelementptr inbounds i8, i8* %0, i64 %19
%22 = load i8, i8* %21
%23 = icmp eq i8 %22, 0
%24 = sext i8 %22 to i32
%25 = icmp eq i32 %24, %2
%26 = or i1 %23, %25
br i1 %26, label %27, label %12
27: ; preds = %12
%28 = trunc i64 %19 to i32
br label %29
29: ; preds = %27, %3
%30 = phi i32 [ 0, %3 ], [ %18, %27 ]
%31 = phi i32 [ %4, %3 ], [ %28, %27 ]
%32 = phi i1 [ %10, %3 ], [ %25, %27 ]
br i1 %32, label %33, label %35
33: ; preds = %29
%34 = add nsw i32 %31, 1
store i32 %34, i32* %1
br label %35
35: ; preds = %33, %29
ret i32 %30
}