#define NULL ((void *)0)
typedef unsigned long size_t; // Customize by platform.
typedef long intptr_t;
typedef unsigned long uintptr_t;
typedef long scalar_t__; // Either arithmetic or pointer type.
/* By default, we understand bool (as a convenience). */
typedef int bool;
#define false 0
#define true 1

/* Forward declarations */

/* Type definitions */

/* Variables and functions */
scalar_t__ format_double(char *, double);
scalar_t__ sprintf(char *, char *);
int write_four(char *ptr, double one, double two, double three, double four) {
  int index = 0;
  index += sprintf(ptr + index, "   ");
  index += format_double(ptr + index, one);
  index += format_double(ptr + index, two);
  index += format_double(ptr + index, three);
  index += format_double(ptr + index, four);
  index += sprintf(ptr + index, "\n");
  return index;
}


x86 assembly (clang, -O0):
<write_four>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    %rdi,-0x8(%rbp)
movsd  %xmm0,-0x10(%rbp)
movsd  %xmm1,-0x18(%rbp)
movsd  %xmm2,-0x20(%rbp)
movsd  %xmm3,-0x28(%rbp)
movl   $0x0,-0x2c(%rbp)
mov    -0x8(%rbp),%rdi
movslq -0x2c(%rbp),%rax
add    %rax,%rdi
lea    0xea7(%rip),%rsi
call   1040 <sprintf@plt>
mov    %rax,%rcx
movslq -0x2c(%rbp),%rax
add    %rcx,%rax
mov    %eax,-0x2c(%rbp)
mov    -0x8(%rbp),%rdi
movslq -0x2c(%rbp),%rax
add    %rax,%rdi
movsd  -0x10(%rbp),%xmm0
call   1030 <format_double@plt>
mov    %rax,%rcx
movslq -0x2c(%rbp),%rax
add    %rcx,%rax
mov    %eax,-0x2c(%rbp)
mov    -0x8(%rbp),%rdi
movslq -0x2c(%rbp),%rax
add    %rax,%rdi
movsd  -0x18(%rbp),%xmm0
call   1030 <format_double@plt>
mov    %rax,%rcx
movslq -0x2c(%rbp),%rax
add    %rcx,%rax
mov    %eax,-0x2c(%rbp)
mov    -0x8(%rbp),%rdi
movslq -0x2c(%rbp),%rax
add    %rax,%rdi
movsd  -0x20(%rbp),%xmm0
call   1030 <format_double@plt>
mov    %rax,%rcx
movslq -0x2c(%rbp),%rax
add    %rcx,%rax
mov    %eax,-0x2c(%rbp)
mov    -0x8(%rbp),%rdi
movslq -0x2c(%rbp),%rax
add    %rax,%rdi
movsd  -0x28(%rbp),%xmm0
call   1030 <format_double@plt>
mov    %rax,%rcx
movslq -0x2c(%rbp),%rax
add    %rcx,%rax
mov    %eax,-0x2c(%rbp)
mov    -0x8(%rbp),%rdi
movslq -0x2c(%rbp),%rax
add    %rax,%rdi
lea    0xdff(%rip),%rsi
call   1040 <sprintf@plt>
mov    %rax,%rcx
movslq -0x2c(%rbp),%rax
add    %rcx,%rax
mov    %eax,-0x2c(%rbp)
mov    -0x2c(%rbp),%eax
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<write_four>:
push   %r15
push   %r14
push   %rbx
sub    $0x20,%rsp
movsd  %xmm3,0x18(%rsp)
movsd  %xmm2,0x10(%rsp)
movsd  %xmm1,0x8(%rsp)
movsd  %xmm0,(%rsp)
mov    %rdi,%r15
lea    0xeb6(%rip),%rsi
call   1040 <sprintf@plt>
mov    %rax,%r14
movslq %r14d,%rdi
add    %r15,%rdi
movsd  (%rsp),%xmm0
call   1030 <format_double@plt>
mov    %rax,%rbx
add    %r14,%rbx
movslq %ebx,%rdi
add    %r15,%rdi
movsd  0x8(%rsp),%xmm0
call   1030 <format_double@plt>
mov    %rax,%r14
add    %rbx,%r14
movslq %r14d,%rdi
add    %r15,%rdi
movsd  0x10(%rsp),%xmm0
call   1030 <format_double@plt>
mov    %rax,%rbx
add    %r14,%rbx
movslq %ebx,%rdi
add    %r15,%rdi
movsd  0x18(%rsp),%xmm0
call   1030 <format_double@plt>
add    %rbx,%rax
movslq %eax,%rbx
add    %rbx,%r15
lea    0xe4d(%rip),%rsi
mov    %r15,%rdi
call   1040 <sprintf@plt>
add    %ebx,%eax
add    $0x20,%rsp
pop    %rbx
pop    %r14
pop    %r15
ret

