int cal_lm(mo, yr)
int mo, yr;
{
  int d, nd, mt[] = {0, 21, 59, 90, 120, 151, 181, 212, 243, 273, 304, 334};
  if (yr < 1901 || mo < 1 || mo > 12)
    return (7);
  d = yr - 1901;
  nd = d * 365;
  nd += ((d / 4) - (d / 100) + (d / 400)) + mt[mo - 1];
  if ((yr % 4) == 0 && mo > 2)
    nd++;
  return ((nd + 2) % 7);
}


x86 assembly (clang, -O0):
<cal_lm>:
push   %rbp
mov    %rsp,%rbp
sub    $0x60,%rsp
mov    %edi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
lea    -0x50(%rbp),%rdi
lea    0xed7(%rip),%rsi
mov    $0x30,%edx
call   1030 <memcpy@plt>
cmpl   $0x76d,-0xc(%rbp)
jl     1154 <cal_lm+0x44>
cmpl   $0x1,-0x8(%rbp)
jl     1154 <cal_lm+0x44>
cmpl   $0xc,-0x8(%rbp)
jle    1160 <cal_lm+0x50>
movl   $0x7,-0x4(%rbp)
jmp    11f5 <cal_lm+0xe5>
mov    -0xc(%rbp),%eax
sub    $0x76d,%eax
mov    %eax,-0x10(%rbp)
imul   $0x16d,-0x10(%rbp),%eax
mov    %eax,-0x14(%rbp)
mov    -0x10(%rbp),%eax
mov    $0x4,%ecx
cltd
idiv   %ecx
mov    %eax,-0x58(%rbp)
mov    -0x10(%rbp),%eax
mov    $0x64,%ecx
cltd
idiv   %ecx
mov    %eax,%ecx
mov    -0x58(%rbp),%eax
sub    %ecx,%eax
mov    %eax,-0x54(%rbp)
mov    -0x10(%rbp),%eax
mov    $0x190,%ecx
cltd
idiv   %ecx
mov    %eax,%ecx
mov    -0x54(%rbp),%eax
add    %ecx,%eax
mov    -0x8(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
add    -0x50(%rbp,%rcx,4),%eax
add    -0x14(%rbp),%eax
mov    %eax,-0x14(%rbp)
mov    -0xc(%rbp),%eax
mov    $0x4,%ecx
cltd
idiv   %ecx
cmp    $0x0,%edx
jne    11e4 <cal_lm+0xd4>
cmpl   $0x2,-0x8(%rbp)
jle    11e4 <cal_lm+0xd4>
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
mov    -0x14(%rbp),%eax
add    $0x2,%eax
mov    $0x7,%ecx
cltd
idiv   %ecx
mov    %edx,-0x4(%rbp)
mov    -0x4(%rbp),%eax
add    $0x60,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<cal_lm>:
lea    -0xd(%rdi),%ecx
mov    $0x7,%eax
cmp    $0xfffffff4,%ecx
jb     11a1 <cal_lm+0xa1>
cmp    $0x76d,%esi
jl     11a1 <cal_lm+0xa1>
lea    -0x76d(%rsi),%eax
imul   $0x16d,%eax,%r8d
imul   $0x51eb851f,%rax,%rdx
shr    $0x2,%eax
mov    %rdx,%r10
shr    $0x25,%r10
shr    $0x27,%rdx
lea    -0x1(%rdi),%r9d
lea    0xeb6(%rip),%rcx
mov    (%rcx,%r9,4),%r9d
test   $0x3,%sil
sete   %sil
cmp    $0x3,%edi
setae  %cl
and    %sil,%cl
movzbl %cl,%ecx
sub    %r10d,%eax
add    %edx,%eax
add    %r8d,%eax
add    %ecx,%eax
lea    (%r9,%rax,1),%ecx
add    $0x2,%ecx
add    %r9d,%eax
movslq %ecx,%rcx
imul   $0xffffffff92492493,%rcx,%rcx
shr    $0x20,%rcx
add    %eax,%ecx
add    $0x2,%ecx
mov    %ecx,%edx
shr    $0x1f,%edx
sar    $0x2,%ecx
add    %edx,%ecx
lea    0x0(,%rcx,8),%edx
sub    %edx,%ecx
add    %ecx,%eax
add    $0x2,%eax
ret

LLVM IR (-O0):
@__const.cal_lm.mt = [12 x i32] [i32 0, i32 21, i32 59, i32 90, i32 120, i32 151, i32 181, i32 212, i32 243, i32 273, i32 304, i32 334]
define i32 @cal_lm(i32 %0, i32 %1) {
%3 = alloca i32
%4 = alloca i32
%5 = alloca i32
%6 = alloca i32
%7 = alloca i32
%8 = alloca [12 x i32]
store i32 %0, i32* %4
store i32 %1, i32* %5
%9 = bitcast [12 x i32]* %8 to i8*
%10 = load i32, i32* %5
%11 = icmp slt i32 %10, 1901
br i1 %11, label %18, label %12
12: ; preds = %2
%13 = load i32, i32* %4
%14 = icmp slt i32 %13, 1
br i1 %14, label %18, label %15
15: ; preds = %12
%16 = load i32, i32* %4
%17 = icmp sgt i32 %16, 12
br i1 %17, label %18, label %19
18: ; preds = %15, %12, %2
store i32 7, i32* %3
br label %53
19: ; preds = %15
%20 = load i32, i32* %5
%21 = sub nsw i32 %20, 1901
store i32 %21, i32* %6
%22 = load i32, i32* %6
%23 = mul nsw i32 %22, 365
store i32 %23, i32* %7
%24 = load i32, i32* %6
%25 = sdiv i32 %24, 4
%26 = load i32, i32* %6
%27 = sdiv i32 %26, 100
%28 = sub nsw i32 %25, %27
%29 = load i32, i32* %6
%30 = sdiv i32 %29, 400
%31 = add nsw i32 %28, %30
%32 = load i32, i32* %4
%33 = sub nsw i32 %32, 1
%34 = sext i32 %33 to i64
%35 = getelementptr inbounds [12 x i32], [12 x i32]* %8, i64 0, i64 %34
%36 = load i32, i32* %35
%37 = add nsw i32 %31, %36
%38 = load i32, i32* %7
%39 = add nsw i32 %38, %37
store i32 %39, i32* %7
%40 = load i32, i32* %5
%41 = srem i32 %40, 4
%42 = icmp eq i32 %41, 0
br i1 %42, label %43, label %49
43: ; preds = %19
%44 = load i32, i32* %4
%45 = icmp sgt i32 %44, 2
br i1 %45, label %46, label %49
46: ; preds = %43
%47 = load i32, i32* %7
%48 = add nsw i32 %47, 1
store i32 %48, i32* %7
br label %49
49: ; preds = %46, %43, %19
%50 = load i32, i32* %7
%51 = add nsw i32 %50, 2
%52 = srem i32 %51, 7
store i32 %52, i32* %3
br label %53
53: ; preds = %49, %18
%54 = load i32, i32* %3
ret i32 %54
}

LLVM IR (-O2):
@__const.cal_lm.mt = [12 x i32] [i32 0, i32 21, i32 59, i32 90, i32 120, i32 151, i32 181, i32 212, i32 243, i32 273, i32 304, i32 334]
define i32 @cal_lm(i32 %0, i32 %1) {
%3 = icmp slt i32 %1, 1901
%4 = add i32 %0, -13
%5 = icmp ult i32 %4, -12
%6 = or i1 %5, %3
br i1 %6, label %29, label %7
7: ; preds = %2
%8 = add nsw i32 %1, -1901
%9 = mul nsw i32 %8, 365
%10 = lshr i32 %8, 2
%11 = udiv i32 %8, 100
%12 = udiv i32 %8, 400
%13 = add nsw i32 %0, -1
%14 = zext i32 %13 to i64
%15 = getelementptr inbounds [12 x i32], [12 x i32]* @__const.cal_lm.mt, i64 0, i64 %14
%16 = load i32, i32* %15
%17 = and i32 %1, 3
%18 = icmp eq i32 %17, 0
%19 = icmp ugt i32 %0, 2
%20 = and i1 %19, %18
%21 = zext i1 %20 to i32
%22 = sub nsw i32 2, %11
%23 = add nsw i32 %22, %10
%24 = add nsw i32 %23, %12
%25 = add i32 %24, %9
%26 = add i32 %25, %21
%27 = add i32 %26, %16
%28 = srem i32 %27, 7
br label %29
29: ; preds = %2, %7
%30 = phi i32 [ %28, %7 ], [ 7, %2 ]
ret i32 %30
}