#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*/ exit(int);
int /*<<< orphan*/ isdigit(char);
int /*<<< orphan*/ printf(char *);
int lex(char *str, int *pos) {
  int estado = 0;
  char c;
  while (1) {
    c = str[*pos];
    switch (estado) {
    case 0:
      if (isdigit(c)) {
        (*pos)++;
        estado = 1;
      } else
        switch (c) {
        case ' ':
          (*pos)++;
          break;
        case '.':
          (*pos)++;
          estado = 2;
          break;
        case '+':
          (*pos)++;
          return 0x0100;
        case '-':
          (*pos)++;
          return 0x0200;
        case '*':
          (*pos)++;
          return 0x0300;
        case '/':
          (*pos)++;
          return 0x0400;
        case '(':
          (*pos)++;
          return 0x0600;
        case ')':
          (*pos)++;
          return 0x0700;
        case '\0':
          return 0x0800;
        default:
          (*pos)++;
          return 0x0000;
        }
      break;
    case 1:
      if (isdigit(c))
        (*pos)++;
      else if (c == '.') {
        estado = 3;
        (*pos)++;
      } else {
        return 0x0500;
      }
      break;
    case 2:
      if (isdigit(c)) {
        (*pos)++;
        estado = 3;
      } else {
        (*pos)++;
        return 0x0000;
      }
      break;
    case 3:
      if (isdigit(c))
        (*pos)++;
      else {
        return 0x0500;
      }
      break;
    default:
      printf("Lex:Estado indefinido");
      exit(1);
    }
  }
}


