void caldat(long julian, int *mm, int *id, int *iyyy) {
  long ja, jalpha, jb, jc, jd, je;
  if (julian >= 2299161) {
    jalpha = (long)(((float)(julian - 1867216) - 0.25) / 36524.25);
    ja = julian + 1 + jalpha - (long)(0.25 * jalpha);
  } else
    ja = julian;
  jb = ja + 1524;
  jc = (long)(6680.0 + ((float)(jb - 2439870) - 122.1) / 365.25);
  jd = (long)(365 * jc + (0.25 * jc));
  je = (long)((jb - jd) / 30.6001);
  *id = jb - jd - (long)(30.6001 * je);
  *mm = je - 1;
  if (*mm > 12)
    *mm -= 12;
  *iyyy = jc - 4715;
  if (*mm > 2)
    --(*iyyy);
  if (*iyyy <= 0)
    --(*iyyy);
}


x86 assembly (clang, -O0):
<caldat>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %rcx,-0x20(%rbp)
cmpq   $0x231519,-0x8(%rbp)
jl     1185 <caldat+0x85>
mov    -0x8(%rbp),%rax
sub    $0x1c7dd0,%rax
cvtsi2ss %rax,%xmm0
cvtss2sd %xmm0,%xmm0
movsd  0xec3(%rip),%xmm1
subsd  %xmm1,%xmm0
movsd  0xebf(%rip),%xmm1
divsd  %xmm1,%xmm0
cvttsd2si %xmm0,%rax
mov    %rax,-0x30(%rbp)
mov    -0x8(%rbp),%rax
add    $0x1,%rax
add    -0x30(%rbp),%rax
cvtsi2sdq -0x30(%rbp),%xmm1
movsd  0xe90(%rip),%xmm0
mulsd  %xmm1,%xmm0
cvttsd2si %xmm0,%rcx
sub    %rcx,%rax
mov    %rax,-0x28(%rbp)
jmp    118d <caldat+0x8d>
mov    -0x8(%rbp),%rax
mov    %rax,-0x28(%rbp)
mov    -0x28(%rbp),%rax
add    $0x5f4,%rax
mov    %rax,-0x38(%rbp)
mov    -0x38(%rbp),%rax
sub    $0x253abe,%rax
cvtsi2ss %rax,%xmm0
cvtss2sd %xmm0,%xmm1
movsd  0xe72(%rip),%xmm0
subsd  %xmm0,%xmm1
movsd  0xe5e(%rip),%xmm0
divsd  %xmm0,%xmm1
movsd  0xe4a(%rip),%xmm0
addsd  %xmm1,%xmm0
cvttsd2si %xmm0,%rax
mov    %rax,-0x40(%rbp)
imul   $0x16d,-0x40(%rbp),%rax
cvtsi2sd %rax,%xmm1
cvtsi2sdq -0x40(%rbp),%xmm0
movsd  0xe0a(%rip),%xmm2
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
cvttsd2si %xmm0,%rax
mov    %rax,-0x48(%rbp)
mov    -0x38(%rbp),%rax
sub    -0x48(%rbp),%rax
cvtsi2sd %rax,%xmm0
movsd  0xdf4(%rip),%xmm1
divsd  %xmm1,%xmm0
cvttsd2si %xmm0,%rax
mov    %rax,-0x50(%rbp)
mov    -0x38(%rbp),%rax
sub    -0x48(%rbp),%rax
cvtsi2sdq -0x50(%rbp),%xmm1
movsd  0xdd1(%rip),%xmm0
mulsd  %xmm1,%xmm0
cvttsd2si %xmm0,%rcx
sub    %rcx,%rax
mov    %eax,%ecx
mov    -0x18(%rbp),%rax
mov    %ecx,(%rax)
mov    -0x50(%rbp),%rax
sub    $0x1,%rax
mov    %eax,%ecx
mov    -0x10(%rbp),%rax
mov    %ecx,(%rax)
mov    -0x10(%rbp),%rax
cmpl   $0xc,(%rax)
jle    127b <caldat+0x17b>
mov    -0x10(%rbp),%rax
mov    (%rax),%ecx
sub    $0xc,%ecx
mov    %ecx,(%rax)
mov    -0x40(%rbp),%rax
sub    $0x126b,%rax
mov    %eax,%ecx
mov    -0x20(%rbp),%rax
mov    %ecx,(%rax)
mov    -0x10(%rbp),%rax
cmpl   $0x2,(%rax)
jle    12a5 <caldat+0x1a5>
mov    -0x20(%rbp),%rax
mov    (%rax),%ecx
add    $0xffffffff,%ecx
mov    %ecx,(%rax)
mov    -0x20(%rbp),%rax
cmpl   $0x0,(%rax)
jg     12bd <caldat+0x1bd>
mov    -0x20(%rbp),%rax
mov    (%rax),%ecx
add    $0xffffffff,%ecx
mov    %ecx,(%rax)
pop    %rbp
ret

