int ti_trunc(int size, double const *const *inputs, double const *options,
             double *const *outputs) {
  const double *in1 = inputs[0];
  (void)options;
  double *output = outputs[0];
  int i;
  for (i = 0; i < size; ++i) {
    output[i] = ((int)(in1[i]));
  }
  return 0;
}


x86 assembly (clang, -O0):
<ti_trunc>:
push   %rbp
mov    %rsp,%rbp
mov    %edi,-0x4(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %rcx,-0x20(%rbp)
mov    -0x10(%rbp),%rax
mov    (%rax),%rax
mov    %rax,-0x28(%rbp)
mov    -0x20(%rbp),%rax
mov    (%rax),%rax
mov    %rax,-0x30(%rbp)
movl   $0x0,-0x34(%rbp)
mov    -0x34(%rbp),%eax
cmp    -0x4(%rbp),%eax
jge    1168 <ti_trunc+0x68>
mov    -0x28(%rbp),%rax
movslq -0x34(%rbp),%rcx
cvttsd2si (%rax,%rcx,8),%eax
cvtsi2sd %eax,%xmm0
mov    -0x30(%rbp),%rax
movslq -0x34(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x34(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x34(%rbp)
jmp    1130 <ti_trunc+0x30>
xor    %eax,%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<ti_trunc>:
test   %edi,%edi
jle    1287 <ti_trunc+0x187>
mov    (%rsi),%rax
mov    (%rcx),%rcx
mov    %edi,%r9d
cmp    $0x4,%edi
jb     1130 <ti_trunc+0x30>
lea    (%rax,%r9,8),%rdx
cmp    %rdx,%rcx
jae    11d8 <ti_trunc+0xd8>
lea    (%rcx,%r9,8),%rdx
cmp    %rdx,%rax
jae    11d8 <ti_trunc+0xd8>
xor    %esi,%esi
mov    %rsi,%rdx
not    %rdx
add    %r9,%rdx
mov    %r9,%rdi
and    $0x3,%rdi
je     116b <ti_trunc+0x6b>
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
movsd  (%rax,%rsi,8),%xmm0
cvttpd2dq %xmm0,%xmm0
cvtdq2pd %xmm0,%xmm0
movlps %xmm0,(%rcx,%rsi,8)
add    $0x1,%rsi
add    $0xffffffffffffffff,%rdi
jne    1150 <ti_trunc+0x50>
cmp    $0x3,%rdx
jb     1287 <ti_trunc+0x187>
cs nopw 0x0(%rax,%rax,1)
nop
movsd  (%rax,%rsi,8),%xmm0
cvttpd2dq %xmm0,%xmm0
cvtdq2pd %xmm0,%xmm0
movlps %xmm0,(%rcx,%rsi,8)
movsd  0x8(%rax,%rsi,8),%xmm0
cvttpd2dq %xmm0,%xmm0
cvtdq2pd %xmm0,%xmm0
movlps %xmm0,0x8(%rcx,%rsi,8)
movsd  0x10(%rax,%rsi,8),%xmm0
cvttpd2dq %xmm0,%xmm0
cvtdq2pd %xmm0,%xmm0
movlps %xmm0,0x10(%rcx,%rsi,8)
movsd  0x18(%rax,%rsi,8),%xmm0
cvttpd2dq %xmm0,%xmm0
cvtdq2pd %xmm0,%xmm0
movlps %xmm0,0x18(%rcx,%rsi,8)
add    $0x4,%rsi
cmp    %rsi,%r9
jne    1180 <ti_trunc+0x80>
jmp    1287 <ti_trunc+0x187>
mov    %r9d,%esi
and    $0xfffffffc,%esi
lea    -0x4(%rsi),%rdx
mov    %rdx,%r8
shr    $0x2,%r8
add    $0x1,%r8
test   %rdx,%rdx
je     128a <ti_trunc+0x18a>
mov    %r8,%rdx
and    $0xfffffffffffffffe,%rdx
xor    %edi,%edi
nop
movupd (%rax,%rdi,8),%xmm0
movupd 0x10(%rax,%rdi,8),%xmm1
cvttpd2dq %xmm0,%xmm0
cvttpd2dq %xmm1,%xmm1
cvtdq2pd %xmm0,%xmm0
cvtdq2pd %xmm1,%xmm1
movups %xmm0,(%rcx,%rdi,8)
movups %xmm1,0x10(%rcx,%rdi,8)
movupd 0x20(%rax,%rdi,8),%xmm0
movupd 0x30(%rax,%rdi,8),%xmm1
cvttpd2dq %xmm0,%xmm0
cvttpd2dq %xmm1,%xmm1
cvtdq2pd %xmm0,%xmm0
cvtdq2pd %xmm1,%xmm1
movups %xmm0,0x20(%rcx,%rdi,8)
movups %xmm1,0x30(%rcx,%rdi,8)
add    $0x8,%rdi
add    $0xfffffffffffffffe,%rdx
jne    1200 <ti_trunc+0x100>
test   $0x1,%r8b
je     127e <ti_trunc+0x17e>
movupd (%rax,%rdi,8),%xmm0
movupd 0x10(%rax,%rdi,8),%xmm1
cvttpd2dq %xmm0,%xmm0
cvttpd2dq %xmm1,%xmm1
cvtdq2pd %xmm0,%xmm0
cvtdq2pd %xmm1,%xmm1
movups %xmm0,(%rcx,%rdi,8)
movups %xmm1,0x10(%rcx,%rdi,8)
cmp    %r9,%rsi
jne    1132 <ti_trunc+0x32>
xor    %eax,%eax
ret
xor    %edi,%edi
test   $0x1,%r8b
jne    125a <ti_trunc+0x15a>
jmp    127e <ti_trunc+0x17e>

LLVM IR (-O0):
define i32 @ti_trunc(i32 %0, double** %1, double* %2, double** %3) {
%5 = alloca i32
%6 = alloca double**
%7 = alloca double*
%8 = alloca double**
%9 = alloca double*
%10 = alloca double*
%11 = alloca i32
store i32 %0, i32* %5
store double** %1, double*** %6
store double* %2, double** %7
store double** %3, double*** %8
%12 = load double**, double*** %6
%13 = getelementptr inbounds double*, double** %12, i64 0
%14 = load double*, double** %13
store double* %14, double** %9
%15 = load double*, double** %7
%16 = load double**, double*** %8
%17 = getelementptr inbounds double*, double** %16, i64 0
%18 = load double*, double** %17
store double* %18, double** %10
store i32 0, i32* %11
br label %19
19: ; preds = %35, %4
%20 = load i32, i32* %11
%21 = load i32, i32* %5
%22 = icmp slt i32 %20, %21
br i1 %22, label %23, label %38
23: ; preds = %19
%24 = load double*, double** %9
%25 = load i32, i32* %11
%26 = sext i32 %25 to i64
%27 = getelementptr inbounds double, double* %24, i64 %26
%28 = load double, double* %27
%29 = fptosi double %28 to i32
%30 = sitofp i32 %29 to double
%31 = load double*, double** %10
%32 = load i32, i32* %11
%33 = sext i32 %32 to i64
%34 = getelementptr inbounds double, double* %31, i64 %33
store double %30, double* %34
br label %35
35: ; preds = %23
%36 = load i32, i32* %11
%37 = add nsw i32 %36, 1
store i32 %37, i32* %11
br label %19
38: ; preds = %19
ret i32 0
}

LLVM IR (-O2):
define i32 @ti_trunc(i32 %0, double** nocapture %1, double* nocapture readnone %2, double** nocapture %3) {
%5 = load double*, double** %1
%6 = load double*, double** %3
%7 = icmp sgt i32 %0, 0
br i1 %7, label %8, label %128
8: ; preds = %4
%9 = zext i32 %0 to i64
%10 = icmp ult i32 %0, 4
br i1 %10, label %81, label %11
11: ; preds = %8
%12 = getelementptr double, double* %6, i64 %9
%13 = getelementptr double, double* %5, i64 %9
%14 = icmp ult double* %6, %13
%15 = icmp ult double* %5, %12
%16 = and i1 %14, %15
br i1 %16, label %81, label %17
17: ; preds = %11
%18 = and i64 %9, 4294967292
%19 = add nsw i64 %18, -4
%20 = lshr exact i64 %19, 2
%21 = add nuw nsw i64 %20, 1
%22 = and i64 %21, 1
%23 = icmp eq i64 %19, 0
br i1 %23, label %61, label %24
24: ; preds = %17
%25 = and i64 %21, 9223372036854775806
br label %26
26: ; preds = %26, %24
%27 = phi i64 [ 0, %24 ], [ %58, %26 ]
%28 = phi i64 [ 0, %24 ], [ %59, %26 ]
%29 = getelementptr inbounds double, double* %5, i64 %27
%30 = bitcast double* %29 to <2 x double>*
%31 = load <2 x double>, <2 x double>* %30
%32 = getelementptr inbounds double, double* %29, i64 2
%33 = bitcast double* %32 to <2 x double>*
%34 = load <2 x double>, <2 x double>* %33
%35 = fptosi <2 x double> %31 to <2 x i32>
%36 = fptosi <2 x double> %34 to <2 x i32>
%37 = sitofp <2 x i32> %35 to <2 x double>
%38 = sitofp <2 x i32> %36 to <2 x double>
%39 = getelementptr inbounds double, double* %6, i64 %27
%40 = bitcast double* %39 to <2 x double>*
store <2 x double> %37, <2 x double>* %40
%41 = getelementptr inbounds double, double* %39, i64 2
%42 = bitcast double* %41 to <2 x double>*
store <2 x double> %38, <2 x double>* %42
%43 = or i64 %27, 4
%44 = getelementptr inbounds double, double* %5, i64 %43
%45 = bitcast double* %44 to <2 x double>*
%46 = load <2 x double>, <2 x double>* %45
%47 = getelementptr inbounds double, double* %44, i64 2
%48 = bitcast double* %47 to <2 x double>*
%49 = load <2 x double>, <2 x double>* %48
%50 = fptosi <2 x double> %46 to <2 x i32>
%51 = fptosi <2 x double> %49 to <2 x i32>
%52 = sitofp <2 x i32> %50 to <2 x double>
%53 = sitofp <2 x i32> %51 to <2 x double>
%54 = getelementptr inbounds double, double* %6, i64 %43
%55 = bitcast double* %54 to <2 x double>*
store <2 x double> %52, <2 x double>* %55
%56 = getelementptr inbounds double, double* %54, i64 2
%57 = bitcast double* %56 to <2 x double>*
store <2 x double> %53, <2 x double>* %57
%58 = add nuw i64 %27, 8
%59 = add i64 %28, 2
%60 = icmp eq i64 %59, %25
br i1 %60, label %61, label %26
61: ; preds = %26, %17
%62 = phi i64 [ 0, %17 ], [ %58, %26 ]
%63 = icmp eq i64 %22, 0
br i1 %63, label %79, label %64
64: ; preds = %61
%65 = getelementptr inbounds double, double* %5, i64 %62
%66 = bitcast double* %65 to <2 x double>*
%67 = load <2 x double>, <2 x double>* %66
%68 = getelementptr inbounds double, double* %65, i64 2
%69 = bitcast double* %68 to <2 x double>*
%70 = load <2 x double>, <2 x double>* %69
%71 = fptosi <2 x double> %67 to <2 x i32>
%72 = fptosi <2 x double> %70 to <2 x i32>
%73 = sitofp <2 x i32> %71 to <2 x double>
%74 = sitofp <2 x i32> %72 to <2 x double>
%75 = getelementptr inbounds double, double* %6, i64 %62
%76 = bitcast double* %75 to <2 x double>*
store <2 x double> %73, <2 x double>* %76
%77 = getelementptr inbounds double, double* %75, i64 2
%78 = bitcast double* %77 to <2 x double>*
store <2 x double> %74, <2 x double>* %78
br label %79
79: ; preds = %61, %64
%80 = icmp eq i64 %18, %9
br i1 %80, label %128, label %81
81: ; preds = %11, %8, %79
%82 = phi i64 [ 0, %11 ], [ 0, %8 ], [ %18, %79 ]
%83 = xor i64 %82, -1
%84 = add nsw i64 %83, %9
%85 = and i64 %9, 3
%86 = icmp eq i64 %85, 0
br i1 %86, label %98, label %87
87: ; preds = %81, %87
%88 = phi i64 [ %95, %87 ], [ %82, %81 ]
%89 = phi i64 [ %96, %87 ], [ 0, %81 ]
%90 = getelementptr inbounds double, double* %5, i64 %88
%91 = load double, double* %90
%92 = fptosi double %91 to i32
%93 = sitofp i32 %92 to double
%94 = getelementptr inbounds double, double* %6, i64 %88
store double %93, double* %94
%95 = add nuw nsw i64 %88, 1
%96 = add i64 %89, 1
%97 = icmp eq i64 %96, %85
br i1 %97, label %98, label %87
98: ; preds = %87, %81
%99 = phi i64 [ %82, %81 ], [ %95, %87 ]
%100 = icmp ult i64 %84, 3
br i1 %100, label %128, label %101
101: ; preds = %98, %101
%102 = phi i64 [ %126, %101 ], [ %99, %98 ]
%103 = getelementptr inbounds double, double* %5, i64 %102
%104 = load double, double* %103
%105 = fptosi double %104 to i32
%106 = sitofp i32 %105 to double
%107 = getelementptr inbounds double, double* %6, i64 %102
store double %106, double* %107
%108 = add nuw nsw i64 %102, 1
%109 = getelementptr inbounds double, double* %5, i64 %108
%110 = load double, double* %109
%111 = fptosi double %110 to i32
%112 = sitofp i32 %111 to double
%113 = getelementptr inbounds double, double* %6, i64 %108
store double %112, double* %113
%114 = add nuw nsw i64 %102, 2
%115 = getelementptr inbounds double, double* %5, i64 %114
%116 = load double, double* %115
%117 = fptosi double %116 to i32
%118 = sitofp i32 %117 to double
%119 = getelementptr inbounds double, double* %6, i64 %114
store double %118, double* %119
%120 = add nuw nsw i64 %102, 3
%121 = getelementptr inbounds double, double* %5, i64 %120
%122 = load double, double* %121
%123 = fptosi double %122 to i32
%124 = sitofp i32 %123 to double
%125 = getelementptr inbounds double, double* %6, i64 %120
store double %124, double* %125
%126 = add nuw nsw i64 %102, 4
%127 = icmp eq i64 %126, %9
br i1 %127, label %128, label %101
128: ; preds = %98, %101, %79, %4
ret i32 0
}