int proto_check_numeric(char *p, int len) {
  while ((len--) > 0) {
    if ((p[len] < '0') || (p[len] > '9')) {
      if ((0 == len) && (('-' == p[len]) || ('+' == p[len]))) {
        return 1;
      }
      return 0;
    }
  }
  return 1;
}


x86 assembly (clang, -O0):
<proto_check_numeric>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x10(%rbp)
mov    %esi,-0x14(%rbp)
mov    -0x14(%rbp),%eax
mov    %eax,%ecx
add    $0xffffffff,%ecx
mov    %ecx,-0x14(%rbp)
cmp    $0x0,%eax
jle    11a3 <proto_check_numeric+0xa3>
mov    -0x10(%rbp),%rax
movslq -0x14(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x30,%eax
jl     1149 <proto_check_numeric+0x49>
mov    -0x10(%rbp),%rax
movslq -0x14(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x39,%eax
jle    119e <proto_check_numeric+0x9e>
xor    %eax,%eax
cmp    -0x14(%rbp),%eax
jne    1192 <proto_check_numeric+0x92>
mov    -0x10(%rbp),%rax
movslq -0x14(%rbp),%rcx
movsbl (%rax,%rcx,1),%ecx
mov    $0x2d,%eax
cmp    %ecx,%eax
je     1186 <proto_check_numeric+0x86>
mov    -0x10(%rbp),%rax
movslq -0x14(%rbp),%rcx
movsbl (%rax,%rcx,1),%ecx
mov    $0x2b,%eax
cmp    %ecx,%eax
jne    1192 <proto_check_numeric+0x92>
movl   $0x1,-0x4(%rbp)
jmp    11aa <proto_check_numeric+0xaa>
movl   $0x0,-0x4(%rbp)
jmp    11aa <proto_check_numeric+0xaa>
jmp    110b <proto_check_numeric+0xb>
movl   $0x1,-0x4(%rbp)
mov    -0x4(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<proto_check_numeric>:
mov    %esi,%ecx
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
test   %ecx,%ecx
jle    112b <proto_check_numeric+0x2b>
movzbl -0x1(%rdi,%rcx,1),%edx
lea    -0x3a(%rdx),%eax
add    $0xffffffffffffffff,%rcx
cmp    $0xf5,%al
ja     1110 <proto_check_numeric+0x10>
xor    %eax,%eax
test   %ecx,%ecx
je     1131 <proto_check_numeric+0x31>
ret
mov    $0x1,%eax
ret
add    $0xd5,%dl
xor    %eax,%eax
test   $0xfd,%dl
sete   %al
ret

LLVM IR (-O0):
define i32 @proto_check_numeric(i8* %0, i32 %1) {
%3 = alloca i32
%4 = alloca i8*
%5 = alloca i32
store i8* %0, i8** %4
store i32 %1, i32* %5
br label %6
6: ; preds = %47, %2
%7 = load i32, i32* %5
%8 = add nsw i32 %7, -1
store i32 %8, i32* %5
%9 = icmp sgt i32 %7, 0
br i1 %9, label %10, label %48
10: ; preds = %6
%11 = load i8*, i8** %4
%12 = load i32, i32* %5
%13 = sext i32 %12 to i64
%14 = getelementptr inbounds i8, i8* %11, i64 %13
%15 = load i8, i8* %14
%16 = sext i8 %15 to i32
%17 = icmp slt i32 %16, 48
br i1 %17, label %26, label %18
18: ; preds = %10
%19 = load i8*, i8** %4
%20 = load i32, i32* %5
%21 = sext i32 %20 to i64
%22 = getelementptr inbounds i8, i8* %19, i64 %21
%23 = load i8, i8* %22
%24 = sext i8 %23 to i32
%25 = icmp sgt i32 %24, 57
br i1 %25, label %26, label %47
26: ; preds = %18, %10
%27 = load i32, i32* %5
%28 = icmp eq i32 0, %27
br i1 %28, label %29, label %46
29: ; preds = %26
%30 = load i8*, i8** %4
%31 = load i32, i32* %5
%32 = sext i32 %31 to i64
%33 = getelementptr inbounds i8, i8* %30, i64 %32
%34 = load i8, i8* %33
%35 = sext i8 %34 to i32
%36 = icmp eq i32 45, %35
br i1 %36, label %45, label %37
37: ; preds = %29
%38 = load i8*, i8** %4
%39 = load i32, i32* %5
%40 = sext i32 %39 to i64
%41 = getelementptr inbounds i8, i8* %38, i64 %40
%42 = load i8, i8* %41
%43 = sext i8 %42 to i32
%44 = icmp eq i32 43, %43
br i1 %44, label %45, label %46
45: ; preds = %37, %29
store i32 1, i32* %3
br label %49
46: ; preds = %37, %26
store i32 0, i32* %3
br label %49
47: ; preds = %18
br label %6
48: ; preds = %6
store i32 1, i32* %3
br label %49
49: ; preds = %48, %46, %45
%50 = load i32, i32* %3
ret i32 %50
}

LLVM IR (-O2):
define i32 @proto_check_numeric(i8* nocapture %0, i32 %1) {
%3 = zext i32 %1 to i64
br label %4
4: ; preds = %9, %2
%5 = phi i64 [ %6, %9 ], [ %3, %2 ]
%6 = add nsw i64 %5, -1
%7 = trunc i64 %5 to i32
%8 = icmp sgt i32 %7, 0
br i1 %8, label %9, label %22
9: ; preds = %4
%10 = getelementptr inbounds i8, i8* %0, i64 %6
%11 = load i8, i8* %10
%12 = add i8 %11, -58
%13 = icmp ult i8 %12, -10
br i1 %13, label %14, label %4
14: ; preds = %9
%15 = trunc i64 %6 to i32
%16 = icmp eq i32 %15, 0
br i1 %16, label %17, label %22
17: ; preds = %14
%18 = icmp eq i8 %11, 45
%19 = icmp eq i8 %11, 43
%20 = or i1 %18, %19
%21 = zext i1 %20 to i32
br label %22
22: ; preds = %4, %14, %17
%23 = phi i32 [ %21, %17 ], [ 0, %14 ], [ 1, %4 ]
ret i32 %23
}