#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__ ERANGE;
long INT_MAX;
long INT_MIN;
long LONG_MAX;
long LONG_MIN;
scalar_t__ errno;
int /*<<< orphan*/ fscanf(int /*<<< orphan*/, char *, char *);
int /*<<< orphan*/ stdin;
int /*<<< orphan*/ strcpy(char *, char *);
int strlen(char *);
float strtof(char *, char **);
long strtol(char *, char **, int);
int plisp_read(int *int_val, float *float_val, char *str_val) {
  int base = 10;
  char *end_ptr;
  long i_val;
  float f_val;
  int maybe_float = 0;
  char inp[500];
  fscanf(stdin, "%s", inp);
  int i;
  for (i = 0; i < strlen(inp); i++) {
    if (inp[i] == '.') {
      maybe_float = 1;
      break;
    }
  }
  if (maybe_float) {
    errno = 0;
    f_val = strtof(inp, &end_ptr);
    if ((errno == ERANGE) || (errno != 0 && f_val == 0))
      return -1;
    if (errno == 0 && (end_ptr != inp)) {
      *float_val = f_val;
      return 2;
    }
  }
  errno = 0;
  i_val = strtol(inp, &end_ptr, base);
  if ((errno == ERANGE && (i_val == LONG_MAX || i_val == LONG_MIN)) ||
      (errno != 0 && i_val == 0) ||
      (errno == 0 && (i_val < INT_MIN || i_val > INT_MAX)))
    return -1;
  if (errno == 0 && (end_ptr != inp)) {
    *int_val = i_val;
    return 1;
  }
  strcpy(str_val, inp);
  return 3;
}


