long put_string(string)
char *string[];
{
  char *pstr;
  long flag;
  if (sscanf(*string, "%d", &flag) != 1)
    return (0);
  pstr = *string;
  for (; (*pstr == ' ') && (*pstr != '\0'); pstr++) {
  }
  for (; ((((*pstr) >= '0') && ((*pstr) <= '9')) ? 1 : 0) && (*pstr != '\0');
       pstr++) {
  }
  if (!char_putstring(pstr, flag))
    return (0);
  return (1);
}


x86 assembly (clang, -O0):
<put_string>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    %rdi,-0x10(%rbp)
mov    -0x10(%rbp),%rax
mov    (%rax),%rdi
lea    0xec6(%rip),%rsi
lea    -0x20(%rbp),%rdx
mov    $0x0,%al
call   1030 <sscanf@plt>
cmp    $0x1,%eax
je     115b <put_string+0x3b>
movq   $0x0,-0x8(%rbp)
jmp    1260 <put_string+0x140>
mov    -0x10(%rbp),%rax
mov    (%rax),%rax
mov    %rax,-0x18(%rbp)
mov    -0x18(%rbp),%rax
movsbl (%rax),%ecx
xor    %eax,%eax
cmp    $0x20,%ecx
mov    %al,-0x21(%rbp)
jne    118b <put_string+0x6b>
mov    -0x18(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x0,%eax
setne  %al
mov    %al,-0x21(%rbp)
mov    -0x21(%rbp),%al
test   $0x1,%al
jne    119b <put_string+0x7b>
jmp    11b1 <put_string+0x91>
jmp    11a0 <put_string+0x80>
mov    -0x18(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x18(%rbp)
jmp    1166 <put_string+0x46>
jmp    11b6 <put_string+0x96>
mov    -0x18(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x30,%eax
jl     11eb <put_string+0xcb>
mov    -0x18(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x39,%eax
jg     11eb <put_string+0xcb>
xor    %eax,%eax
mov    $0x1,%cl
test   $0x1,%cl
mov    %al,-0x22(%rbp)
jne    11fd <put_string+0xdd>
jmp    120d <put_string+0xed>
xor    %eax,%eax
test   $0x1,%al
mov    %al,-0x22(%rbp)
jne    11fd <put_string+0xdd>
jmp    120d <put_string+0xed>
mov    -0x18(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x0,%eax
setne  %al
mov    %al,-0x22(%rbp)
mov    -0x22(%rbp),%al
test   $0x1,%al
jne    121d <put_string+0xfd>
jmp    1233 <put_string+0x113>
jmp    1222 <put_string+0x102>
mov    -0x18(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x18(%rbp)
jmp    11b6 <put_string+0x96>
mov    -0x18(%rbp),%rdi
mov    -0x20(%rbp),%rsi
mov    $0x0,%al
call   1040 <char_putstring@plt>
cmp    $0x0,%eax
jne    1258 <put_string+0x138>
movq   $0x0,-0x8(%rbp)
jmp    1260 <put_string+0x140>
movq   $0x1,-0x8(%rbp)
mov    -0x8(%rbp),%rax
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<put_string>:
push   %r14
push   %rbx
push   %rax
mov    %rdi,%r14
mov    (%rdi),%rdi
lea    0xecf(%rip),%rsi
xor    %ebx,%ebx
mov    %rsp,%rdx
xor    %eax,%eax
call   1030 <sscanf@plt>
cmp    $0x1,%eax
jne    1190 <put_string+0x70>
mov    (%r14),%rdi
add    $0xffffffffffffffff,%rdi
nopl   0x0(%rax)
movzbl 0x1(%rdi),%eax
add    $0x1,%rdi
cmp    $0x20,%al
je     1150 <put_string+0x30>
add    $0xd0,%al
cmp    $0x9,%al
ja     117e <put_string+0x5e>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
movzbl 0x1(%rdi),%eax
add    $0x1,%rdi
add    $0xd0,%al
cmp    $0xa,%al
jb     1170 <put_string+0x50>
mov    (%rsp),%rsi
xor    %eax,%eax
call   1040 <char_putstring@plt>
xor    %ebx,%ebx
test   %eax,%eax
setne  %bl
mov    %rbx,%rax
add    $0x8,%rsp
pop    %rbx
pop    %r14
ret

LLVM IR (-O0):
@.str = [3 x i8] c"%d\00"
define i64 @put_string(i8** %0) {
%2 = alloca i64
%3 = alloca i8**
%4 = alloca i8*
%5 = alloca i64
store i8** %0, i8*** %3
%6 = load i8**, i8*** %3
%7 = load i8*, i8** %6
%8 = call i32 (i8*, i8*, ...) @sscanf(i8* %7, i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str, i64 0, i64 0), i64* %5)
%9 = icmp ne i32 %8, 1
br i1 %9, label %10, label %11
10: ; preds = %1
store i64 0, i64* %2
br label %61
11: ; preds = %1
%12 = load i8**, i8*** %3
%13 = load i8*, i8** %12
store i8* %13, i8** %4
br label %14
14: ; preds = %27, %11
%15 = load i8*, i8** %4
%16 = load i8, i8* %15
%17 = sext i8 %16 to i32
%18 = icmp eq i32 %17, 32
br i1 %18, label %19, label %24
19: ; preds = %14
%20 = load i8*, i8** %4
%21 = load i8, i8* %20
%22 = sext i8 %21 to i32
%23 = icmp ne i32 %22, 0
br label %24
24: ; preds = %19, %14
%25 = phi i1 [ false, %14 ], [ %23, %19 ]
br i1 %25, label %26, label %30
26: ; preds = %24
br label %27
27: ; preds = %26
%28 = load i8*, i8** %4
%29 = getelementptr inbounds i8, i8* %28, i32 1
store i8* %29, i8** %4
br label %14
30: ; preds = %24
br label %31
31: ; preds = %51, %30
%32 = load i8*, i8** %4
%33 = load i8, i8* %32
%34 = sext i8 %33 to i32
%35 = icmp sge i32 %34, 48
br i1 %35, label %36, label %42
36: ; preds = %31
%37 = load i8*, i8** %4
%38 = load i8, i8* %37
%39 = sext i8 %38 to i32
%40 = icmp sle i32 %39, 57
br i1 %40, label %41, label %42
41: ; preds = %36
br i1 true, label %43, label %48
42: ; preds = %36, %31
br i1 false, label %43, label %48
43: ; preds = %42, %41
%44 = load i8*, i8** %4
%45 = load i8, i8* %44
%46 = sext i8 %45 to i32
%47 = icmp ne i32 %46, 0
br label %48
48: ; preds = %43, %42, %41
%49 = phi i1 [ false, %42 ], [ false, %41 ], [ %47, %43 ]
br i1 %49, label %50, label %54
50: ; preds = %48
br label %51
51: ; preds = %50
%52 = load i8*, i8** %4
%53 = getelementptr inbounds i8, i8* %52, i32 1
store i8* %53, i8** %4
br label %31
54: ; preds = %48
%55 = load i8*, i8** %4
%56 = load i64, i64* %5
%57 = call i32 (i8*, i64, ...) bitcast (i32 (...)* @char_putstring to i32 (i8*, i64, ...)*)(i8* %55, i64 %56)
%58 = icmp ne i32 %57, 0
br i1 %58, label %60, label %59
59: ; preds = %54
store i64 0, i64* %2
br label %61
60: ; preds = %54
store i64 1, i64* %2
br label %61
61: ; preds = %60, %59, %10
%62 = load i64, i64* %2
ret i64 %62
}

LLVM IR (-O2):
@.str = [3 x i8] c"%d\00"
define i64 @put_string(i8** nocapture %0) {
%2 = alloca i64
%3 = bitcast i64* %2 to i8*
%4 = load i8*, i8** %0
%5 = call i32 (i8*, i8*, ...) @sscanf(i8* %4, i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str, i64 0, i64 0), i64* %2)
%6 = icmp eq i32 %5, 1
br i1 %6, label %7, label %29
7: ; preds = %1
%8 = load i8*, i8** %0
br label %9
9: ; preds = %9, %7
%10 = phi i8* [ %8, %7 ], [ %13, %9 ]
%11 = load i8, i8* %10
%12 = icmp eq i8 %11, 32
%13 = getelementptr inbounds i8, i8* %10, i64 1
br i1 %12, label %9, label %14
14: ; preds = %9
%15 = add i8 %11, -48
%16 = icmp ult i8 %15, 10
br i1 %16, label %17, label %23
17: ; preds = %14, %17
%18 = phi i8* [ %19, %17 ], [ %10, %14 ]
%19 = getelementptr inbounds i8, i8* %18, i64 1
%20 = load i8, i8* %19
%21 = add i8 %20, -48
%22 = icmp ult i8 %21, 10
br i1 %22, label %17, label %23
23: ; preds = %17, %14
%24 = phi i8* [ %10, %14 ], [ %19, %17 ]
%25 = load i64, i64* %2
%26 = call i32 (i8*, i64, ...) bitcast (i32 (...)* @char_putstring to i32 (i8*, i64, ...)*)(i8* %24, i64 %25)
%27 = icmp ne i32 %26, 0
%28 = zext i1 %27 to i64
br label %29
29: ; preds = %23, %1
%30 = phi i64 [ 0, %1 ], [ %28, %23 ]
ret i64 %30
}