int is_integer(s) const char *s;
{
  if (*s == '-' || *s == '+')
    s++;
  if (*s < '0' || '9' < *s)
    return 0;
  s++;
  while ('0' <= *s && *s <= '9')
    s++;
  return (*s == '\0');
}


x86 assembly (clang, -O0):
<is_integer>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x10(%rbp)
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x2d,%eax
je     1128 <is_integer+0x28>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x2b,%eax
jne    1134 <is_integer+0x34>
mov    -0x10(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x10(%rbp)
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x30,%eax
jl     1158 <is_integer+0x58>
mov    -0x10(%rbp),%rax
movsbl (%rax),%ecx
mov    $0x39,%eax
cmp    %ecx,%eax
jge    1164 <is_integer+0x64>
movl   $0x0,-0x4(%rbp)
jmp    11cf <is_integer+0xcf>
mov    -0x10(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x10(%rbp)
mov    -0x10(%rbp),%rax
movsbl (%rax),%edx
xor    %eax,%eax
mov    $0x30,%ecx
cmp    %edx,%ecx
mov    %al,-0x11(%rbp)
jg     1199 <is_integer+0x99>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x39,%eax
setle  %al
mov    %al,-0x11(%rbp)
mov    -0x11(%rbp),%al
test   $0x1,%al
jne    11a9 <is_integer+0xa9>
jmp    11ba <is_integer+0xba>
mov    -0x10(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x10(%rbp)
jmp    1170 <is_integer+0x70>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x0,%eax
sete   %al
and    $0x1,%al
movzbl %al,%eax
mov    %eax,-0x4(%rbp)
mov    -0x4(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<is_integer>:
mov    (%rdi),%cl
cmp    $0x2d,%cl
je     110c <is_integer+0xc>
cmp    $0x2b,%cl
jne    1113 <is_integer+0x13>
mov    0x1(%rdi),%cl
add    $0x1,%rdi
add    $0xc6,%cl
xor    %eax,%eax
cmp    $0xf6,%cl
jb     1145 <is_integer+0x45>
add    $0x1,%rdi
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
movzbl (%rdi),%ecx
lea    -0x30(%rcx),%eax
add    $0x1,%rdi
cmp    $0xa,%al
jb     1130 <is_integer+0x30>
xor    %eax,%eax
test   %cl,%cl
sete   %al
ret

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

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