#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*/ printf(char *, ...);
void print_numeric(unsigned char *data, int length_flag) {
  int i;
  int exponent;
  if ((data[1] >> 4) == 0xF) {
    if (data[0]) {
      printf("NaN\n");
    } else {
      printf("%cinf\n", ((data[1] & 0xF) == 9) ? '-' : '+');
    }
  } else {
    printf("%c%1x.%1x", ((data[1] & 0xF) == 9) ? '-' : '+', data[7] >> 4,
           data[7] & 0xF);
    for (i = 6; i > (length_flag ? 1 : 2); i--) {
      printf("%02x", data[i]);
    }
    exponent = 100 * (data[1] >> 4) + 10 * (data[0] >> 4) + (data[0] & 0xF);
    exponent = (exponent > 500) ? exponent - 1000 : exponent;
    printf("E%+d\n", exponent);
  }
}


x86 assembly (clang, -O0):
<print_numeric>:
push   %rbp
mov    %rsp,%rbp
sub    $0x20,%rsp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    -0x8(%rbp),%rax
movzbl 0x1(%rax),%eax
sar    $0x4,%eax
cmp    $0xf,%eax
jne    1181 <print_numeric+0x71>
mov    -0x8(%rbp),%rax
cmpb   $0x0,(%rax)
je     1153 <print_numeric+0x43>
lea    0xeb9(%rip),%rdi
mov    $0x0,%al
call   1030 <printf@plt>
jmp    117c <print_numeric+0x6c>
mov    -0x8(%rbp),%rax
movzbl 0x1(%rax),%ecx
and    $0xf,%ecx
mov    $0x2b,%esi
mov    $0x2d,%eax
cmp    $0x9,%ecx
cmove  %eax,%esi
lea    0xe90(%rip),%rdi
mov    $0x0,%al
call   1030 <printf@plt>
jmp    1273 <print_numeric+0x163>
mov    -0x8(%rbp),%rax
movzbl 0x1(%rax),%ecx
and    $0xf,%ecx
mov    $0x2b,%esi
mov    $0x2d,%eax
cmp    $0x9,%ecx
cmove  %eax,%esi
mov    -0x8(%rbp),%rax
movzbl 0x7(%rax),%edx
sar    $0x4,%edx
mov    -0x8(%rbp),%rax
movzbl 0x7(%rax),%ecx
and    $0xf,%ecx
lea    0xe53(%rip),%rdi
mov    $0x0,%al
call   1030 <printf@plt>
movl   $0x6,-0x10(%rbp)
mov    -0x10(%rbp),%eax
mov    -0xc(%rbp),%esi
mov    $0x2,%ecx
mov    $0x1,%edx
cmp    $0x0,%esi
cmovne %edx,%ecx
cmp    %ecx,%eax
jle    120d <print_numeric+0xfd>
mov    -0x8(%rbp),%rax
movslq -0x10(%rbp),%rcx
movzbl (%rax,%rcx,1),%esi
lea    0xe1e(%rip),%rdi
mov    $0x0,%al
call   1030 <printf@plt>
mov    -0x10(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x10(%rbp)
jmp    11c7 <print_numeric+0xb7>
mov    -0x8(%rbp),%rax
movzbl 0x1(%rax),%eax
sar    $0x4,%eax
imul   $0x64,%eax,%eax
mov    -0x8(%rbp),%rcx
movzbl (%rcx),%ecx
sar    $0x4,%ecx
imul   $0xa,%ecx,%ecx
add    %ecx,%eax
mov    -0x8(%rbp),%rcx
movzbl (%rcx),%ecx
and    $0xf,%ecx
add    %ecx,%eax
mov    %eax,-0x14(%rbp)
cmpl   $0x1f4,-0x14(%rbp)
jle    1256 <print_numeric+0x146>
mov    -0x14(%rbp),%eax
sub    $0x3e8,%eax
mov    %eax,-0x18(%rbp)
jmp    125c <print_numeric+0x14c>
mov    -0x14(%rbp),%eax
mov    %eax,-0x18(%rbp)
mov    -0x18(%rbp),%eax
mov    %eax,-0x14(%rbp)
mov    -0x14(%rbp),%esi
lea    0xdaf(%rip),%rdi
mov    $0x0,%al
call   1030 <printf@plt>
add    $0x20,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<print_numeric>:
push   %rbp
push   %r15
push   %r14
push   %rbx
push   %rax
mov    %rdi,%r15
movzbl 0x1(%rdi),%eax
mov    %eax,%ecx
not    %ecx
test   $0xf0,%cl
jne    1157 <print_numeric+0x37>
cmpb   $0x0,(%r15)
je     11ef <print_numeric+0xcf>
lea    0xed4(%rip),%rdi
add    $0x8,%rsp
pop    %rbx
pop    %r14
pop    %r15
pop    %rbp
jmp    1030 <puts@plt>
mov    %esi,%ebp
and    $0xf,%eax
xor    %ecx,%ecx
cmp    $0x9,%eax
sete   %cl
lea    (%rcx,%rcx,1),%esi
add    $0x2b,%esi
movzbl 0x7(%r15),%ecx
mov    %ecx,%edx
shr    $0x4,%edx
and    $0xf,%ecx
lea    0xe89(%rip),%rdi
xor    %eax,%eax
call   1040 <printf@plt>
cmp    $0x1,%ebp
mov    $0x1,%ebp
adc    $0x0,%rbp
mov    $0x6,%ebx
lea    0xe74(%rip),%r14
nopl   (%rax)
movzbl (%r15,%rbx,1),%esi
mov    %r14,%rdi
xor    %eax,%eax
call   1040 <printf@plt>
add    $0xffffffffffffffff,%rbx
cmp    %rbp,%rbx
ja     11a0 <print_numeric+0x80>
movzbl 0x1(%r15),%eax
shr    $0x4,%eax
imul   $0x64,%eax,%eax
movzbl (%r15),%ecx
mov    %ecx,%edx
shr    $0x4,%edx
lea    (%rdx,%rdx,4),%edx
and    $0xf,%ecx
add    %eax,%ecx
lea    (%rcx,%rdx,2),%eax
cmp    $0x1f5,%eax
lea    -0x3e8(%rcx,%rdx,2),%esi
cmovb  %eax,%esi
lea    0xe29(%rip),%rdi
jmp    1207 <print_numeric+0xe7>
and    $0xf,%eax
xor    %ecx,%ecx
cmp    $0x9,%eax
sete   %cl
lea    (%rcx,%rcx,1),%esi
add    $0x2b,%esi
lea    0xdf9(%rip),%rdi
xor    %eax,%eax
add    $0x8,%rsp
pop    %rbx
pop    %r14
pop    %r15
pop    %rbp
jmp    1040 <printf@plt>

LLVM IR (-O0):
@.str = [5 x i8] c"NaN\0A\00"
@.str.1 = [7 x i8] c"%cinf\0A\00"
@.str.2 = [10 x i8] c"%c%1x.%1x\00"
@.str.3 = [5 x i8] c"%02x\00"
@.str.4 = [6 x i8] c"E%+d\0A\00"
define void @print_numeric(i8* %0, i32 %1) {
%3 = alloca i8*
%4 = alloca i32
%5 = alloca i32
%6 = alloca i32
store i8* %0, i8** %3
store i32 %1, i32* %4
%7 = load i8*, i8** %3
%8 = getelementptr inbounds i8, i8* %7, i64 1
%9 = load i8, i8* %8
%10 = zext i8 %9 to i32
%11 = ashr i32 %10, 4
%12 = icmp eq i32 %11, 15
br i1 %12, label %13, label %31
13: ; preds = %2
%14 = load i8*, i8** %3
%15 = getelementptr inbounds i8, i8* %14, i64 0
%16 = load i8, i8* %15
%17 = icmp ne i8 %16, 0
br i1 %17, label %18, label %20
18: ; preds = %13
%19 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([5 x i8], [5 x i8]* @.str, i64 0, i64 0))
br label %30
20: ; preds = %13
%21 = load i8*, i8** %3
%22 = getelementptr inbounds i8, i8* %21, i64 1
%23 = load i8, i8* %22
%24 = zext i8 %23 to i32
%25 = and i32 %24, 15
%26 = icmp eq i32 %25, 9
%27 = zext i1 %26 to i64
%28 = select i1 %26, i32 45, i32 43
%29 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([7 x i8], [7 x i8]* @.str.1, i64 0, i64 0), i32 %28)
br label %30
30: ; preds = %20, %18
br label %100
31: ; preds = %2
%32 = load i8*, i8** %3
%33 = getelementptr inbounds i8, i8* %32, i64 1
%34 = load i8, i8* %33
%35 = zext i8 %34 to i32
%36 = and i32 %35, 15
%37 = icmp eq i32 %36, 9
%38 = zext i1 %37 to i64
%39 = select i1 %37, i32 45, i32 43
%40 = load i8*, i8** %3
%41 = getelementptr inbounds i8, i8* %40, i64 7
%42 = load i8, i8* %41
%43 = zext i8 %42 to i32
%44 = ashr i32 %43, 4
%45 = load i8*, i8** %3
%46 = getelementptr inbounds i8, i8* %45, i64 7
%47 = load i8, i8* %46
%48 = zext i8 %47 to i32
%49 = and i32 %48, 15
%50 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([10 x i8], [10 x i8]* @.str.2, i64 0, i64 0), i32 %39, i32 %44, i32 %49)
store i32 6, i32* %5
br label %51
51: ; preds = %66, %31
%52 = load i32, i32* %5
%53 = load i32, i32* %4
%54 = icmp ne i32 %53, 0
%55 = zext i1 %54 to i64
%56 = select i1 %54, i32 1, i32 2
%57 = icmp sgt i32 %52, %56
br i1 %57, label %58, label %69
58: ; preds = %51
%59 = load i8*, i8** %3
%60 = load i32, i32* %5
%61 = sext i32 %60 to i64
%62 = getelementptr inbounds i8, i8* %59, i64 %61
%63 = load i8, i8* %62
%64 = zext i8 %63 to i32
%65 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([5 x i8], [5 x i8]* @.str.3, i64 0, i64 0), i32 %64)
br label %66
66: ; preds = %58
%67 = load i32, i32* %5
%68 = add nsw i32 %67, -1
store i32 %68, i32* %5
br label %51
69: ; preds = %51
%70 = load i8*, i8** %3
%71 = getelementptr inbounds i8, i8* %70, i64 1
%72 = load i8, i8* %71
%73 = zext i8 %72 to i32
%74 = ashr i32 %73, 4
%75 = mul nsw i32 100, %74
%76 = load i8*, i8** %3
%77 = getelementptr inbounds i8, i8* %76, i64 0
%78 = load i8, i8* %77
%79 = zext i8 %78 to i32
%80 = ashr i32 %79, 4
%81 = mul nsw i32 10, %80
%82 = add nsw i32 %75, %81
%83 = load i8*, i8** %3
%84 = getelementptr inbounds i8, i8* %83, i64 0
%85 = load i8, i8* %84
%86 = zext i8 %85 to i32
%87 = and i32 %86, 15
%88 = add nsw i32 %82, %87
store i32 %88, i32* %6
%89 = load i32, i32* %6
%90 = icmp sgt i32 %89, 500
br i1 %90, label %91, label %94
91: ; preds = %69
%92 = load i32, i32* %6
%93 = sub nsw i32 %92, 1000
br label %96
94: ; preds = %69
%95 = load i32, i32* %6
br label %96
96: ; preds = %94, %91
%97 = phi i32 [ %93, %91 ], [ %95, %94 ]
store i32 %97, i32* %6
%98 = load i32, i32* %6
%99 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([6 x i8], [6 x i8]* @.str.4, i64 0, i64 0), i32 %98)
br label %100
100: ; preds = %96, %30
ret void
}

