long adj_digit_prod(const char *dstr, int initial_idx) {
  long prod = 1;
  for (int i = 0; i < 13; ++i) {
    prod *= (dstr[i + initial_idx] - '0');
  }
  return prod;
}


x86 assembly (clang, -O0):
<adj_digit_prod>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
movq   $0x1,-0x18(%rbp)
movl   $0x0,-0x1c(%rbp)
cmpl   $0xd,-0x1c(%rbp)
jge    1151 <adj_digit_prod+0x51>
mov    -0x8(%rbp),%rax
mov    -0x1c(%rbp),%ecx
add    -0xc(%rbp),%ecx
movslq %ecx,%rcx
movsbl (%rax,%rcx,1),%eax
sub    $0x30,%eax
cltq
imul   -0x18(%rbp),%rax
mov    %rax,-0x18(%rbp)
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    111a <adj_digit_prod+0x1a>
mov    -0x18(%rbp),%rax
pop    %rbp
ret

x86 assembly (clang, -O2):
<adj_digit_prod>:
movslq %esi,%rax
movsbq (%rdi,%rax,1),%rcx
add    $0xffffffffffffffd0,%rcx
movsbq 0x1(%rdi,%rax,1),%rdx
add    $0xffffffffffffffd0,%rdx
imul   %rcx,%rdx
movsbq 0x2(%rdi,%rax,1),%rcx
add    $0xffffffffffffffd0,%rcx
movsbq 0x3(%rdi,%rax,1),%rsi
add    $0xffffffffffffffd0,%rsi
imul   %rcx,%rsi
imul   %rdx,%rsi
movsbq 0x4(%rdi,%rax,1),%rcx
add    $0xffffffffffffffd0,%rcx
movsbq 0x5(%rdi,%rax,1),%rdx
add    $0xffffffffffffffd0,%rdx
imul   %rcx,%rdx
movsbq 0x6(%rdi,%rax,1),%rcx
add    $0xffffffffffffffd0,%rcx
imul   %rdx,%rcx
imul   %rsi,%rcx
movsbq 0x7(%rdi,%rax,1),%rdx
add    $0xffffffffffffffd0,%rdx
movsbq 0x8(%rdi,%rax,1),%rsi
add    $0xffffffffffffffd0,%rsi
imul   %rdx,%rsi
movsbq 0x9(%rdi,%rax,1),%rdx
add    $0xffffffffffffffd0,%rdx
imul   %rsi,%rdx
movsbq 0xa(%rdi,%rax,1),%rsi
add    $0xffffffffffffffd0,%rsi
imul   %rdx,%rsi
imul   %rcx,%rsi
movsbq 0xb(%rdi,%rax,1),%rcx
add    $0xffffffffffffffd0,%rcx
movsbq 0xc(%rdi,%rax,1),%rax
add    $0xffffffffffffffd0,%rax
imul   %rcx,%rax
imul   %rsi,%rax
ret

LLVM IR (-O0):
define i64 @adj_digit_prod(i8* %0, i32 %1) {
%3 = alloca i8*
%4 = alloca i32
%5 = alloca i64
%6 = alloca i32
store i8* %0, i8** %3
store i32 %1, i32* %4
store i64 1, i64* %5
store i32 0, i32* %6
br label %7
7: ; preds = %23, %2
%8 = load i32, i32* %6
%9 = icmp slt i32 %8, 13
br i1 %9, label %10, label %26
10: ; preds = %7
%11 = load i8*, i8** %3
%12 = load i32, i32* %6
%13 = load i32, i32* %4
%14 = add nsw i32 %12, %13
%15 = sext i32 %14 to i64
%16 = getelementptr inbounds i8, i8* %11, i64 %15
%17 = load i8, i8* %16
%18 = sext i8 %17 to i32
%19 = sub nsw i32 %18, 48
%20 = sext i32 %19 to i64
%21 = load i64, i64* %5
%22 = mul nsw i64 %21, %20
store i64 %22, i64* %5
br label %23
23: ; preds = %10
%24 = load i32, i32* %6
%25 = add nsw i32 %24, 1
store i32 %25, i32* %6
br label %7
26: ; preds = %7
%27 = load i64, i64* %5
ret i64 %27
}