x86 assembly (clang, -O0):
<plisp_read>:
push   %rbp
mov    %rsp,%rbp
sub    $0x250,%rsp
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    %rdx,-0x20(%rbp)
movl   $0xa,-0x24(%rbp)
movl   $0x0,-0x40(%rbp)
mov    0x2e6c(%rip),%rax
mov    (%rax),%edi
lea    -0x240(%rbp),%rdx
lea    0xe74(%rip),%rsi
call   1060 <fscanf@plt>
movl   $0x0,-0x244(%rbp)
mov    -0x244(%rbp),%eax
mov    %eax,-0x248(%rbp)
lea    -0x240(%rbp),%rdi
call   1040 <strlen@plt>
mov    %eax,%ecx
mov    -0x248(%rbp),%eax
cmp    %ecx,%eax
jge    1200 <plisp_read+0xb0>
movslq -0x244(%rbp),%rax
movsbl -0x240(%rbp,%rax,1),%eax
ff
cmp    $0x2e,%eax
jne    11e7 <plisp_read+0x97>
movl   $0x1,-0x40(%rbp)
jmp    1200 <plisp_read+0xb0>
jmp    11ec <plisp_read+0x9c>
mov    -0x244(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x244(%rbp)
jmp    119b <plisp_read+0x4b>
cmpl   $0x0,-0x40(%rbp)
je     12be <plisp_read+0x16e>
mov    0x2d9f(%rip),%rax
movq   $0x0,(%rax)
lea    -0x240(%rbp),%rdi
lea    -0x30(%rbp),%rsi
call   1050 <strtof@plt>
movss  %xmm0,-0x3c(%rbp)
mov    0x2d7c(%rip),%rax
mov    (%rax),%rax
mov    0x2d8a(%rip),%rcx
cmp    (%rcx),%rax
je     126f <plisp_read+0x11f>
mov    0x2d62(%rip),%rax
cmpq   $0x0,(%rax)
je     127b <plisp_read+0x12b>
movss  -0x3c(%rbp),%xmm0
xorps  %xmm1,%xmm1
ucomiss %xmm1,%xmm0
jne    127b <plisp_read+0x12b>
jp     127b <plisp_read+0x12b>
movl   $0xffffffff,-0x4(%rbp)
jmp    13da <plisp_read+0x28a>
mov    0x2d2e(%rip),%rax
cmpq   $0x0,(%rax)
jne    12b9 <plisp_read+0x169>
mov    -0x30(%rbp),%rax
lea    -0x240(%rbp),%rcx
cmp    %rcx,%rax
je     12b9 <plisp_read+0x169>
movss  -0x3c(%rbp),%xmm0
mov    -0x18(%rbp),%rax
movss  %xmm0,(%rax)
movl   $0x2,-0x4(%rbp)
jmp    13da <plisp_read+0x28a>
jmp    12be <plisp_read+0x16e>
mov    0x2ceb(%rip),%rax
movq   $0x0,(%rax)
lea    -0x240(%rbp),%rdi
mov    -0x24(%rbp),%edx
lea    -0x30(%rbp),%rsi
call   1070 <strtol@plt>
mov    %rax,-0x38(%rbp)
mov    0x2cc6(%rip),%rax
mov    (%rax),%rax
mov    0x2cd4(%rip),%rcx
cmp    (%rcx),%rax
jne    1325 <plisp_read+0x1d5>
mov    -0x38(%rbp),%rax
mov    0x2cb0(%rip),%rcx
cmp    (%rcx),%rax
je     137a <plisp_read+0x22a>
mov    -0x38(%rbp),%rax
mov    0x2cbc(%rip),%rcx
cmp    (%rcx),%rax
je     137a <plisp_read+0x22a>
mov    0x2c84(%rip),%rax
cmpq   $0x0,(%rax)
je     1341 <plisp_read+0x1f1>
cmpq   $0x0,-0x38(%rbp)
je     137a <plisp_read+0x22a>
mov    0x2c68(%rip),%rax
cmpq   $0x0,(%rax)
jne    1386 <plisp_read+0x236>
mov    -0x38(%rbp),%rax
mov    0x2c73(%rip),%rcx
cmp    (%rcx),%rax
jl     137a <plisp_read+0x22a>
mov    -0x38(%rbp),%rax
mov    0x2c6f(%rip),%rcx
cmp    (%rcx),%rax
jle    1386 <plisp_read+0x236>
movl   $0xffffffff,-0x4(%rbp)
jmp    13da <plisp_read+0x28a>
mov    0x2c23(%rip),%rax
cmpq   $0x0,(%rax)
jne    13c3 <plisp_read+0x273>
mov    -0x30(%rbp),%rax
lea    -0x240(%rbp),%rcx
cmp    %rcx,%rax
je     13c3 <plisp_read+0x273>
mov    -0x38(%rbp),%rax
mov    %eax,%ecx
mov    -0x10(%rbp),%rax
mov    %ecx,(%rax)
movl   $0x1,-0x4(%rbp)
jmp    13da <plisp_read+0x28a>
mov    -0x20(%rbp),%rdi
lea    -0x240(%rbp),%rsi
call   1030 <strcpy@plt>
movl   $0x3,-0x4(%rbp)
mov    -0x4(%rbp),%eax
add    $0x250,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<plisp_read>:
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x210,%rsp
mov    %rdx,%r15
mov    %rsi,%r13
mov    %rdi,%r14
mov    0x2e78(%rip),%rax
mov    (%rax),%edi
lea    0xe87(%rip),%rsi
lea    0x10(%rsp),%rbx
mov    %rbx,%rdx
call   1060 <fscanf@plt>
mov    %rbx,%rdi
call   1040 <strlen@plt>
test   %eax,%eax
jle    11be <plisp_read+0x6e>
xor    %ebx,%ebx
lea    0x10(%rsp),%r12
nopl   0x0(%rax)
cmpb   $0x2e,0x10(%rsp,%rbx,1)
je     1249 <plisp_read+0xf9>
add    $0x1,%rbx
mov    %r12,%rdi
call   1040 <strlen@plt>
cltq
cmp    %rax,%rbx
jl     11a0 <plisp_read+0x50>
mov    0x2deb(%rip),%rbx
movq   $0x0,(%rbx)
lea    0x10(%rsp),%r12
lea    0x8(%rsp),%rsi
mov    %r12,%rdi
mov    $0xa,%edx
call   1070 <strtol@plt>
mov    %rax,%rcx
mov    (%rbx),%rdx
mov    0x2dd8(%rip),%rax
cmp    (%rax),%rdx
jne    121a <plisp_read+0xca>
mov    0x2dbc(%rip),%rsi
mov    $0xffffffff,%eax
cmp    (%rsi),%rcx
je     12d8 <plisp_read+0x188>
mov    0x2dc7(%rip),%rsi
cmp    (%rsi),%rcx
je     12d8 <plisp_read+0x188>
mov    $0xffffffff,%eax
test   %rdx,%rdx
je     122d <plisp_read+0xdd>
test   %rcx,%rcx
je     12d8 <plisp_read+0x188>
test   %rdx,%rdx
je     12ad <plisp_read+0x15d>
lea    0x10(%rsp),%rsi
mov    %r15,%rdi
call   1030 <strcpy@plt>
mov    $0x3,%eax
jmp    12d8 <plisp_read+0x188>
mov    0x2d60(%rip),%rbx
movq   $0x0,(%rbx)
lea    0x10(%rsp),%r12
lea    0x8(%rsp),%rsi
mov    %r12,%rdi
call   1050 <strtof@plt>
mov    (%rbx),%rcx
mov    0x2d55(%rip),%rdx
mov    $0xffffffff,%eax
cmp    (%rdx),%rcx
je     12d8 <plisp_read+0x188>
test   %rcx,%rcx
je     128c <plisp_read+0x13c>
xorps  %xmm1,%xmm1
ucomiss %xmm1,%xmm0
jne    128c <plisp_read+0x13c>
jnp    12d8 <plisp_read+0x188>
test   %rcx,%rcx
jne    11be <plisp_read+0x6e>
cmp    %r12,0x8(%rsp)
je     11be <plisp_read+0x6e>
movss  %xmm0,0x0(%r13)
mov    $0x2,%eax
jmp    12d8 <plisp_read+0x188>
mov    0x2d1c(%rip),%rdx
cmp    (%rdx),%rcx
jl     12d8 <plisp_read+0x188>
mov    0x2d20(%rip),%rdx
cmp    (%rdx),%rcx
jg     12d8 <plisp_read+0x188>
cmp    %r12,0x8(%rsp)
je     1232 <plisp_read+0xe2>
mov    %ecx,(%r14)
mov    $0x1,%eax
add    $0x210,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
ret

LLVM IR (-O0):
@stdin = global i32 0
@.str = [3 x i8] c"%s\00"
@errno = global i64 0
@ERANGE = global i64 0
@LONG_MAX = global i64 0
@LONG_MIN = global i64 0
@INT_MIN = global i64 0
@INT_MAX = global i64 0
define i32 @plisp_read(i32* %0, float* %1, i8* %2) {
%4 = alloca i32
%5 = alloca i32*
%6 = alloca float*
%7 = alloca i8*
%8 = alloca i32
%9 = alloca i8*
%10 = alloca i64
%11 = alloca float
%12 = alloca i32
%13 = alloca [500 x i8]
%14 = alloca i32
store i32* %0, i32** %5
store float* %1, float** %6
store i8* %2, i8** %7
store i32 10, i32* %8
store i32 0, i32* %12
%15 = load i32, i32* @stdin
%16 = getelementptr inbounds [500 x i8], [500 x i8]* %13, i64 0, i64 0
%17 = call i32 @fscanf(i32 %15, i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str, i64 0, i64 0), i8* %16)
store i32 0, i32* %14
br label %18
18: ; preds = %32, %3
%19 = load i32, i32* %14
%20 = getelementptr inbounds [500 x i8], [500 x i8]* %13, i64 0, i64 0
%21 = call i32 @strlen(i8* %20)
%22 = icmp slt i32 %19, %21
br i1 %22, label %23, label %35
23: ; preds = %18
%24 = load i32, i32* %14
%25 = sext i32 %24 to i64
%26 = getelementptr inbounds [500 x i8], [500 x i8]* %13, i64 0, i64 %25
%27 = load i8, i8* %26
%28 = sext i8 %27 to i32
%29 = icmp eq i32 %28, 46
br i1 %29, label %30, label %31
30: ; preds = %23
store i32 1, i32* %12
br label %35
31: ; preds = %23
br label %32
32: ; preds = %31
%33 = load i32, i32* %14
%34 = add nsw i32 %33, 1
store i32 %34, i32* %14
br label %18
35: ; preds = %30, %18
%36 = load i32, i32* %12
%37 = icmp ne i32 %36, 0
br i1 %37, label %38, label %62
38: ; preds = %35
store i64 0, i64* @errno
%39 = getelementptr inbounds [500 x i8], [500 x i8]* %13, i64 0, i64 0
%40 = call float @strtof(i8* %39, i8** %9)
store float %40, float* %11
%41 = load i64, i64* @errno
%42 = load i64, i64* @ERANGE
%43 = icmp eq i64 %41, %42
br i1 %43, label %50, label %44
44: ; preds = %38
%45 = load i64, i64* @errno
%46 = icmp ne i64 %45, 0
br i1 %46, label %47, label %51
47: ; preds = %44
%48 = load float, float* %11
%49 = fcmp oeq float %48, 0.000000e+00
br i1 %49, label %50, label %51
50: ; preds = %47, %38
store i32 -1, i32* %4
br label %110
51: ; preds = %47, %44
%52 = load i64, i64* @errno
%53 = icmp eq i64 %52, 0
br i1 %53, label %54, label %61
54: ; preds = %51
%55 = load i8*, i8** %9
%56 = getelementptr inbounds [500 x i8], [500 x i8]* %13, i64 0, i64 0
%57 = icmp ne i8* %55, %56
br i1 %57, label %58, label %61
58: ; preds = %54
%59 = load float, float* %11
%60 = load float*, float** %6
store float %59, float* %60
store i32 2, i32* %4
br label %110
61: ; preds = %54, %51
br label %62
62: ; preds = %61, %35
store i64 0, i64* @errno
%63 = getelementptr inbounds [500 x i8], [500 x i8]* %13, i64 0, i64 0
%64 = load i32, i32* %8
%65 = call i64 @strtol(i8* %63, i8** %9, i32 %64)
store i64 %65, i64* %10
%66 = load i64, i64* @errno
%67 = load i64, i64* @ERANGE
%68 = icmp eq i64 %66, %67
br i1 %68, label %69, label %77
69: ; preds = %62
%70 = load i64, i64* %10
%71 = load i64, i64* @LONG_MAX
%72 = icmp eq i64 %70, %71
br i1 %72, label %94, label %73
73: ; preds = %69
%74 = load i64, i64* %10
%75 = load i64, i64* @LONG_MIN
%76 = icmp eq i64 %74, %75
br i1 %76, label %94, label %77
77: ; preds = %73, %62
%78 = load i64, i64* @errno
%79 = icmp ne i64 %78, 0
br i1 %79, label %80, label %83
80: ; preds = %77
%81 = load i64, i64* %10
%82 = icmp eq i64 %81, 0
br i1 %82, label %94, label %83
83: ; preds = %80, %77
%84 = load i64, i64* @errno
%85 = icmp eq i64 %84, 0
br i1 %85, label %86, label %95
86: ; preds = %83
%87 = load i64, i64* %10
%88 = load i64, i64* @INT_MIN
%89 = icmp slt i64 %87, %88
br i1 %89, label %94, label %90
90: ; preds = %86
%91 = load i64, i64* %10
%92 = load i64, i64* @INT_MAX
%93 = icmp sgt i64 %91, %92
br i1 %93, label %94, label %95
94: ; preds = %90, %86, %80, %73, %69
store i32 -1, i32* %4
br label %110
95: ; preds = %90, %83
%96 = load i64, i64* @errno
%97 = icmp eq i64 %96, 0
br i1 %97, label %98, label %106
98: ; preds = %95
%99 = load i8*, i8** %9
%100 = getelementptr inbounds [500 x i8], [500 x i8]* %13, i64 0, i64 0
%101 = icmp ne i8* %99, %100
br i1 %101, label %102, label %106
102: ; preds = %98
%103 = load i64, i64* %10
%104 = trunc i64 %103 to i32
%105 = load i32*, i32** %5
store i32 %104, i32* %105
store i32 1, i32* %4
br label %110
106: ; preds = %98, %95
%107 = load i8*, i8** %7
%108 = getelementptr inbounds [500 x i8], [500 x i8]* %13, i64 0, i64 0
%109 = call i32 @strcpy(i8* %107, i8* %108)
store i32 3, i32* %4
br label %110
110: ; preds = %106, %102, %94, %58, %50
%111 = load i32, i32* %4
ret i32 %111
}

