int parse_octal(source, result)
char *source;
char *result;
{
  int count;
  char byte = '\0';
  char digit;
  for (count = 1; count <= 3; count++) {
    digit = *source++;
    if ('0' <= digit && digit <= '7')
      byte = (byte * 8) + (digit - '0');
    else
      break;
  }
  *result = byte;
  return (count);
}


x86 assembly (clang, -O0):
<parse_octal>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
movb   $0x0,-0x15(%rbp)
movl   $0x1,-0x14(%rbp)
cmpl   $0x3,-0x14(%rbp)
jg     1183 <parse_octal+0x83>
mov    -0x8(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x8(%rbp)
mov    (%rax),%al
mov    %al,-0x16(%rbp)
movsbl -0x16(%rbp),%ecx
mov    $0x30,%eax
cmp    %ecx,%eax
jg     116b <parse_octal+0x6b>
movsbl -0x16(%rbp),%eax
cmp    $0x37,%eax
jg     116b <parse_octal+0x6b>
movsbl -0x15(%rbp),%eax
shl    $0x3,%eax
movsbl -0x16(%rbp),%ecx
sub    $0x30,%ecx
add    %ecx,%eax
mov    %al,-0x15(%rbp)
jmp    1170 <parse_octal+0x70>
jmp    1183 <parse_octal+0x83>
jmp    1175 <parse_octal+0x75>
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
jmp    1117 <parse_octal+0x17>
mov    -0x15(%rbp),%cl
mov    -0x10(%rbp),%rax
mov    %cl,(%rax)
mov    -0x14(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<parse_octal>:
mov    (%rdi),%cl
mov    %ecx,%eax
and    $0xf8,%al
cmp    $0x30,%al
jne    114e <parse_octal+0x4e>
add    $0xd0,%cl
mov    0x1(%rdi),%r8b
mov    %r8d,%edx
and    $0xf8,%dl
mov    $0x2,%eax
cmp    $0x30,%dl
jne    114b <parse_octal+0x4b>
shl    $0x3,%cl
add    %r8b,%cl
add    $0xd0,%cl
mov    0x2(%rdi),%dil
mov    %edi,%edx
and    $0xf8,%dl
mov    $0x3,%eax
cmp    $0x30,%dl
jne    114b <parse_octal+0x4b>
shl    $0x3,%cl
add    %dil,%cl
add    $0xd0,%cl
mov    $0x4,%eax
mov    %cl,(%rsi)
ret
mov    $0x1,%eax
xor    %ecx,%ecx
mov    %cl,(%rsi)
ret

LLVM IR (-O0):
define i32 @parse_octal(i8* %0, i8* %1) {
%3 = alloca i8*
%4 = alloca i8*
%5 = alloca i32
%6 = alloca i8
%7 = alloca i8
store i8* %0, i8** %3
store i8* %1, i8** %4
store i8 0, i8* %6
store i32 1, i32* %5
br label %8
8: ; preds = %33, %2
%9 = load i32, i32* %5
%10 = icmp sle i32 %9, 3
br i1 %10, label %11, label %36
11: ; preds = %8
%12 = load i8*, i8** %3
%13 = getelementptr inbounds i8, i8* %12, i32 1
store i8* %13, i8** %3
%14 = load i8, i8* %12
store i8 %14, i8* %7
%15 = load i8, i8* %7
%16 = sext i8 %15 to i32
%17 = icmp sle i32 48, %16
br i1 %17, label %18, label %31
18: ; preds = %11
%19 = load i8, i8* %7
%20 = sext i8 %19 to i32
%21 = icmp sle i32 %20, 55
br i1 %21, label %22, label %31
22: ; preds = %18
%23 = load i8, i8* %6
%24 = sext i8 %23 to i32
%25 = mul nsw i32 %24, 8
%26 = load i8, i8* %7
%27 = sext i8 %26 to i32
%28 = sub nsw i32 %27, 48
%29 = add nsw i32 %25, %28
%30 = trunc i32 %29 to i8
store i8 %30, i8* %6
br label %32
31: ; preds = %18, %11
br label %36
32: ; preds = %22
br label %33
33: ; preds = %32
%34 = load i32, i32* %5
%35 = add nsw i32 %34, 1
store i32 %35, i32* %5
br label %8
36: ; preds = %31, %8
%37 = load i8, i8* %6
%38 = load i8*, i8** %4
store i8 %37, i8* %38
%39 = load i32, i32* %5
ret i32 %39
}

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