#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 */
int /*<<< orphan*/ sprintf(char *, char *, double);
int /*<<< orphan*/ strcat(char *, char *);
char *strchr(char *, char);
int /*<<< orphan*/ strcpy(char *, char *);
int strlen(char *);
char *strpbrk(char *, char *);
char *reg_print_val(double x, char *buf) {
  char tmp[80];
  char *ptr;
  char *decimal;
  long j = 0;
  sprintf(tmp, "%g", x);
  ptr = strpbrk(tmp, "eE");
  if (ptr)
    j = ptr - tmp;
  else
    j = strlen(tmp) - 1;
  decimal = strchr(tmp, '.');
  if (decimal && j > decimal - tmp) {
    while (j > 0 && tmp[j] == '0')
      tmp[j--] = '\0';
    if (j > 0 && tmp[j] == '.')
      tmp[j] = '\0';
  }
  strcpy(buf, tmp);
  if (ptr && j < ptr - tmp)
    strcat(buf, ptr);
  return buf;
}


x86 assembly (clang, -O0):
<reg_print_val>:
push   %rbp
mov    %rsp,%rbp
sub    $0x80,%rsp
movsd  %xmm0,-0x8(%rbp)
mov    %rdi,-0x10(%rbp)
movq   $0x0,-0x78(%rbp)
lea    -0x60(%rbp),%rdi
movsd  -0x8(%rbp),%xmm0
lea    0xe74(%rip),%rsi
call   1080 <sprintf@plt>
lea    -0x60(%rbp),%rdi
lea    0xe67(%rip),%rsi
call   1060 <strpbrk@plt>
mov    %rax,-0x68(%rbp)
cmpq   $0x0,-0x68(%rbp)
je     11c4 <reg_print_val+0x64>
mov    -0x68(%rbp),%rax
lea    -0x60(%rbp),%rcx
sub    %rcx,%rax
mov    %rax,-0x78(%rbp)
jmp    11d6 <reg_print_val+0x76>
lea    -0x60(%rbp),%rdi
call   1040 <strlen@plt>
sub    $0x1,%eax
cltq
mov    %rax,-0x78(%rbp)
lea    -0x60(%rbp),%rdi
mov    $0x2e,%esi
call   1050 <strchr@plt>
mov    %rax,-0x70(%rbp)
cmpq   $0x0,-0x70(%rbp)
je     1286 <reg_print_val+0x126>
mov    -0x78(%rbp),%rax
mov    -0x70(%rbp),%rcx
lea    -0x60(%rbp),%rdx
sub    %rdx,%rcx
cmp    %rcx,%rax
jle    1286 <reg_print_val+0x126>
jmp    1210 <reg_print_val+0xb0>
xor    %eax,%eax
cmpq   $0x0,-0x78(%rbp)
mov    %al,-0x79(%rbp)
jle    1232 <reg_print_val+0xd2>
mov    -0x78(%rbp),%rax
movsbl -0x60(%rbp,%rax,1),%eax
cmp    $0x30,%eax
sete   %al
mov    %al,-0x79(%rbp)
mov    -0x79(%rbp),%al
test   $0x1,%al
jne    1242 <reg_print_val+0xe2>
jmp    125b <reg_print_val+0xfb>
mov    -0x78(%rbp),%rax
mov    %rax,%rcx
add    $0xffffffffffffffff,%rcx
mov    %rcx,-0x78(%rbp)
movb   $0x0,-0x60(%rbp,%rax,1)
jmp    1210 <reg_print_val+0xb0>
cmpq   $0x0,-0x78(%rbp)
jle    1281 <reg_print_val+0x121>
mov    -0x78(%rbp),%rax
movsbl -0x60(%rbp,%rax,1),%eax
cmp    $0x2e,%eax
jne    1281 <reg_print_val+0x121>
mov    -0x78(%rbp),%rax
movb   $0x0,-0x60(%rbp,%rax,1)
jmp    1286 <reg_print_val+0x126>
mov    -0x10(%rbp),%rdi
lea    -0x60(%rbp),%rsi
call   1030 <strcpy@plt>
cmpq   $0x0,-0x68(%rbp)
je     12c3 <reg_print_val+0x163>
mov    -0x78(%rbp),%rax
mov    -0x68(%rbp),%rcx
lea    -0x60(%rbp),%rdx
sub    %rdx,%rcx
cmp    %rcx,%rax
jge    12c3 <reg_print_val+0x163>
mov    -0x10(%rbp),%rdi
mov    -0x68(%rbp),%rsi
call   1070 <strcat@plt>
mov    -0x10(%rbp),%rax
add    $0x80,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<reg_print_val>:
push   %r15
push   %r14
push   %r12
push   %rbx
sub    $0x58,%rsp
mov    %rdi,%r14
lea    0xe8b(%rip),%rsi
mov    %rsp,%r12
mov    %r12,%rdi
call   1080 <sprintf@plt>
lea    0xe7c(%rip),%rsi
mov    %r12,%rdi
call   1060 <strpbrk@plt>
mov    %rax,%r15
test   %rax,%rax
je     119f <reg_print_val+0x3f>
mov    %r15,%rbx
sub    %r12,%rbx
jmp    11b0 <reg_print_val+0x50>
mov    %rsp,%r12
mov    %r12,%rdi
call   1040 <strlen@plt>
add    $0xffffffff,%eax
movslq %eax,%rbx
mov    %rsp,%rdi
mov    $0x2e,%esi
call   1050 <strchr@plt>
test   %rax,%rax
je     11f5 <reg_print_val+0x95>
sub    %r12,%rax
cmp    %rax,%rbx
jle    11f5 <reg_print_val+0x95>
test   %rbx,%rbx
jle    11f5 <reg_print_val+0x95>
nop
movzbl (%rsp,%rbx,1),%eax
cmp    $0x30,%al
jne    11ed <reg_print_val+0x8d>
movb   $0x0,(%rsp,%rbx,1)
lea    -0x1(%rbx),%rax
cmp    $0x1,%rbx
mov    %rax,%rbx
jg     11d0 <reg_print_val+0x70>
xor    %ebx,%ebx
jmp    11f5 <reg_print_val+0x95>
cmp    $0x2e,%al
jne    11f5 <reg_print_val+0x95>
movb   $0x0,(%rsp,%rbx,1)
mov    %rsp,%rsi
mov    %r14,%rdi
call   1030 <strcpy@plt>
test   %r15,%r15
je     121b <reg_print_val+0xbb>
mov    %r15,%rax
sub    %r12,%rax
cmp    %rax,%rbx
jge    121b <reg_print_val+0xbb>
mov    %r14,%rdi
mov    %r15,%rsi
call   1070 <strcat@plt>
mov    %r14,%rax
add    $0x58,%rsp
pop    %rbx
pop    %r12
pop    %r14
pop    %r15
ret

