int is_num(char *st) {
  int period_flag;
  while (*st == ' ' || *st == '\t')
    ++st;
  if ((*st == '-') || (*st == '+'))
    ++st;
  period_flag = 0;
  while ((*st >= '0') && (*st <= '9') || (*st == '.' && period_flag == 0)) {
    if (*st == '.')
      period_flag = 1;
    st++;
  }
  while (*st) {
    if ((*st != '\t') && (*st != ' '))
      return (0);
    st++;
  }
  return (1);
}


x86 assembly (clang, -O0):
<is_num>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x10(%rbp)
mov    -0x10(%rbp),%rax
movsbl (%rax),%ecx
mov    $0x1,%al
cmp    $0x20,%ecx
mov    %al,-0x15(%rbp)
je     112d <is_num+0x2d>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x9,%eax
sete   %al
mov    %al,-0x15(%rbp)
mov    -0x15(%rbp),%al
test   $0x1,%al
jne    113d <is_num+0x3d>
jmp    114e <is_num+0x4e>
mov    -0x10(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x10(%rbp)
jmp    1108 <is_num+0x8>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x2d,%eax
je     116e <is_num+0x6e>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x2b,%eax
jne    117a <is_num+0x7a>
mov    -0x10(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x10(%rbp)
movl   $0x0,-0x14(%rbp)
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x30,%eax
jl     11a6 <is_num+0xa6>
mov    -0x10(%rbp),%rax
movsbl (%rax),%ecx
mov    $0x1,%al
cmp    $0x39,%ecx
mov    %al,-0x16(%rbp)
jle    11cb <is_num+0xcb>
mov    -0x10(%rbp),%rax
movsbl (%rax),%ecx
xor    %eax,%eax
cmp    $0x2e,%ecx
mov    %al,-0x17(%rbp)
jne    11c5 <is_num+0xc5>
cmpl   $0x0,-0x14(%rbp)
sete   %al
mov    %al,-0x17(%rbp)
mov    -0x17(%rbp),%al
mov    %al,-0x16(%rbp)
mov    -0x16(%rbp),%al
test   $0x1,%al
jne    11db <is_num+0xdb>
jmp    1203 <is_num+0x103>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x2e,%eax
jne    11f2 <is_num+0xf2>
movl   $0x1,-0x14(%rbp)
mov    -0x10(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x10(%rbp)
jmp    1181 <is_num+0x81>
jmp    1208 <is_num+0x108>
mov    -0x10(%rbp),%rax
cmpb   $0x0,(%rax)
je     1252 <is_num+0x152>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x9,%eax
je     1241 <is_num+0x141>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x20,%eax
je     1241 <is_num+0x141>
movl   $0x0,-0x4(%rbp)
jmp    1259 <is_num+0x159>
mov    -0x10(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x10(%rbp)
jmp    1208 <is_num+0x108>
movl   $0x1,-0x4(%rbp)
mov    -0x4(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<is_num>:
lea    0xef9(%rip),%rax
nopw   0x0(%rax,%rax,1)
movzbl (%rdi),%ecx
add    $0xf7,%cl
cmp    $0x24,%cl
ja     1131 <is_num+0x31>
movzbl %cl,%ecx
movslq (%rax,%rcx,4),%rcx
add    %rax,%rcx
jmp    *%rcx
add    $0x1,%rdi
jmp    1110 <is_num+0x10>
add    $0x1,%rdi
add    $0x1,%rdi
xor    %ecx,%ecx
mov    $0x1,%edx
jmp    1149 <is_num+0x49>
xchg   %ax,%ax
cmp    $0x2e,%al
cmove  %edx,%ecx
add    $0x1,%rdi
movzbl -0x1(%rdi),%eax
lea    -0x30(%rax),%esi
cmp    $0xa,%sil
jb     1140 <is_num+0x40>
cmp    $0x2e,%al
jne    1167 <is_num+0x67>
test   %ecx,%ecx
je     1140 <is_num+0x40>
jmp    1167 <is_num+0x67>
movzbl (%rdi),%eax
add    $0x1,%rdi
cmp    $0x9,%al
je     1160 <is_num+0x60>
cmp    $0x20,%al
je     1160 <is_num+0x60>
test   %al,%al
jne    1179 <is_num+0x79>
mov    $0x1,%eax
ret
xor    %eax,%eax
ret

LLVM IR (-O0):
define i32 @is_num(i8* %0) {
%2 = alloca i32
%3 = alloca i8*
%4 = alloca i32
store i8* %0, i8** %3
br label %5
5: ; preds = %17, %1
%6 = load i8*, i8** %3
%7 = load i8, i8* %6
%8 = sext i8 %7 to i32
%9 = icmp eq i32 %8, 32
br i1 %9, label %15, label %10
10: ; preds = %5
%11 = load i8*, i8** %3
%12 = load i8, i8* %11
%13 = sext i8 %12 to i32
%14 = icmp eq i32 %13, 9
br label %15
15: ; preds = %10, %5
%16 = phi i1 [ true, %5 ], [ %14, %10 ]
br i1 %16, label %17, label %20
17: ; preds = %15
%18 = load i8*, i8** %3
%19 = getelementptr inbounds i8, i8* %18, i32 1
store i8* %19, i8** %3
br label %5
20: ; preds = %15
%21 = load i8*, i8** %3
%22 = load i8, i8* %21
%23 = sext i8 %22 to i32
%24 = icmp eq i32 %23, 45
br i1 %24, label %30, label %25
25: ; preds = %20
%26 = load i8*, i8** %3
%27 = load i8, i8* %26
%28 = sext i8 %27 to i32
%29 = icmp eq i32 %28, 43
br i1 %29, label %30, label %33
30: ; preds = %25, %20
%31 = load i8*, i8** %3
%32 = getelementptr inbounds i8, i8* %31, i32 1
store i8* %32, i8** %3
br label %33
33: ; preds = %30, %25
store i32 0, i32* %4
br label %34
34: ; preds = %62, %33
%35 = load i8*, i8** %3
%36 = load i8, i8* %35
%37 = sext i8 %36 to i32
%38 = icmp sge i32 %37, 48
br i1 %38, label %39, label %44
39: ; preds = %34
%40 = load i8*, i8** %3
%41 = load i8, i8* %40
%42 = sext i8 %41 to i32
%43 = icmp sle i32 %42, 57
br i1 %43, label %54, label %44
44: ; preds = %39, %34
%45 = load i8*, i8** %3
%46 = load i8, i8* %45
%47 = sext i8 %46 to i32
%48 = icmp eq i32 %47, 46
br i1 %48, label %49, label %52
49: ; preds = %44
%50 = load i32, i32* %4
%51 = icmp eq i32 %50, 0
br label %52
52: ; preds = %49, %44
%53 = phi i1 [ false, %44 ], [ %51, %49 ]
br label %54
54: ; preds = %52, %39
%55 = phi i1 [ true, %39 ], [ %53, %52 ]
br i1 %55, label %56, label %65
56: ; preds = %54
%57 = load i8*, i8** %3
%58 = load i8, i8* %57
%59 = sext i8 %58 to i32
%60 = icmp eq i32 %59, 46
br i1 %60, label %61, label %62
61: ; preds = %56
store i32 1, i32* %4
br label %62
62: ; preds = %61, %56
%63 = load i8*, i8** %3
%64 = getelementptr inbounds i8, i8* %63, i32 1
store i8* %64, i8** %3
br label %34
65: ; preds = %54
br label %66
66: ; preds = %81, %65
%67 = load i8*, i8** %3
%68 = load i8, i8* %67
%69 = icmp ne i8 %68, 0
br i1 %69, label %70, label %84
70: ; preds = %66
%71 = load i8*, i8** %3
%72 = load i8, i8* %71
%73 = sext i8 %72 to i32
%74 = icmp ne i32 %73, 9
br i1 %74, label %75, label %81
75: ; preds = %70
%76 = load i8*, i8** %3
%77 = load i8, i8* %76
%78 = sext i8 %77 to i32
%79 = icmp ne i32 %78, 32
br i1 %79, label %80, label %81
80: ; preds = %75
store i32 0, i32* %2
br label %85
81: ; preds = %75, %70
%82 = load i8*, i8** %3
%83 = getelementptr inbounds i8, i8* %82, i32 1
store i8* %83, i8** %3
br label %66
84: ; preds = %66
store i32 1, i32* %2
br label %85
85: ; preds = %84, %80
%86 = load i32, i32* %2
ret i32 %86
}

LLVM IR (-O2):
define i32 @is_num(i8* nocapture %0) {
br label %2
2: ; preds = %5, %1
%3 = phi i8* [ %0, %1 ], [ %6, %5 ]
%4 = load i8, i8* %3
switch i8 %4, label %9 [
i8 32, label %5
i8 9, label %5
i8 45, label %7
i8 43, label %7
]
5: ; preds = %2, %2
%6 = getelementptr inbounds i8, i8* %3, i64 1
br label %2
7: ; preds = %2, %2
%8 = getelementptr inbounds i8, i8* %3, i64 1
br label %9
9: ; preds = %2, %7
%10 = phi i8* [ %8, %7 ], [ %3, %2 ]
br label %11
11: ; preds = %9, %21
%12 = phi i8* [ %24, %21 ], [ %10, %9 ]
%13 = phi i32 [ %23, %21 ], [ 0, %9 ]
%14 = load i8, i8* %12
%15 = add i8 %14, -48
%16 = icmp ult i8 %15, 10
br i1 %16, label %21, label %17
17: ; preds = %11
%18 = icmp eq i8 %14, 46
%19 = icmp eq i32 %13, 0
%20 = select i1 %18, i1 %19, i1 false
br i1 %20, label %21, label %25
21: ; preds = %11, %17
%22 = icmp eq i8 %14, 46
%23 = select i1 %22, i32 1, i32 %13
%24 = getelementptr inbounds i8, i8* %12, i64 1
br label %11
25: ; preds = %17, %28
%26 = phi i8 [ %30, %28 ], [ %14, %17 ]
%27 = phi i8* [ %29, %28 ], [ %12, %17 ]
switch i8 %26, label %31 [
i8 0, label %32
i8 9, label %28
i8 32, label %28
]
28: ; preds = %25, %25
%29 = getelementptr inbounds i8, i8* %27, i64 1
%30 = load i8, i8* %29
br label %25
31: ; preds = %25
br label %32
32: ; preds = %25, %31
%33 = phi i32 [ 0, %31 ], [ 1, %25 ]
ret i32 %33
}