LLVM IR (-O2):
@stdin = global i32 0
@.str = [3 x i8] c"%s\00"
@errno = global i64 0
@ERANGE = global i64 0
@LONG_MAX = global i64 0
@LONG_MIN = global i64 0
@INT_MIN = global i64 0
@INT_MAX = global i64 0
define i32 @plisp_read(i32* nocapture writeonly %0, float* nocapture writeonly %1, i8* %2) {
%4 = alloca i8*
%5 = alloca [500 x i8]
%6 = bitcast i8** %4 to i8*
%7 = getelementptr inbounds [500 x i8], [500 x i8]* %5, i64 0, i64 0
%8 = load i32, i32* @stdin
%9 = call i32 @fscanf(i32 %8, i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str, i64 0, i64 0), i8* %7)
%10 = call i32 @strlen(i8* %7)
%11 = icmp sgt i32 %10, 0
br i1 %11, label %16, label %37
12: ; preds = %16
%13 = call i32 @strlen(i8* %7)
%14 = sext i32 %13 to i64
%15 = icmp slt i64 %21, %14
br i1 %15, label %16, label %37
16: ; preds = %3, %12
%17 = phi i64 [ %21, %12 ], [ 0, %3 ]
%18 = getelementptr inbounds [500 x i8], [500 x i8]* %5, i64 0, i64 %17
%19 = load i8, i8* %18
%20 = icmp eq i8 %19, 46
%21 = add nuw nsw i64 %17, 1
br i1 %20, label %22, label %12
22: ; preds = %16
store i64 0, i64* @errno
%23 = call float @strtof(i8* %7, i8** %4)
%24 = load i64, i64* @errno
%25 = load i64, i64* @ERANGE
%26 = icmp eq i64 %24, %25
br i1 %26, label %67, label %27
27: ; preds = %22
%28 = icmp ne i64 %24, 0
%29 = fcmp oeq float %23, 0.000000e+00
%30 = select i1 %28, i1 %29, i1 false
br i1 %30, label %67, label %31
31: ; preds = %27
%32 = icmp eq i64 %24, 0
%33 = load i8*, i8** %4
%34 = icmp ne i8* %33, %7
%35 = select i1 %32, i1 %34, i1 false
br i1 %35, label %36, label %37
36: ; preds = %31
store float %23, float* %1
br label %67
37: ; preds = %12, %3, %31
store i64 0, i64* @errno
%38 = call i64 @strtol(i8* %7, i8** %4, i32 10)
%39 = load i64, i64* @errno
%40 = load i64, i64* @ERANGE
%41 = icmp eq i64 %39, %40
br i1 %41, label %42, label %48
42: ; preds = %37
%43 = load i64, i64* @LONG_MAX
%44 = icmp eq i64 %38, %43
%45 = load i64, i64* @LONG_MIN
%46 = icmp eq i64 %38, %45
%47 = select i1 %44, i1 true, i1 %46
br i1 %47, label %67, label %48
48: ; preds = %42, %37
%49 = icmp ne i64 %39, 0
%50 = icmp eq i64 %38, 0
%51 = select i1 %49, i1 %50, i1 false
br i1 %51, label %67, label %52
52: ; preds = %48
%53 = icmp eq i64 %39, 0
br i1 %53, label %54, label %65
54: ; preds = %52
%55 = load i64, i64* @INT_MIN
%56 = icmp slt i64 %38, %55
%57 = load i64, i64* @INT_MAX
%58 = icmp sgt i64 %38, %57
%59 = select i1 %56, i1 true, i1 %58
br i1 %59, label %67, label %60
60: ; preds = %54
%61 = load i8*, i8** %4
%62 = icmp eq i8* %61, %7
br i1 %62, label %65, label %63
63: ; preds = %60
%64 = trunc i64 %38 to i32
store i32 %64, i32* %0
br label %67
65: ; preds = %52, %60
%66 = call i32 @strcpy(i8* %2, i8* %7)
br label %67
67: ; preds = %42, %54, %48, %22, %27, %65, %63, %36
%68 = phi i32 [ 2, %36 ], [ 1, %63 ], [ 3, %65 ], [ -1, %27 ], [ -1, %22 ], [ -1, %48 ], [ -1, %54 ], [ -1, %42 ]
ret i32 %68
}