#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*/ CursorXY(int, int);
char ReadChar();
int atoi(char *);
int /*<<< orphan*/ printf(char *);
int /*<<< orphan*/ putchar(char);
int InputCardinal(int x, int y, int *pNumber, int l) {
  int i = 0;
  char ch;
  char s[31];
  do {
    CursorXY(x + i, y);
    ch = ReadChar();
    if (ch >= '0' && ch <= '9' && i < l) {
      s[i++] = ch;
      s[i] = '\0';
      putchar(ch);
    } else if ((ch == '\010' || ch == '\177') && i > 0) {
      s[--i] = '\0';
      CursorXY(x + i, y);
      printf(" ");
    } else if (ch == '\033' || ch == '\003') {
      s[0] = '\0';
    }
  } while (ch != '\033' && ch != '\003' && (ch != '\015' || i == 0) &&
           (ch != '\012' || i == 0));
  if (ch == '\033' || ch == '\003')
    return 0;
  *pNumber = atoi(s);
  return 1;
}


x86 assembly (clang, -O0):
<InputCardinal>:
push   %rbp
mov    %rsp,%rbp
sub    $0x50,%rsp
mov    %edi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %ecx,-0x1c(%rbp)
movl   $0x0,-0x20(%rbp)
mov    -0x8(%rbp),%edi
add    -0x20(%rbp),%edi
mov    -0xc(%rbp),%esi
call   1040 <CursorXY@plt>
mov    $0x0,%al
call   1070 <ReadChar@plt>
mov    %al,-0x21(%rbp)
movsbl -0x21(%rbp),%eax
cmp    $0x30,%eax
jl     11d5 <InputCardinal+0x85>
movsbl -0x21(%rbp),%eax
cmp    $0x39,%eax
jg     11d5 <InputCardinal+0x85>
mov    -0x20(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jge    11d5 <InputCardinal+0x85>
mov    -0x21(%rbp),%cl
mov    -0x20(%rbp),%eax
mov    %eax,%edx
add    $0x1,%edx
mov    %edx,-0x20(%rbp)
cltq
mov    %cl,-0x40(%rbp,%rax,1)
movslq -0x20(%rbp),%rax
movb   $0x0,-0x40(%rbp,%rax,1)
movsbl -0x21(%rbp),%edi
call   1030 <putchar@plt>
jmp    1250 <InputCardinal+0x100>
movsbl -0x21(%rbp),%eax
cmp    $0x8,%eax
je     11ef <InputCardinal+0x9f>
movsbl -0x21(%rbp),%eax
cmp    $0x7f,%eax
jne    1228 <InputCardinal+0xd8>
cmpl   $0x0,-0x20(%rbp)
jle    1228 <InputCardinal+0xd8>
mov    -0x20(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x20(%rbp)
cltq
movb   $0x0,-0x40(%rbp,%rax,1)
mov    -0x8(%rbp),%edi
add    -0x20(%rbp),%edi
mov    -0xc(%rbp),%esi
call   1040 <CursorXY@plt>
lea    0xde2(%rip),%rdi
call   1050 <printf@plt>
jmp    124b <InputCardinal+0xfb>
movsbl -0x21(%rbp),%eax
cmp    $0x1b,%eax
je     1242 <InputCardinal+0xf2>
movsbl -0x21(%rbp),%eax
cmp    $0x3,%eax
jne    1246 <InputCardinal+0xf6>
movb   $0x0,-0x40(%rbp)
jmp    124b <InputCardinal+0xfb>
jmp    1250 <InputCardinal+0x100>
jmp    1255 <InputCardinal+0x105>
movsbl -0x21(%rbp),%ecx
xor    %eax,%eax
cmp    $0x1b,%ecx
mov    %al,-0x41(%rbp)
je     12b7 <InputCardinal+0x167>
movsbl -0x21(%rbp),%ecx
xor    %eax,%eax
cmp    $0x3,%ecx
mov    %al,-0x41(%rbp)
je     12b7 <InputCardinal+0x167>
movsbl -0x21(%rbp),%eax
cmp    $0xd,%eax
jne    1295 <InputCardinal+0x145>
xor    %eax,%eax
cmpl   $0x0,-0x20(%rbp)
mov    %al,-0x41(%rbp)
jne    12b7 <InputCardinal+0x167>
movsbl -0x21(%rbp),%ecx
mov    $0x1,%al
cmp    $0xa,%ecx
mov    %al,-0x42(%rbp)
jne    12b1 <InputCardinal+0x161>
cmpl   $0x0,-0x20(%rbp)
sete   %al
mov    %al,-0x42(%rbp)
mov    -0x42(%rbp),%al
mov    %al,-0x41(%rbp)
mov    -0x41(%rbp),%al
test   $0x1,%al
jne    116c <InputCardinal+0x1c>
movsbl -0x21(%rbp),%eax
cmp    $0x1b,%eax
je     12dc <InputCardinal+0x18c>
movsbl -0x21(%rbp),%eax
cmp    $0x3,%eax
jne    12e8 <InputCardinal+0x198>
movl   $0x0,-0x4(%rbp)
jmp    1300 <InputCardinal+0x1b0>
lea    -0x40(%rbp),%rdi
call   1060 <atoi@plt>
mov    %eax,%ecx
mov    -0x18(%rbp),%rax
mov    %ecx,(%rax)
movl   $0x1,-0x4(%rbp)
mov    -0x4(%rbp),%eax
add    $0x50,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<InputCardinal>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x38,%rsp
mov    %ecx,%r15d
mov    %rdx,0x8(%rsp)
mov    %esi,%r12d
mov    %edi,%r13d
xor    %ebp,%ebp
xchg   %ax,%ax
lea    0x0(%rbp,%r13,1),%edi
mov    %r12d,%esi
call   1040 <CursorXY@plt>
xor    %eax,%eax
call   1060 <ReadChar@plt>
mov    %eax,%ebx
lea    -0x30(%rbx),%eax
cmp    $0x9,%al
ja     11a0 <InputCardinal+0x60>
cmp    %r15d,%ebp
jge    11a0 <InputCardinal+0x60>
movslq %ebp,%rax
lea    0x1(%rax),%rbp
mov    %bl,0x10(%rsp,%rax,1)
movb   $0x0,0x11(%rsp,%rax,1)
movsbl %bl,%edi
call   1030 <putchar@plt>
jmp    11f0 <InputCardinal+0xb0>
nopl   0x0(%rax)
cmp    $0x8,%bl
setne  %al
cmp    $0x7f,%bl
setne  %cl
test   %cl,%al
jne    11e0 <InputCardinal+0xa0>
test   %ebp,%ebp
jle    11e0 <InputCardinal+0xa0>
lea    -0x1(%rbp),%r14d
movb   $0x0,0x10(%rsp,%r14,1)
lea    -0x1(%rbp,%r13,1),%edi
mov    %r12d,%esi
call   1040 <CursorXY@plt>
mov    $0x20,%edi
call   1030 <putchar@plt>
mov    %r14d,%ebp
jmp    11f0 <InputCardinal+0xb0>
nopw   0x0(%rax,%rax,1)
cmp    $0x1b,%bl
je     11ea <InputCardinal+0xaa>
cmp    $0x3,%bl
jne    11f0 <InputCardinal+0xb0>
movb   $0x0,0x10(%rsp)
nop
cmp    $0x3,%bl
je     122c <InputCardinal+0xec>
cmp    $0x1b,%bl
je     122c <InputCardinal+0xec>
cmp    $0xd,%bl
jne    1203 <InputCardinal+0xc3>
test   %ebp,%ebp
jne    1214 <InputCardinal+0xd4>
cmp    $0xa,%bl
jne    1160 <InputCardinal+0x20>
test   %ebp,%ebp
je     1160 <InputCardinal+0x20>
lea    0x10(%rsp),%rdi
call   1050 <atoi@plt>
mov    0x8(%rsp),%rcx
mov    %eax,(%rcx)
mov    $0x1,%eax
jmp    122e <InputCardinal+0xee>
xor    %eax,%eax
add    $0x38,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
@.str = [2 x i8] c" \00"
define i32 @InputCardinal(i32 %0, i32 %1, i32* %2, i32 %3) {
%5 = alloca i32
%6 = alloca i32
%7 = alloca i32
%8 = alloca i32*
%9 = alloca i32
%10 = alloca i32
%11 = alloca i8
%12 = alloca [31 x i8]
store i32 %0, i32* %6
store i32 %1, i32* %7
store i32* %2, i32** %8
store i32 %3, i32* %9
store i32 0, i32* %10
br label %13
13: ; preds = %101, %4
%14 = load i32, i32* %6
%15 = load i32, i32* %10
%16 = add nsw i32 %14, %15
%17 = load i32, i32* %7
%18 = call i32 @CursorXY(i32 %16, i32 %17)
%19 = call signext i8 (...) @ReadChar()
store i8 %19, i8* %11
%20 = load i8, i8* %11
%21 = sext i8 %20 to i32
%22 = icmp sge i32 %21, 48
br i1 %22, label %23, label %42
23: ; preds = %13
%24 = load i8, i8* %11
%25 = sext i8 %24 to i32
%26 = icmp sle i32 %25, 57
br i1 %26, label %27, label %42
27: ; preds = %23
%28 = load i32, i32* %10
%29 = load i32, i32* %9
%30 = icmp slt i32 %28, %29
br i1 %30, label %31, label %42
31: ; preds = %27
%32 = load i8, i8* %11
%33 = load i32, i32* %10
%34 = add nsw i32 %33, 1
store i32 %34, i32* %10
%35 = sext i32 %33 to i64
%36 = getelementptr inbounds [31 x i8], [31 x i8]* %12, i64 0, i64 %35
store i8 %32, i8* %36
%37 = load i32, i32* %10
%38 = sext i32 %37 to i64
%39 = getelementptr inbounds [31 x i8], [31 x i8]* %12, i64 0, i64 %38
store i8 0, i8* %39
%40 = load i8, i8* %11
%41 = call i32 @putchar(i8 signext %40)
br label %76
42: ; preds = %27, %23, %13
%43 = load i8, i8* %11
%44 = sext i8 %43 to i32
%45 = icmp eq i32 %44, 8
br i1 %45, label %50, label %46
46: ; preds = %42
%47 = load i8, i8* %11
%48 = sext i8 %47 to i32
%49 = icmp eq i32 %48, 127
br i1 %49, label %50, label %64
50: ; preds = %46, %42
%51 = load i32, i32* %10
%52 = icmp sgt i32 %51, 0
br i1 %52, label %53, label %64
53: ; preds = %50
%54 = load i32, i32* %10
%55 = add nsw i32 %54, -1
store i32 %55, i32* %10
%56 = sext i32 %55 to i64
%57 = getelementptr inbounds [31 x i8], [31 x i8]* %12, i64 0, i64 %56
store i8 0, i8* %57
%58 = load i32, i32* %6
%59 = load i32, i32* %10
%60 = add nsw i32 %58, %59
%61 = load i32, i32* %7
%62 = call i32 @CursorXY(i32 %60, i32 %61)
%63 = call i32 @printf(i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str, i64 0, i64 0))
br label %75
64: ; preds = %50, %46
%65 = load i8, i8* %11
%66 = sext i8 %65 to i32
%67 = icmp eq i32 %66, 27
br i1 %67, label %72, label %68
68: ; preds = %64
%69 = load i8, i8* %11
%70 = sext i8 %69 to i32
%71 = icmp eq i32 %70, 3
br i1 %71, label %72, label %74
72: ; preds = %68, %64
%73 = getelementptr inbounds [31 x i8], [31 x i8]* %12, i64 0, i64 0
store i8 0, i8* %73
br label %74
74: ; preds = %72, %68
br label %75
75: ; preds = %74, %53
br label %76
76: ; preds = %75, %31
br label %77
77: ; preds = %76
%78 = load i8, i8* %11
%79 = sext i8 %78 to i32
%80 = icmp ne i32 %79, 27
br i1 %80, label %81, label %101
81: ; preds = %77
%82 = load i8, i8* %11
%83 = sext i8 %82 to i32
%84 = icmp ne i32 %83, 3
br i1 %84, label %85, label %101
85: ; preds = %81
%86 = load i8, i8* %11
%87 = sext i8 %86 to i32
%88 = icmp ne i32 %87, 13
br i1 %88, label %92, label %89
89: ; preds = %85
%90 = load i32, i32* %10
%91 = icmp eq i32 %90, 0
br i1 %91, label %92, label %101
92: ; preds = %89, %85
%93 = load i8, i8* %11
%94 = sext i8 %93 to i32
%95 = icmp ne i32 %94, 10
br i1 %95, label %99, label %96
96: ; preds = %92
%97 = load i32, i32* %10
%98 = icmp eq i32 %97, 0
br label %99
99: ; preds = %96, %92
%100 = phi i1 [ true, %92 ], [ %98, %96 ]
br label %101
101: ; preds = %99, %89, %81, %77
%102 = phi i1 [ false, %89 ], [ false, %81 ], [ false, %77 ], [ %100, %99 ]
br i1 %102, label %13, label %103
103: ; preds = %101
%104 = load i8, i8* %11
%105 = sext i8 %104 to i32
%106 = icmp eq i32 %105, 27
br i1 %106, label %111, label %107
107: ; preds = %103
%108 = load i8, i8* %11
%109 = sext i8 %108 to i32
%110 = icmp eq i32 %109, 3
br i1 %110, label %111, label %112
111: ; preds = %107, %103
store i32 0, i32* %5
br label %116
112: ; preds = %107
%113 = getelementptr inbounds [31 x i8], [31 x i8]* %12, i64 0, i64 0
%114 = call i32 @atoi(i8* %113)
%115 = load i32*, i32** %8
store i32 %114, i32* %115
store i32 1, i32* %5
br label %116
116: ; preds = %112, %111
%117 = load i32, i32* %5
ret i32 %117
}

LLVM IR (-O2):
define i32 @InputCardinal(i32 %0, i32 %1, i32* nocapture writeonly %2, i32 %3) {
%5 = alloca [31 x i8]
%6 = getelementptr inbounds [31 x i8], [31 x i8]* %5, i64 0, i64 0
br label %7
7: ; preds = %44, %4
%8 = phi i32 [ 0, %4 ], [ %39, %44 ]
%9 = add nsw i32 %8, %0
%10 = tail call i32 @CursorXY(i32 %9, i32 %1)
%11 = tail call signext i8 (...) @ReadChar()
%12 = add i8 %11, -48
%13 = icmp ult i8 %12, 10
%14 = icmp slt i32 %8, %3
%15 = select i1 %13, i1 %14, i1 false
br i1 %15, label %16, label %23
16: ; preds = %7
%17 = add nsw i32 %8, 1
%18 = sext i32 %8 to i64
%19 = getelementptr inbounds [31 x i8], [31 x i8]* %5, i64 0, i64 %18
store i8 %11, i8* %19
%20 = sext i32 %17 to i64
%21 = getelementptr inbounds [31 x i8], [31 x i8]* %5, i64 0, i64 %20
store i8 0, i8* %21
%22 = tail call i32 @putchar(i8 signext %11)
br label %38
23: ; preds = %7
%24 = icmp eq i8 %11, 8
%25 = icmp eq i8 %11, 127
%26 = or i1 %24, %25
%27 = icmp sgt i32 %8, 0
%28 = select i1 %26, i1 %27, i1 false
br i1 %28, label %29, label %36
29: ; preds = %23
%30 = add nsw i32 %8, -1
%31 = zext i32 %30 to i64
%32 = getelementptr inbounds [31 x i8], [31 x i8]* %5, i64 0, i64 %31
store i8 0, i8* %32
%33 = add nsw i32 %30, %0
%34 = tail call i32 @CursorXY(i32 %33, i32 %1)
%35 = tail call i32 bitcast (i32 (i8)* @putchar to i32 (i32)*)(i32 32)
br label %38
36: ; preds = %23
switch i8 %11, label %38 [
i8 27, label %37
i8 3, label %37
]
37: ; preds = %36, %36
store i8 0, i8* %6
br label %38
38: ; preds = %36, %16, %37, %29
%39 = phi i32 [ %17, %16 ], [ %30, %29 ], [ %8, %37 ], [ %8, %36 ]
switch i8 %11, label %40 [
i8 27, label %49
i8 3, label %49
]
40: ; preds = %38
%41 = icmp ne i8 %11, 13
%42 = icmp eq i32 %39, 0
%43 = select i1 %41, i1 true, i1 %42
br i1 %43, label %44, label %47
44: ; preds = %40
%45 = icmp ne i8 %11, 10
%46 = select i1 %45, i1 true, i1 %42
br i1 %46, label %7, label %47
47: ; preds = %44, %40
%48 = call i32 @atoi(i8* %6)
store i32 %48, i32* %2
br label %49
49: ; preds = %38, %38, %47
%50 = phi i32 [ 1, %47 ], [ 0, %38 ], [ 0, %38 ]
ret i32 %50
}