LLVM IR (-O0):
@.str = [4 x i8] c" \00"
@.str.1 = [2 x i8] c"\0A\00"
define i32 @write_four(i8* %0, double %1, double %2, double %3, double %4) {
%6 = alloca i8*
%7 = alloca double
%8 = alloca double
%9 = alloca double
%10 = alloca double
%11 = alloca i32
store i8* %0, i8** %6
store double %1, double* %7
store double %2, double* %8
store double %3, double* %9
store double %4, double* %10
store i32 0, i32* %11
%12 = load i8*, i8** %6
%13 = load i32, i32* %11
%14 = sext i32 %13 to i64
%15 = getelementptr inbounds i8, i8* %12, i64 %14
%16 = call i64 @sprintf(i8* %15, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str, i64 0, i64 0))
%17 = load i32, i32* %11
%18 = sext i32 %17 to i64
%19 = add nsw i64 %18, %16
%20 = trunc i64 %19 to i32
store i32 %20, i32* %11
%21 = load i8*, i8** %6
%22 = load i32, i32* %11
%23 = sext i32 %22 to i64
%24 = getelementptr inbounds i8, i8* %21, i64 %23
%25 = load double, double* %7
%26 = call i64 @format_double(i8* %24, double %25)
%27 = load i32, i32* %11
%28 = sext i32 %27 to i64
%29 = add nsw i64 %28, %26
%30 = trunc i64 %29 to i32
store i32 %30, i32* %11
%31 = load i8*, i8** %6
%32 = load i32, i32* %11
%33 = sext i32 %32 to i64
%34 = getelementptr inbounds i8, i8* %31, i64 %33
%35 = load double, double* %8
%36 = call i64 @format_double(i8* %34, double %35)
%37 = load i32, i32* %11
%38 = sext i32 %37 to i64
%39 = add nsw i64 %38, %36
%40 = trunc i64 %39 to i32
store i32 %40, i32* %11
%41 = load i8*, i8** %6
%42 = load i32, i32* %11
%43 = sext i32 %42 to i64
%44 = getelementptr inbounds i8, i8* %41, i64 %43
%45 = load double, double* %9
%46 = call i64 @format_double(i8* %44, double %45)
%47 = load i32, i32* %11
%48 = sext i32 %47 to i64
%49 = add nsw i64 %48, %46
%50 = trunc i64 %49 to i32
store i32 %50, i32* %11
%51 = load i8*, i8** %6
%52 = load i32, i32* %11
%53 = sext i32 %52 to i64
%54 = getelementptr inbounds i8, i8* %51, i64 %53
%55 = load double, double* %10
%56 = call i64 @format_double(i8* %54, double %55)
%57 = load i32, i32* %11
%58 = sext i32 %57 to i64
%59 = add nsw i64 %58, %56
%60 = trunc i64 %59 to i32
store i32 %60, i32* %11
%61 = load i8*, i8** %6
%62 = load i32, i32* %11
%63 = sext i32 %62 to i64
%64 = getelementptr inbounds i8, i8* %61, i64 %63
%65 = call i64 @sprintf(i8* %64, i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str.1, i64 0, i64 0))
%66 = load i32, i32* %11
%67 = sext i32 %66 to i64
%68 = add nsw i64 %67, %65
%69 = trunc i64 %68 to i32
store i32 %69, i32* %11
%70 = load i32, i32* %11
ret i32 %70
}

LLVM IR (-O2):
@.str = [4 x i8] c" \00"
@.str.1 = [2 x i8] c"\0A\00"
define i32 @write_four(i8* %0, double %1, double %2, double %3, double %4) {
%6 = tail call i64 @sprintf(i8* %0, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str, i64 0, i64 0))
%7 = shl i64 %6, 32
%8 = ashr exact i64 %7, 32
%9 = getelementptr inbounds i8, i8* %0, i64 %8
%10 = tail call i64 @format_double(i8* %9, double %1)
%11 = add i64 %10, %6
%12 = shl i64 %11, 32
%13 = ashr exact i64 %12, 32
%14 = getelementptr inbounds i8, i8* %0, i64 %13
%15 = tail call i64 @format_double(i8* %14, double %2)
%16 = add i64 %11, %15
%17 = shl i64 %16, 32
%18 = ashr exact i64 %17, 32
%19 = getelementptr inbounds i8, i8* %0, i64 %18
%20 = tail call i64 @format_double(i8* %19, double %3)
%21 = add i64 %16, %20
%22 = shl i64 %21, 32
%23 = ashr exact i64 %22, 32
%24 = getelementptr inbounds i8, i8* %0, i64 %23
%25 = tail call i64 @format_double(i8* %24, double %4)
%26 = add i64 %21, %25
%27 = shl i64 %26, 32
%28 = ashr exact i64 %27, 32
%29 = getelementptr inbounds i8, i8* %0, i64 %28
%30 = tail call i64 @sprintf(i8* %29, i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str.1, i64 0, i64 0))
%31 = add i64 %26, %30
%32 = trunc i64 %31 to i32
ret i32 %32
}