LLVM IR (-O2):
@.str.1 = [7 x i8] c"%cinf\0A\00"
@.str.2 = [10 x i8] c"%c%1x.%1x\00"
@.str.3 = [5 x i8] c"%02x\00"
@.str.4 = [6 x i8] c"E%+d\0A\00"
@str = [4 x i8] c"NaN\00"
define void @print_numeric(i8* nocapture %0, i32 %1) {
%3 = getelementptr inbounds i8, i8* %0, i64 1
%4 = load i8, i8* %3
%5 = zext i8 %4 to i32
%6 = and i32 %5, 240
%7 = icmp eq i32 %6, 240
br i1 %7, label %8, label %18
8: ; preds = %2
%9 = load i8, i8* %0
%10 = icmp eq i8 %9, 0
br i1 %10, label %13, label %11
11: ; preds = %8
%12 = tail call i32 @puts(i8* dereferenceable(1) getelementptr inbounds ([4 x i8], [4 x i8]* @str, i64 0, i64 0))
br label %54
13: ; preds = %8
%14 = and i32 %5, 15
%15 = icmp eq i32 %14, 9
%16 = select i1 %15, i32 45, i32 43
%17 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([7 x i8], [7 x i8]* @.str.1, i64 0, i64 0), i32 %16)
br label %54
18: ; preds = %2
%19 = and i32 %5, 15
%20 = icmp eq i32 %19, 9
%21 = select i1 %20, i32 45, i32 43
%22 = getelementptr inbounds i8, i8* %0, i64 7
%23 = load i8, i8* %22
%24 = zext i8 %23 to i32
%25 = lshr i32 %24, 4
%26 = and i32 %24, 15
%27 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([10 x i8], [10 x i8]* @.str.2, i64 0, i64 0), i32 %21, i32 %25, i32 %26)
%28 = icmp eq i32 %1, 0
%29 = select i1 %28, i64 2, i64 1
br label %30
30: ; preds = %18, %30
%31 = phi i64 [ 6, %18 ], [ %36, %30 ]
%32 = getelementptr inbounds i8, i8* %0, i64 %31
%33 = load i8, i8* %32
%34 = zext i8 %33 to i32
%35 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([5 x i8], [5 x i8]* @.str.3, i64 0, i64 0), i32 %34)
%36 = add nsw i64 %31, -1
%37 = icmp ugt i64 %36, %29
br i1 %37, label %30, label %38
38: ; preds = %30
%39 = load i8, i8* %3
%40 = lshr i8 %39, 4
%41 = zext i8 %40 to i32
%42 = mul nuw nsw i32 %41, 100
%43 = load i8, i8* %0
%44 = zext i8 %43 to i32
%45 = lshr i32 %44, 4
%46 = mul nuw nsw i32 %45, 10
%47 = and i32 %44, 15
%48 = add nuw nsw i32 %47, %42
%49 = add nuw nsw i32 %48, %46
%50 = icmp ugt i32 %49, 500
%51 = add nsw i32 %49, -1000
%52 = select i1 %50, i32 %51, i32 %49
%53 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([6 x i8], [6 x i8]* @.str.4, i64 0, i64 0), i32 %52)
br label %54
54: ; preds = %11, %13, %38
ret void
}