int tisint(p)
char *p;
{
  char *pp;
  pp = p;
  while (*pp != '\0') {
    if (*pp == '.')
      return 0;
    pp++;
  }
  if ((*p != '+') && (*p != '-') && !(isdigit((int)*p)))
    return 0;
  p++;
  while (*p != '\0') {
    if (!(isdigit((int)*p)))
      return 0;
    p++;
  }
  return 1;
}


x86 assembly (clang, -O0):
<tisint>:
push   %rbp
mov    %rsp,%rbp
sub    $0x20,%rsp
mov    %rdi,-0x10(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,-0x18(%rbp)
mov    -0x18(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x0,%eax
je     1161 <tisint+0x51>
mov    -0x18(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x2e,%eax
jne    1150 <tisint+0x40>
movl   $0x0,-0x4(%rbp)
jmp    11f7 <tisint+0xe7>
mov    -0x18(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x18(%rbp)
jmp    1124 <tisint+0x14>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x2b,%eax
je     11a2 <tisint+0x92>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x2d,%eax
je     11a2 <tisint+0x92>
mov    -0x10(%rbp),%rax
movsbl (%rax),%edi
call   1030 <isdigit@plt>
cmp    $0x0,%eax
jne    11a2 <tisint+0x92>
movl   $0x0,-0x4(%rbp)
jmp    11f7 <tisint+0xe7>
mov    -0x10(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x10(%rbp)
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x0,%eax
je     11f0 <tisint+0xe0>
mov    -0x10(%rbp),%rax
movsbl (%rax),%edi
call   1030 <isdigit@plt>
cmp    $0x0,%eax
jne    11df <tisint+0xcf>
movl   $0x0,-0x4(%rbp)
jmp    11f7 <tisint+0xe7>
mov    -0x10(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x10(%rbp)
jmp    11ae <tisint+0x9e>
movl   $0x1,-0x4(%rbp)
mov    -0x4(%rbp),%eax
add    $0x20,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<tisint>:
mov    %rdi,%rax
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
movzbl (%rax),%ecx
test   %cl,%cl
je     1122 <tisint+0x22>
cmp    $0x2e,%cl
je     1153 <tisint+0x53>
add    $0x1,%rax
jmp    1110 <tisint+0x10>
movsbl (%rdi),%ecx
cmp    $0x2b,%ecx
je     1139 <tisint+0x39>
cmp    $0x2d,%cl
je     1139 <tisint+0x39>
add    $0xffffffd0,%ecx
xor    %eax,%eax
cmp    $0x9,%ecx
ja     1155 <tisint+0x55>
add    $0x1,%rdi
nopl   (%rax)
movsbl (%rdi),%eax
test   %eax,%eax
je     1156 <tisint+0x56>
add    $0xffffffd0,%eax
add    $0x1,%rdi
cmp    $0xa,%eax
jb     1140 <tisint+0x40>
xor    %eax,%eax
ret
mov    $0x1,%eax
ret

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

LLVM IR (-O2):
define i32 @tisint(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 %5 [
i8 0, label %7
i8 46, label %23
]
5: ; preds = %2
%6 = getelementptr inbounds i8, i8* %3, i64 1
br label %2
7: ; preds = %2
%8 = load i8, i8* %0
switch i8 %8, label %9 [
i8 43, label %13
i8 45, label %13
]
9: ; preds = %7
%10 = sext i8 %8 to i32
%11 = add nsw i32 %10, -48
%12 = icmp ult i32 %11, 10
br i1 %12, label %13, label %23
13: ; preds = %7, %7, %9
br label %14
14: ; preds = %13, %19
%15 = phi i8* [ %16, %19 ], [ %0, %13 ]
%16 = getelementptr inbounds i8, i8* %15, i64 1
%17 = load i8, i8* %16
%18 = icmp eq i8 %17, 0
br i1 %18, label %23, label %19
19: ; preds = %14
%20 = sext i8 %17 to i32
%21 = add nsw i32 %20, -48
%22 = icmp ult i32 %21, 10
br i1 %22, label %14, label %23
23: ; preds = %2, %14, %19, %9
%24 = phi i32 [ 0, %9 ], [ 1, %14 ], [ 0, %19 ], [ 0, %2 ]
ret i32 %24
}