x86 assembly (clang, -O2):
<caldat>:
cmp    $0x231519,%rdi
jl     114d <caldat+0x4d>
lea    -0x1c7dd0(%rdi),%rax
cvtsi2ss %rax,%xmm0
cvtss2sd %xmm0,%xmm0
addsd  0xedf(%rip),%xmm0
divsd  0xedf(%rip),%xmm0
cvttsd2si %xmm0,%rax
add    %rax,%rdi
xorps  %xmm0,%xmm0
cvtsi2sd %rax,%xmm0
mulsd  0xecf(%rip),%xmm0
cvttsd2si %xmm0,%rax
sub    %rax,%rdi
add    $0x1,%rdi
lea    -0x2534ca(%rdi),%rax
xorps  %xmm0,%xmm0
cvtsi2ss %rax,%xmm0
cvtss2sd %xmm0,%xmm0
addsd  0xeb0(%rip),%xmm0
divsd  0xeb0(%rip),%xmm0
addsd  0xeb0(%rip),%xmm0
cvttsd2si %xmm0,%r8
imul   $0x16d,%r8,%rax
xorps  %xmm0,%xmm0
cvtsi2sd %rax,%xmm0
cvtsi2sd %r8,%xmm1
mulsd  0xe77(%rip),%xmm1
addsd  %xmm0,%xmm1
cvttsd2si %xmm1,%rax
neg    %rax
lea    (%rdi,%rax,1),%r9
add    $0x5f4,%r9
xorps  %xmm0,%xmm0
cvtsi2sd %r9,%xmm0
movsd  0xe70(%rip),%xmm1
divsd  %xmm1,%xmm0
cvttsd2si %xmm0,%rdi
xorps  %xmm0,%xmm0
cvtsi2sd %rdi,%xmm0
mulsd  %xmm1,%xmm0
cvttsd2si %xmm0,%rax
sub    %eax,%r9d
mov    %r9d,(%rdx)
lea    -0x1(%rdi),%eax
add    $0xfffffff3,%edi
cmp    $0xd,%eax
cmovl  %eax,%edi
mov    %edi,(%rsi)
lea    -0x126b(%r8),%eax
mov    %eax,(%rcx)
mov    (%rsi),%edx
add    $0xffffed94,%r8d
cmp    $0x3,%edx
cmovl  %eax,%r8d
jge    120f <caldat+0x10f>
test   %r8d,%r8d
jle    120f <caldat+0x10f>
ret
xor    %eax,%eax
test   %r8d,%r8d
setle  %al
sub    %eax,%r8d
mov    %r8d,(%rcx)
ret

LLVM IR (-O0):
define void @caldat(i64 %0, i32* %1, i32* %2, i32* %3) {
%5 = alloca i64
%6 = alloca i32*
%7 = alloca i32*
%8 = alloca i32*
%9 = alloca i64
%10 = alloca i64
%11 = alloca i64
%12 = alloca i64
%13 = alloca i64
%14 = alloca i64
store i64 %0, i64* %5
store i32* %1, i32** %6
store i32* %2, i32** %7
store i32* %3, i32** %8
%15 = load i64, i64* %5
%16 = icmp sge i64 %15, 2299161
br i1 %16, label %17, label %34
17: ; preds = %4
%18 = load i64, i64* %5
%19 = sub nsw i64 %18, 1867216
%20 = sitofp i64 %19 to float
%21 = fpext float %20 to double
%22 = fsub double %21, 2.500000e-01
%23 = fdiv double %22, 0x40E1D58800000000
%24 = fptosi double %23 to i64
store i64 %24, i64* %10
%25 = load i64, i64* %5
%26 = add nsw i64 %25, 1
%27 = load i64, i64* %10
%28 = add nsw i64 %26, %27
%29 = load i64, i64* %10
%30 = sitofp i64 %29 to double
%31 = fmul double 2.500000e-01, %30
%32 = fptosi double %31 to i64
%33 = sub nsw i64 %28, %32
store i64 %33, i64* %9
br label %36
34: ; preds = %4
%35 = load i64, i64* %5
store i64 %35, i64* %9
br label %36
36: ; preds = %34, %17
%37 = load i64, i64* %9
%38 = add nsw i64 %37, 1524
store i64 %38, i64* %11
%39 = load i64, i64* %11
%40 = sub nsw i64 %39, 2439870
%41 = sitofp i64 %40 to float
%42 = fpext float %41 to double
%43 = fsub double %42, 1.221000e+02
%44 = fdiv double %43, 3.652500e+02
%45 = fadd double 6.680000e+03, %44
%46 = fptosi double %45 to i64
store i64 %46, i64* %12
%47 = load i64, i64* %12
%48 = mul nsw i64 365, %47
%49 = sitofp i64 %48 to double
%50 = load i64, i64* %12
%51 = sitofp i64 %50 to double
%52 = call double @llvm.fmuladd.f64(double 2.500000e-01, double %51, double %49)
%53 = fptosi double %52 to i64
store i64 %53, i64* %13
%54 = load i64, i64* %11
%55 = load i64, i64* %13
%56 = sub nsw i64 %54, %55
%57 = sitofp i64 %56 to double
%58 = fdiv double %57, 3.060010e+01
%59 = fptosi double %58 to i64
store i64 %59, i64* %14
%60 = load i64, i64* %11
%61 = load i64, i64* %13
%62 = sub nsw i64 %60, %61
%63 = load i64, i64* %14
%64 = sitofp i64 %63 to double
%65 = fmul double 3.060010e+01, %64
%66 = fptosi double %65 to i64
%67 = sub nsw i64 %62, %66
%68 = trunc i64 %67 to i32
%69 = load i32*, i32** %7
store i32 %68, i32* %69
%70 = load i64, i64* %14
%71 = sub nsw i64 %70, 1
%72 = trunc i64 %71 to i32
%73 = load i32*, i32** %6
store i32 %72, i32* %73
%74 = load i32*, i32** %6
%75 = load i32, i32* %74
%76 = icmp sgt i32 %75, 12
br i1 %76, label %77, label %81
77: ; preds = %36
%78 = load i32*, i32** %6
%79 = load i32, i32* %78
%80 = sub nsw i32 %79, 12
store i32 %80, i32* %78
br label %81
81: ; preds = %77, %36
%82 = load i64, i64* %12
%83 = sub nsw i64 %82, 4715
%84 = trunc i64 %83 to i32
%85 = load i32*, i32** %8
store i32 %84, i32* %85
%86 = load i32*, i32** %6
%87 = load i32, i32* %86
%88 = icmp sgt i32 %87, 2
br i1 %88, label %89, label %93
89: ; preds = %81
%90 = load i32*, i32** %8
%91 = load i32, i32* %90
%92 = add nsw i32 %91, -1
store i32 %92, i32* %90
br label %93
93: ; preds = %89, %81
%94 = load i32*, i32** %8
%95 = load i32, i32* %94
%96 = icmp sle i32 %95, 0
br i1 %96, label %97, label %101
97: ; preds = %93
%98 = load i32*, i32** %8
%99 = load i32, i32* %98
%100 = add nsw i32 %99, -1
store i32 %100, i32* %98
br label %101
101: ; preds = %97, %93
ret void
}