LLVM IR (-O0):
@.str = [3 x i8] c"%g\00"
@.str.1 = [3 x i8] c"eE\00"
define i8* @reg_print_val(double %0, i8* %1) {
%3 = alloca double
%4 = alloca i8*
%5 = alloca [80 x i8]
%6 = alloca i8*
%7 = alloca i8*
%8 = alloca i64
store double %0, double* %3
store i8* %1, i8** %4
store i64 0, i64* %8
%9 = getelementptr inbounds [80 x i8], [80 x i8]* %5, i64 0, i64 0
%10 = load double, double* %3
%11 = call i32 @sprintf(i8* %9, i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str, i64 0, i64 0), double %10)
%12 = getelementptr inbounds [80 x i8], [80 x i8]* %5, i64 0, i64 0
%13 = call i8* @strpbrk(i8* %12, i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str.1, i64 0, i64 0))
store i8* %13, i8** %6
%14 = load i8*, i8** %6
%15 = icmp ne i8* %14, null
br i1 %15, label %16, label %22
16: ; preds = %2
%17 = load i8*, i8** %6
%18 = getelementptr inbounds [80 x i8], [80 x i8]* %5, i64 0, i64 0
%19 = ptrtoint i8* %17 to i64
%20 = ptrtoint i8* %18 to i64
%21 = sub i64 %19, %20
store i64 %21, i64* %8
br label %27
22: ; preds = %2
%23 = getelementptr inbounds [80 x i8], [80 x i8]* %5, i64 0, i64 0
%24 = call i32 @strlen(i8* %23)
%25 = sub nsw i32 %24, 1
%26 = sext i32 %25 to i64
store i64 %26, i64* %8
br label %27
27: ; preds = %22, %16
%28 = getelementptr inbounds [80 x i8], [80 x i8]* %5, i64 0, i64 0
%29 = call i8* @strchr(i8* %28, i8 signext 46)
store i8* %29, i8** %7
%30 = load i8*, i8** %7
%31 = icmp ne i8* %30, null
br i1 %31, label %32, label %69
32: ; preds = %27
%33 = load i64, i64* %8
%34 = load i8*, i8** %7
%35 = getelementptr inbounds [80 x i8], [80 x i8]* %5, i64 0, i64 0
%36 = ptrtoint i8* %34 to i64
%37 = ptrtoint i8* %35 to i64
%38 = sub i64 %36, %37
%39 = icmp sgt i64 %33, %38
br i1 %39, label %40, label %69
40: ; preds = %32
br label %41
41: ; preds = %52, %40
%42 = load i64, i64* %8
%43 = icmp sgt i64 %42, 0
br i1 %43, label %44, label %50
44: ; preds = %41
%45 = load i64, i64* %8
%46 = getelementptr inbounds [80 x i8], [80 x i8]* %5, i64 0, i64 %45
%47 = load i8, i8* %46
%48 = sext i8 %47 to i32
%49 = icmp eq i32 %48, 48
br label %50
50: ; preds = %44, %41
%51 = phi i1 [ false, %41 ], [ %49, %44 ]
br i1 %51, label %52, label %56
52: ; preds = %50
%53 = load i64, i64* %8
%54 = add nsw i64 %53, -1
store i64 %54, i64* %8
%55 = getelementptr inbounds [80 x i8], [80 x i8]* %5, i64 0, i64 %53
store i8 0, i8* %55
br label %41
56: ; preds = %50
%57 = load i64, i64* %8
%58 = icmp sgt i64 %57, 0
br i1 %58, label %59, label %68
59: ; preds = %56
%60 = load i64, i64* %8
%61 = getelementptr inbounds [80 x i8], [80 x i8]* %5, i64 0, i64 %60
%62 = load i8, i8* %61
%63 = sext i8 %62 to i32
%64 = icmp eq i32 %63, 46
br i1 %64, label %65, label %68
65: ; preds = %59
%66 = load i64, i64* %8
%67 = getelementptr inbounds [80 x i8], [80 x i8]* %5, i64 0, i64 %66
store i8 0, i8* %67
br label %68
68: ; preds = %65, %59, %56
br label %69
69: ; preds = %68, %32, %27
%70 = load i8*, i8** %4
%71 = getelementptr inbounds [80 x i8], [80 x i8]* %5, i64 0, i64 0
%72 = call i32 @strcpy(i8* %70, i8* %71)
%73 = load i8*, i8** %6
%74 = icmp ne i8* %73, null
br i1 %74, label %75, label %87
75: ; preds = %69
%76 = load i64, i64* %8
%77 = load i8*, i8** %6
%78 = getelementptr inbounds [80 x i8], [80 x i8]* %5, i64 0, i64 0
%79 = ptrtoint i8* %77 to i64
%80 = ptrtoint i8* %78 to i64
%81 = sub i64 %79, %80
%82 = icmp slt i64 %76, %81
br i1 %82, label %83, label %87
83: ; preds = %75
%84 = load i8*, i8** %4
%85 = load i8*, i8** %6
%86 = call i32 @strcat(i8* %84, i8* %85)
br label %87
87: ; preds = %83, %75, %69
%88 = load i8*, i8** %4
ret i8* %88
}