x86 assembly (clang, -O0):
<lex>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
movl   $0x0,-0x1c(%rbp)
mov    -0x10(%rbp),%rax
mov    -0x18(%rbp),%rcx
movslq (%rcx),%rcx
mov    (%rax,%rcx,1),%al
mov    %al,-0x1d(%rbp)
mov    -0x1c(%rbp),%eax
mov    %rax,-0x28(%rbp)
sub    $0x3,%rax
ja     137f <lex+0x24f>
mov    -0x28(%rbp),%rax
lea    0xe8c(%rip),%rcx
movslq (%rcx,%rax,4),%rax
add    %rcx,%rax
jmp    *%rax
movsbl -0x1d(%rbp),%edi
call   1030 <isdigit@plt>
cmp    $0x0,%eax
je     11a6 <lex+0x76>
mov    -0x18(%rbp),%rax
mov    (%rax),%ecx
add    $0x1,%ecx
mov    %ecx,(%rax)
movl   $0x1,-0x1c(%rbp)
jmp    12a6 <lex+0x176>
movsbl -0x1d(%rbp),%eax
mov    %eax,%ecx
mov    %rcx,-0x30(%rbp)
sub    $0x2f,%eax
ja     128a <lex+0x15a>
mov    -0x30(%rbp),%rax
lea    0xe4c(%rip),%rcx
movslq (%rcx,%rax,4),%rax
add    %rcx,%rax
jmp    *%rax
mov    -0x18(%rbp),%rax
mov    (%rax),%ecx
add    $0x1,%ecx
mov    %ecx,(%rax)
jmp    12a1 <lex+0x171>
mov    -0x18(%rbp),%rax
mov    (%rax),%ecx
add    $0x1,%ecx
mov    %ecx,(%rax)
movl   $0x2,-0x1c(%rbp)
jmp    12a1 <lex+0x171>
mov    -0x18(%rbp),%rax
mov    (%rax),%ecx
add    $0x1,%ecx
mov    %ecx,(%rax)
movl   $0x100,-0x4(%rbp)
jmp    139a <lex+0x26a>
mov    -0x18(%rbp),%rax
mov    (%rax),%ecx
add    $0x1,%ecx
mov    %ecx,(%rax)
movl   $0x200,-0x4(%rbp)
jmp    139a <lex+0x26a>
mov    -0x18(%rbp),%rax
mov    (%rax),%ecx
add    $0x1,%ecx
mov    %ecx,(%rax)
movl   $0x300,-0x4(%rbp)
jmp    139a <lex+0x26a>
mov    -0x18(%rbp),%rax
mov    (%rax),%ecx
add    $0x1,%ecx
mov    %ecx,(%rax)
movl   $0x400,-0x4(%rbp)
jmp    139a <lex+0x26a>
mov    -0x18(%rbp),%rax
mov    (%rax),%ecx
add    $0x1,%ecx
mov    %ecx,(%rax)
movl   $0x600,-0x4(%rbp)
jmp    139a <lex+0x26a>
mov    -0x18(%rbp),%rax
mov    (%rax),%ecx
add    $0x1,%ecx
mov    %ecx,(%rax)
movl   $0x700,-0x4(%rbp)
jmp    139a <lex+0x26a>
movl   $0x800,-0x4(%rbp)
jmp    139a <lex+0x26a>
mov    -0x18(%rbp),%rax
mov    (%rax),%ecx
add    $0x1,%ecx
mov    %ecx,(%rax)
movl   $0x0,-0x4(%rbp)
jmp    139a <lex+0x26a>
jmp    12a6 <lex+0x176>
jmp    1395 <lex+0x265>
movsbl -0x1d(%rbp),%edi
call   1030 <isdigit@plt>
cmp    $0x0,%eax
je     12cd <lex+0x19d>
mov    -0x18(%rbp),%rax
mov    (%rax),%ecx
add    $0x1,%ecx
mov    %ecx,(%rax)
jmp    1302 <lex+0x1d2>
movsbl -0x1d(%rbp),%eax
cmp    $0x2e,%eax
jne    12f1 <lex+0x1c1>
movl   $0x3,-0x1c(%rbp)
mov    -0x18(%rbp),%rax
mov    (%rax),%ecx
add    $0x1,%ecx
mov    %ecx,(%rax)
jmp    12fd <lex+0x1cd>
movl   $0x500,-0x4(%rbp)
jmp    139a <lex+0x26a>
jmp    1302 <lex+0x1d2>
jmp    1395 <lex+0x265>
movsbl -0x1d(%rbp),%edi
call   1030 <isdigit@plt>
cmp    $0x0,%eax
je     1330 <lex+0x200>
mov    -0x18(%rbp),%rax
mov    (%rax),%ecx
add    $0x1,%ecx
mov    %ecx,(%rax)
movl   $0x3,-0x1c(%rbp)
jmp    1347 <lex+0x217>
mov    -0x18(%rbp),%rax
mov    (%rax),%ecx
add    $0x1,%ecx
mov    %ecx,(%rax)
movl   $0x0,-0x4(%rbp)
jmp    139a <lex+0x26a>
jmp    1395 <lex+0x265>
movsbl -0x1d(%rbp),%edi
call   1030 <isdigit@plt>
cmp    $0x0,%eax
je     136e <lex+0x23e>
mov    -0x18(%rbp),%rax
mov    (%rax),%ecx
add    $0x1,%ecx
mov    %ecx,(%rax)
jmp    137a <lex+0x24a>
movl   $0x500,-0x4(%rbp)
jmp    139a <lex+0x26a>
jmp    1395 <lex+0x265>
lea    0xd4a(%rip),%rdi
call   1040 <printf@plt>
mov    $0x1,%edi
call   1050 <exit@plt>
jmp    1147 <lex+0x17>
mov    -0x4(%rbp),%eax
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<lex>:
push   %rbp
push   %r15
push   %r14
push   %r12
push   %rbx
mov    %rsi,%rbx
mov    %rdi,%r14
mov    (%rsi),%edx
xor    %ecx,%ecx
lea    0xeb7(%rip),%r15
lea    0xec0(%rip),%r12
jmp    117b <lex+0x4b>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
mov    %ebp,%edi
call   1030 <isdigit@plt>
mov    $0x3,%ecx
test   %eax,%eax
je     120f <lex+0xdf>
mov    (%rbx),%edx
add    $0x1,%edx
mov    %edx,(%rbx)
cmp    $0x3,%ecx
ja     124e <lex+0x11e>
movslq %edx,%rax
movsbl (%r14,%rax,1),%ebp
mov    %ecx,%eax
movslq (%r15,%rax,4),%rax
add    %r15,%rax
jmp    *%rax
mov    %ebp,%edi
call   1030 <isdigit@plt>
mov    $0x1,%ecx
test   %eax,%eax
jne    1174 <lex+0x44>
cmp    $0x2f,%ebp
ja     1216 <lex+0xe6>
mov    $0x800,%eax
xor    %ecx,%ecx
mov    %ebp,%edx
movslq (%r12,%rdx,4),%rdx
add    %r12,%rdx
jmp    *%rdx
mov    $0x2,%ecx
jmp    1174 <lex+0x44>
cs nopw 0x0(%rax,%rax,1)
nop
mov    %ebp,%edi
call   1030 <isdigit@plt>
mov    $0x1,%ecx
test   %eax,%eax
jne    1174 <lex+0x44>
mov    $0x3,%ecx
cmp    $0x2e,%bpl
je     1174 <lex+0x44>
jmp    120f <lex+0xdf>
nopl   (%rax)
mov    %ebp,%edi
call   1030 <isdigit@plt>
mov    (%rbx),%edx
add    $0x1,%edx
mov    %edx,(%rbx)
mov    $0x3,%ecx
test   %eax,%eax
jne    117b <lex+0x4b>
xor    %eax,%eax
jmp    1245 <lex+0x115>
mov    $0x500,%eax
jmp    1245 <lex+0x115>
xor    %eax,%eax
jmp    1242 <lex+0x112>
mov    $0x600,%eax
jmp    1242 <lex+0x112>
mov    $0x700,%eax
jmp    1242 <lex+0x112>
mov    $0x300,%eax
jmp    1242 <lex+0x112>
mov    $0x100,%eax
jmp    1242 <lex+0x112>
mov    $0x200,%eax
jmp    1242 <lex+0x112>
mov    $0x400,%eax
addl   $0x1,(%rbx)
pop    %rbx
pop    %r12
pop    %r14
pop    %r15
pop    %rbp
ret
lea    0xe7b(%rip),%rdi
call   1040 <printf@plt>
mov    $0x1,%edi
call   1050 <exit@plt>

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

