int jan1(int yr) {
  int y, d;
  y = yr + 1900;
  d = 4 + y + (y + 3) / 4;
  if (y > 1800) {
    d -= (y - 1701) / 100;
    d += (y - 1601) / 400;
  }
  if (y > 1752)
    d += 3;
  return (d % 7);
}


x86 assembly (clang, -O0):
<jan1>:
push   %rbp
mov    %rsp,%rbp
mov    %edi,-0x4(%rbp)
mov    -0x4(%rbp),%eax
add    $0x76c,%eax
mov    %eax,-0x8(%rbp)
mov    -0x8(%rbp),%eax
add    $0x4,%eax
mov    %eax,-0x10(%rbp)
mov    -0x8(%rbp),%eax
add    $0x3,%eax
mov    $0x4,%ecx
cltd
idiv   %ecx
mov    %eax,%ecx
mov    -0x10(%rbp),%eax
add    %ecx,%eax
mov    %eax,-0xc(%rbp)
cmpl   $0x708,-0x8(%rbp)
jle    1170 <jan1+0x70>
mov    -0x8(%rbp),%eax
sub    $0x6a5,%eax
mov    $0x64,%ecx
cltd
idiv   %ecx
mov    %eax,%ecx
mov    -0xc(%rbp),%eax
sub    %ecx,%eax
mov    %eax,-0xc(%rbp)
mov    -0x8(%rbp),%eax
sub    $0x641,%eax
mov    $0x190,%ecx
cltd
idiv   %ecx
add    -0xc(%rbp),%eax
mov    %eax,-0xc(%rbp)
cmpl   $0x6d8,-0x8(%rbp)
jle    1186 <jan1+0x86>
mov    -0xc(%rbp),%eax
add    $0x3,%eax
mov    %eax,-0xc(%rbp)
mov    -0xc(%rbp),%eax
mov    $0x7,%ecx
cltd
idiv   %ecx
mov    %edx,%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<jan1>:
lea    0x76f(%rdi),%eax
lea    0x772(%rdi),%ecx
test   %eax,%eax
cmovns %eax,%ecx
sar    $0x2,%ecx
lea    (%rdi,%rcx,1),%eax
add    $0x770,%eax
cmp    $0xffffff9d,%edi
jl     1149 <jan1+0x49>
lea    0xc7(%rdi),%ecx
imul   $0x51eb851f,%rcx,%rcx
shr    $0x25,%rcx
lea    0x12b(%rdi),%edx
imul   $0x51eb851f,%rdx,%rdx
shr    $0x27,%rdx
sub    %ecx,%edx
add    %eax,%edx
mov    %edx,%eax
lea    0x3(%rax),%ecx
cmp    $0xffffff6d,%edi
cmovl  %eax,%ecx
movslq %ecx,%rcx
imul   $0xffffffff92492493,%rcx,%rax
shr    $0x20,%rax
add    %ecx,%eax
mov    %eax,%edx
shr    $0x1f,%edx
sar    $0x2,%eax
add    %edx,%eax
lea    0x0(,%rax,8),%edx
sub    %edx,%eax
add    %ecx,%eax
ret

LLVM IR (-O0):
define i32 @jan1(i32 %0) {
%2 = alloca i32
%3 = alloca i32
%4 = alloca i32
store i32 %0, i32* %2
%5 = load i32, i32* %2
%6 = add nsw i32 %5, 1900
store i32 %6, i32* %3
%7 = load i32, i32* %3
%8 = add nsw i32 4, %7
%9 = load i32, i32* %3
%10 = add nsw i32 %9, 3
%11 = sdiv i32 %10, 4
%12 = add nsw i32 %8, %11
store i32 %12, i32* %4
%13 = load i32, i32* %3
%14 = icmp sgt i32 %13, 1800
br i1 %14, label %15, label %26
15: ; preds = %1
%16 = load i32, i32* %3
%17 = sub nsw i32 %16, 1701
%18 = sdiv i32 %17, 100
%19 = load i32, i32* %4
%20 = sub nsw i32 %19, %18
store i32 %20, i32* %4
%21 = load i32, i32* %3
%22 = sub nsw i32 %21, 1601
%23 = sdiv i32 %22, 400
%24 = load i32, i32* %4
%25 = add nsw i32 %24, %23
store i32 %25, i32* %4
br label %26
26: ; preds = %15, %1
%27 = load i32, i32* %3
%28 = icmp sgt i32 %27, 1752
br i1 %28, label %29, label %32
29: ; preds = %26
%30 = load i32, i32* %4
%31 = add nsw i32 %30, 3
store i32 %31, i32* %4
br label %32
32: ; preds = %29, %26
%33 = load i32, i32* %4
%34 = srem i32 %33, 7
ret i32 %34
}

LLVM IR (-O2):
define i32 @jan1(i32 %0) {
%2 = add nsw i32 %0, 1904
%3 = add nsw i32 %0, 1903
%4 = sdiv i32 %3, 4
%5 = add nsw i32 %2, %4
%6 = icmp sgt i32 %0, -100
br i1 %6, label %7, label %14
7: ; preds = %1
%8 = add nsw i32 %0, 199
%9 = udiv i32 %8, 100
%10 = add nsw i32 %0, 299
%11 = udiv i32 %10, 400
%12 = sub nsw i32 %11, %9
%13 = add i32 %12, %5
br label %14
14: ; preds = %7, %1
%15 = phi i32 [ %13, %7 ], [ %5, %1 ]
%16 = icmp sgt i32 %0, -148
%17 = add nsw i32 %15, 3
%18 = select i1 %16, i32 %17, i32 %15
%19 = srem i32 %18, 7
ret i32 %19
}