long BCDTime(unsigned char *pMJD) {
  int h, m, s;
  h = (pMJD[0] >> 4) * 10 + (pMJD[0] & 0x0f);
  m = (pMJD[1] >> 4) * 10 + (pMJD[1] & 0x0f);
  s = (pMJD[2] >> 4) * 10 + (pMJD[2] & 0x0f);
  return h * 3600 + m * 60 + s;
}


x86 assembly (clang, -O0):
<BCDTime>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    -0x8(%rbp),%rax
movzbl (%rax),%eax
sar    $0x4,%eax
imul   $0xa,%eax,%eax
mov    -0x8(%rbp),%rcx
movzbl (%rcx),%ecx
and    $0xf,%ecx
add    %ecx,%eax
mov    %eax,-0xc(%rbp)
mov    -0x8(%rbp),%rax
movzbl 0x1(%rax),%eax
sar    $0x4,%eax
imul   $0xa,%eax,%eax
mov    -0x8(%rbp),%rcx
movzbl 0x1(%rcx),%ecx
and    $0xf,%ecx
add    %ecx,%eax
mov    %eax,-0x10(%rbp)
mov    -0x8(%rbp),%rax
movzbl 0x2(%rax),%eax
sar    $0x4,%eax
imul   $0xa,%eax,%eax
mov    -0x8(%rbp),%rcx
movzbl 0x2(%rcx),%ecx
and    $0xf,%ecx
add    %ecx,%eax
mov    %eax,-0x14(%rbp)
imul   $0xe10,-0xc(%rbp),%eax
imul   $0x3c,-0x10(%rbp),%ecx
add    %ecx,%eax
add    -0x14(%rbp),%eax
cltq
pop    %rbp
ret

x86 assembly (clang, -O2):
<BCDTime>:
movzbl (%rdi),%eax
mov    %rax,%rcx
shr    $0x4,%rcx
lea    (%rcx,%rcx,4),%rcx
and    $0xf,%eax
lea    (%rax,%rcx,2),%rax
movzbl 0x1(%rdi),%ecx
mov    %rcx,%rdx
shr    $0x4,%rdx
lea    (%rdx,%rdx,4),%rdx
and    $0xf,%ecx
lea    (%rcx,%rdx,2),%rcx
movzbl 0x2(%rdi),%edx
mov    %rdx,%rsi
shr    $0x4,%rsi
lea    (%rsi,%rsi,4),%rsi
and    $0xf,%edx
imul   $0xe10,%rax,%rdi
imul   $0x3c,%rcx,%rcx
lea    (%rdx,%rsi,2),%rax
add    %rdi,%rax
add    %rcx,%rax
ret

LLVM IR (-O0):
define i64 @BCDTime(i8* %0) {
%2 = alloca i8*
%3 = alloca i32
%4 = alloca i32
%5 = alloca i32
store i8* %0, i8** %2
%6 = load i8*, i8** %2
%7 = getelementptr inbounds i8, i8* %6, i64 0
%8 = load i8, i8* %7
%9 = zext i8 %8 to i32
%10 = ashr i32 %9, 4
%11 = mul nsw i32 %10, 10
%12 = load i8*, i8** %2
%13 = getelementptr inbounds i8, i8* %12, i64 0
%14 = load i8, i8* %13
%15 = zext i8 %14 to i32
%16 = and i32 %15, 15
%17 = add nsw i32 %11, %16
store i32 %17, i32* %3
%18 = load i8*, i8** %2
%19 = getelementptr inbounds i8, i8* %18, i64 1
%20 = load i8, i8* %19
%21 = zext i8 %20 to i32
%22 = ashr i32 %21, 4
%23 = mul nsw i32 %22, 10
%24 = load i8*, i8** %2
%25 = getelementptr inbounds i8, i8* %24, i64 1
%26 = load i8, i8* %25
%27 = zext i8 %26 to i32
%28 = and i32 %27, 15
%29 = add nsw i32 %23, %28
store i32 %29, i32* %4
%30 = load i8*, i8** %2
%31 = getelementptr inbounds i8, i8* %30, i64 2
%32 = load i8, i8* %31
%33 = zext i8 %32 to i32
%34 = ashr i32 %33, 4
%35 = mul nsw i32 %34, 10
%36 = load i8*, i8** %2
%37 = getelementptr inbounds i8, i8* %36, i64 2
%38 = load i8, i8* %37
%39 = zext i8 %38 to i32
%40 = and i32 %39, 15
%41 = add nsw i32 %35, %40
store i32 %41, i32* %5
%42 = load i32, i32* %3
%43 = mul nsw i32 %42, 3600
%44 = load i32, i32* %4
%45 = mul nsw i32 %44, 60
%46 = add nsw i32 %43, %45
%47 = load i32, i32* %5
%48 = add nsw i32 %46, %47
%49 = sext i32 %48 to i64
ret i64 %49
}

LLVM IR (-O2):
define i64 @BCDTime(i8* nocapture %0) {
%2 = load i8, i8* %0
%3 = zext i8 %2 to i32
%4 = lshr i32 %3, 4
%5 = mul nuw nsw i32 %4, 10
%6 = and i32 %3, 15
%7 = add nuw nsw i32 %5, %6
%8 = getelementptr inbounds i8, i8* %0, i64 1
%9 = load i8, i8* %8
%10 = zext i8 %9 to i32
%11 = lshr i32 %10, 4
%12 = mul nuw nsw i32 %11, 10
%13 = and i32 %10, 15
%14 = add nuw nsw i32 %12, %13
%15 = getelementptr inbounds i8, i8* %0, i64 2
%16 = load i8, i8* %15
%17 = zext i8 %16 to i32
%18 = lshr i32 %17, 4
%19 = mul nuw nsw i32 %18, 10
%20 = and i32 %17, 15
%21 = mul nuw nsw i32 %7, 3600
%22 = mul nuw nsw i32 %14, 60
%23 = add nuw nsw i32 %19, %20
%24 = add nuw nsw i32 %23, %21
%25 = add nuw nsw i32 %24, %22
%26 = zext i32 %25 to i64
ret i64 %26
}