LLVM IR (-O2):
@.str = [22 x i8] c"Lex:Estado indefinido\00"
define i32 @lex(i8* nocapture %0, i32* %1) {
%3 = load i32, i32* %1
br label %4
4: ; preds = %40, %2
%5 = phi i32 [ %3, %2 ], [ %41, %40 ]
%6 = phi i32 [ 0, %2 ], [ %42, %40 ]
%7 = sext i32 %5 to i64
%8 = getelementptr inbounds i8, i8* %0, i64 %7
%9 = load i8, i8* %8
switch i32 %6, label %33 [
i32 0, label %10
i32 1, label %20
i32 2, label %25
i32 3, label %30
]
10: ; preds = %4
%11 = tail call i32 @isdigit(i8 signext %9)
%12 = icmp eq i32 %11, 0
br i1 %12, label %13, label %36
13: ; preds = %10
%14 = sext i8 %9 to i32
switch i32 %14, label %19 [
i32 32, label %36
i32 46, label %15
i32 43, label %43
i32 45, label %44
i32 42, label %45
i32 47, label %16
i32 40, label %17
i32 41, label %18
i32 0, label %49
]
15: ; preds = %13
br label %36
16: ; preds = %13
br label %45
17: ; preds = %13
br label %45
18: ; preds = %13
br label %45
19: ; preds = %13
br label %45
20: ; preds = %4
%21 = tail call i32 @isdigit(i8 signext %9)
%22 = icmp eq i32 %21, 0
br i1 %22, label %23, label %36
23: ; preds = %20
%24 = icmp eq i8 %9, 46
br i1 %24, label %36, label %49
25: ; preds = %4
%26 = tail call i32 @isdigit(i8 signext %9)
%27 = icmp eq i32 %26, 0
%28 = load i32, i32* %1
%29 = add nsw i32 %28, 1
store i32 %29, i32* %1
br i1 %27, label %49, label %40
30: ; preds = %4
%31 = tail call i32 @isdigit(i8 signext %9)
%32 = icmp eq i32 %31, 0
br i1 %32, label %49, label %36
33: ; preds = %4
%34 = tail call i32 @printf(i8* dereferenceable(1) getelementptr inbounds ([22 x i8], [22 x i8]* @.str, i64 0, i64 0))
%35 = tail call i32 @exit(i32 1)
unreachable
36: ; preds = %30, %23, %20, %13, %10, %15
%37 = phi i32 [ 2, %15 ], [ 1, %10 ], [ 0, %13 ], [ 1, %20 ], [ 3, %23 ], [ 3, %30 ]
%38 = load i32, i32* %1
%39 = add nsw i32 %38, 1
store i32 %39, i32* %1
br label %40
40: ; preds = %36, %25
%41 = phi i32 [ %29, %25 ], [ %39, %36 ]
%42 = phi i32 [ 3, %25 ], [ %37, %36 ]
br label %4
43: ; preds = %13
br label %45
44: ; preds = %13
br label %45
45: ; preds = %13, %44, %43, %16, %17, %18, %19
%46 = phi i32 [ 1024, %16 ], [ 1536, %17 ], [ 1792, %18 ], [ 0, %19 ], [ 256, %43 ], [ 512, %44 ], [ 768, %13 ]
%47 = load i32, i32* %1
%48 = add nsw i32 %47, 1
store i32 %48, i32* %1
br label %49
49: ; preds = %30, %23, %13, %25, %45
%50 = phi i32 [ %46, %45 ], [ 0, %25 ], [ 1280, %30 ], [ 1280, %23 ], [ 2048, %13 ]
ret i32 %50
}