LLVM IR (-O2):
define i64 @adj_digit_prod(i8* nocapture %0, i32 %1) {
%3 = sext i32 %1 to i64
%4 = getelementptr inbounds i8, i8* %0, i64 %3
%5 = load i8, i8* %4
%6 = sext i8 %5 to i64
%7 = add nsw i64 %6, -48
%8 = add nsw i64 %3, 1
%9 = getelementptr inbounds i8, i8* %0, i64 %8
%10 = load i8, i8* %9
%11 = sext i8 %10 to i64
%12 = add nsw i64 %11, -48
%13 = mul nsw i64 %12, %7
%14 = add nsw i64 %3, 2
%15 = getelementptr inbounds i8, i8* %0, i64 %14
%16 = load i8, i8* %15
%17 = sext i8 %16 to i64
%18 = add nsw i64 %17, -48
%19 = mul nsw i64 %18, %13
%20 = add nsw i64 %3, 3
%21 = getelementptr inbounds i8, i8* %0, i64 %20
%22 = load i8, i8* %21
%23 = sext i8 %22 to i64
%24 = add nsw i64 %23, -48
%25 = mul nsw i64 %24, %19
%26 = add nsw i64 %3, 4
%27 = getelementptr inbounds i8, i8* %0, i64 %26
%28 = load i8, i8* %27
%29 = sext i8 %28 to i64
%30 = add nsw i64 %29, -48
%31 = mul nsw i64 %30, %25
%32 = add nsw i64 %3, 5
%33 = getelementptr inbounds i8, i8* %0, i64 %32
%34 = load i8, i8* %33
%35 = sext i8 %34 to i64
%36 = add nsw i64 %35, -48
%37 = mul nsw i64 %36, %31
%38 = add nsw i64 %3, 6
%39 = getelementptr inbounds i8, i8* %0, i64 %38
%40 = load i8, i8* %39
%41 = sext i8 %40 to i64
%42 = add nsw i64 %41, -48
%43 = mul nsw i64 %42, %37
%44 = add nsw i64 %3, 7
%45 = getelementptr inbounds i8, i8* %0, i64 %44
%46 = load i8, i8* %45
%47 = sext i8 %46 to i64
%48 = add nsw i64 %47, -48
%49 = mul nsw i64 %48, %43
%50 = add nsw i64 %3, 8
%51 = getelementptr inbounds i8, i8* %0, i64 %50
%52 = load i8, i8* %51
%53 = sext i8 %52 to i64
%54 = add nsw i64 %53, -48
%55 = mul nsw i64 %54, %49
%56 = add nsw i64 %3, 9
%57 = getelementptr inbounds i8, i8* %0, i64 %56
%58 = load i8, i8* %57
%59 = sext i8 %58 to i64
%60 = add nsw i64 %59, -48
%61 = mul nsw i64 %60, %55
%62 = add nsw i64 %3, 10
%63 = getelementptr inbounds i8, i8* %0, i64 %62
%64 = load i8, i8* %63
%65 = sext i8 %64 to i64
%66 = add nsw i64 %65, -48
%67 = mul nsw i64 %66, %61
%68 = add nsw i64 %3, 11
%69 = getelementptr inbounds i8, i8* %0, i64 %68
%70 = load i8, i8* %69
%71 = sext i8 %70 to i64
%72 = add nsw i64 %71, -48
%73 = mul nsw i64 %72, %67
%74 = add nsw i64 %3, 12
%75 = getelementptr inbounds i8, i8* %0, i64 %74
%76 = load i8, i8* %75
%77 = sext i8 %76 to i64
%78 = add nsw i64 %77, -48
%79 = mul nsw i64 %78, %73
ret i64 %79
}