LLVM IR (-O2):
@.str = [3 x i8] c"%g\00"
@.str.1 = [3 x i8] c"eE\00"
define i8* @reg_print_val(double %0, i8* returned %1) {
%3 = alloca [80 x i8]
%4 = getelementptr inbounds [80 x i8], [80 x i8]* %3, i64 0, i64 0
%5 = call i32 @sprintf(i8* %4, i8* dereferenceable(1) getelementptr inbounds ([3 x i8], [3 x i8]* @.str, i64 0, i64 0), double %0)
%6 = call i8* @strpbrk(i8* %4, i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str.1, i64 0, i64 0))
%7 = icmp eq i8* %6, null
br i1 %7, label %12, label %8
8: ; preds = %2
%9 = ptrtoint i8* %6 to i64
%10 = ptrtoint [80 x i8]* %3 to i64
%11 = sub i64 %9, %10
br label %17
12: ; preds = %2
%13 = call i32 @strlen(i8* %4)
%14 = add nsw i32 %13, -1
%15 = sext i32 %14 to i64
%16 = ptrtoint [80 x i8]* %3 to i64
br label %17
17: ; preds = %12, %8
%18 = phi i64 [ %16, %12 ], [ %10, %8 ]
%19 = phi i64 [ %15, %12 ], [ %11, %8 ]
%20 = call i8* @strchr(i8* %4, i8 signext 46)
%21 = icmp ne i8* %20, null
%22 = ptrtoint i8* %20 to i64
%23 = sub i64 %22, %18
%24 = icmp sgt i64 %19, %23
%25 = select i1 %21, i1 %24, i1 false
%26 = icmp sgt i64 %19, 0
%27 = select i1 %25, i1 %26, i1 false
br i1 %27, label %28, label %36
28: ; preds = %17, %32
%29 = phi i64 [ %33, %32 ], [ %19, %17 ]
%30 = getelementptr inbounds [80 x i8], [80 x i8]* %3, i64 0, i64 %29
%31 = load i8, i8* %30
switch i8 %31, label %36 [
i8 48, label %32
i8 46, label %35
]
32: ; preds = %28
%33 = add nsw i64 %29, -1
store i8 0, i8* %30
%34 = icmp sgt i64 %29, 1
br i1 %34, label %28, label %36
35: ; preds = %28
store i8 0, i8* %30
br label %36
36: ; preds = %32, %28, %35, %17
%37 = phi i64 [ %29, %35 ], [ %19, %17 ], [ 0, %32 ], [ %29, %28 ]
%38 = call i32 @strcpy(i8* %1, i8* %4)
%39 = xor i1 %7, true
%40 = ptrtoint i8* %6 to i64
%41 = sub i64 %40, %18
%42 = icmp slt i64 %37, %41
%43 = select i1 %39, i1 %42, i1 false
br i1 %43, label %44, label %46
44: ; preds = %36
%45 = call i32 @strcat(i8* %1, i8* %6)
br label %46
46: ; preds = %44, %36
ret i8* %1
}