int Tcl_StrToInt(string, base, intPtr) const char *string;
int base;
int *intPtr;
{
  char *end;
  int num;
  num = strtol(string, &end, base);
  while ((*end != '\0') && isspace(*end)) {
    end++;
  }
  if ((end == string) || (*end != 0))
    return (0);
  *intPtr = num;
  return (1);
}


x86 assembly (clang, -O0):
<Tcl_StrToInt>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    %rdi,-0x10(%rbp)
mov    %esi,-0x14(%rbp)
mov    %rdx,-0x20(%rbp)
mov    -0x10(%rbp),%rdi
mov    -0x14(%rbp),%edx
lea    -0x28(%rbp),%rsi
call   1040 <strtol@plt>
mov    %eax,-0x2c(%rbp)
mov    -0x28(%rbp),%rax
movsbl (%rax),%ecx
xor    %eax,%eax
cmp    $0x0,%ecx
mov    %al,-0x2d(%rbp)
je     1170 <Tcl_StrToInt+0x50>
mov    -0x28(%rbp),%rax
movsbl (%rax),%edi
call   1030 <isspace@plt>
cmp    $0x0,%eax
setne  %al
mov    %al,-0x2d(%rbp)
mov    -0x2d(%rbp),%al
test   $0x1,%al
jne    1180 <Tcl_StrToInt+0x60>
jmp    1191 <Tcl_StrToInt+0x71>
mov    -0x28(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x28(%rbp)
jmp    1146 <Tcl_StrToInt+0x26>
mov    -0x28(%rbp),%rax
cmp    -0x10(%rbp),%rax
je     11af <Tcl_StrToInt+0x8f>
mov    -0x28(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x0,%eax
je     11bb <Tcl_StrToInt+0x9b>
movl   $0x0,-0x4(%rbp)
jmp    11cb <Tcl_StrToInt+0xab>
mov    -0x2c(%rbp),%ecx
mov    -0x20(%rbp),%rax
mov    %ecx,(%rax)
movl   $0x1,-0x4(%rbp)
mov    -0x4(%rbp),%eax
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<Tcl_StrToInt>:
push   %r15
push   %r14
push   %r12
push   %rbx
push   %rax
mov    %rdx,%r14
mov    %esi,%edx
mov    %rdi,%r12
mov    %rsp,%rsi
call   1040 <strtol@plt>
mov    %rax,%r15
mov    (%rsp),%rbx
mov    (%rbx),%al
test   %al,%al
je     1168 <Tcl_StrToInt+0x48>
cs nopw 0x0(%rax,%rax,1)
nop
movsbl %al,%edi
call   1030 <isspace@plt>
test   %eax,%eax
je     1177 <Tcl_StrToInt+0x57>
movzbl 0x1(%rbx),%eax
add    $0x1,%rbx
test   %al,%al
jne    1150 <Tcl_StrToInt+0x30>
cmp    %r12,%rbx
je     1177 <Tcl_StrToInt+0x57>
mov    %r15d,(%r14)
mov    $0x1,%eax
jmp    1179 <Tcl_StrToInt+0x59>
xor    %eax,%eax
add    $0x8,%rsp
pop    %rbx
pop    %r12
pop    %r14
pop    %r15
ret

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

LLVM IR (-O2):
define i32 @Tcl_StrToInt(i8* %0, i32 %1, i32* nocapture writeonly %2) {
%4 = alloca i8*
%5 = bitcast i8** %4 to i8*
%6 = call i64 @strtol(i8* %0, i8** %4, i32 %1)
%7 = trunc i64 %6 to i32
%8 = load i8*, i8** %4
%9 = load i8, i8* %8
%10 = icmp eq i8 %9, 0
br i1 %10, label %21, label %11
11: ; preds = %3, %17
%12 = phi i8 [ %19, %17 ], [ %9, %3 ]
%13 = phi i8* [ %18, %17 ], [ %8, %3 ]
%14 = sext i8 %12 to i32
%15 = tail call i32 @isspace(i32 %14)
%16 = icmp eq i32 %15, 0
br i1 %16, label %25, label %17
17: ; preds = %11
%18 = getelementptr inbounds i8, i8* %13, i64 1
%19 = load i8, i8* %18
%20 = icmp eq i8 %19, 0
br i1 %20, label %21, label %11
21: ; preds = %17, %3
%22 = phi i8* [ %8, %3 ], [ %18, %17 ]
%23 = icmp eq i8* %22, %0
br i1 %23, label %25, label %24
24: ; preds = %21
store i32 %7, i32* %2
br label %25
25: ; preds = %11, %21, %24
%26 = phi i32 [ 1, %24 ], [ 0, %21 ], [ 0, %11 ]
ret i32 %26
}