LLVM IR (-O2):
define void @caldat(i64 %0, i32* nocapture %1, i32* nocapture writeonly %2, i32* nocapture %3) {
%5 = icmp sgt i64 %0, 2299160
br i1 %5, label %6, label %19
6: ; preds = %4
%7 = add nsw i64 %0, -1867216
%8 = sitofp i64 %7 to float
%9 = fpext float %8 to double
%10 = fadd double %9, -2.500000e-01
%11 = fdiv double %10, 0x40E1D58800000000
%12 = fptosi double %11 to i64
%13 = add nuw nsw i64 %0, 1
%14 = add nsw i64 %13, %12
%15 = sitofp i64 %12 to double
%16 = fmul double %15, 2.500000e-01
%17 = fptosi double %16 to i64
%18 = sub i64 %14, %17
br label %19
19: ; preds = %4, %6
%20 = phi i64 [ %18, %6 ], [ %0, %4 ]
%21 = add nsw i64 %20, 1524
%22 = add nsw i64 %20, -2438346
%23 = sitofp i64 %22 to float
%24 = fpext float %23 to double
%25 = fadd double %24, -1.221000e+02
%26 = fdiv double %25, 3.652500e+02
%27 = fadd double %26, 6.680000e+03
%28 = fptosi double %27 to i64
%29 = mul nsw i64 %28, 365
%30 = sitofp i64 %29 to double
%31 = sitofp i64 %28 to double
%32 = tail call double @llvm.fmuladd.f64(double %31, double 2.500000e-01, double %30)
%33 = fptosi double %32 to i64
%34 = sub i64 %21, %33
%35 = sitofp i64 %34 to double
%36 = fdiv double %35, 3.060010e+01
%37 = fptosi double %36 to i64
%38 = sitofp i64 %37 to double
%39 = fmul double %38, 3.060010e+01
%40 = fptosi double %39 to i64
%41 = sub nsw i64 %34, %40
%42 = trunc i64 %41 to i32
store i32 %42, i32* %2
%43 = trunc i64 %37 to i32
%44 = add i32 %43, -1
%45 = icmp sgt i32 %44, 12
%46 = add i32 %43, -13
%47 = select i1 %45, i32 %46, i32 %44
store i32 %47, i32* %1
%48 = trunc i64 %28 to i32
%49 = add i32 %48, -4715
store i32 %49, i32* %3
%50 = load i32, i32* %1
%51 = icmp sgt i32 %50, 2
%52 = add i32 %48, -4716
%53 = select i1 %51, i32 %52, i32 %49
%54 = icmp slt i32 %53, 1
%55 = or i1 %51, %54
br i1 %55, label %56, label %59
56: ; preds = %19
%57 = sext i1 %54 to i32
%58 = add nsw i32 %53, %57
store i32 %58, i32* %3
br label %59
59: ; preds = %19, %56
ret void
}