char *strtok(char *s, const char *d) {
  static char *p;
  if (!(p = (s) ? s : 0))
    return 0;
  s = p + strspn(p, d);
  p = s + strcspn(s, d);
  if (p == s)
    return p = 0;
  p = *p ? *p = 0, p + 1 : 0;
  return s;
}


x86 assembly (clang, -O0):
<strtok>:
push   %rbp
mov    %rsp,%rbp
sub    $0x40,%rsp
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
cmpq   $0x0,-0x10(%rbp)
je     1148 <strtok+0x28>
mov    -0x10(%rbp),%rax
mov    %rax,-0x20(%rbp)
jmp    1153 <strtok+0x33>
xor    %eax,%eax
mov    %rax,-0x20(%rbp)
jmp    1153 <strtok+0x33>
mov    -0x20(%rbp),%rax
mov    %rax,0x2eda(%rip)
cmp    $0x0,%rax
jne    1175 <strtok+0x55>
movq   $0x0,-0x8(%rbp)
jmp    123c <strtok+0x11c>
mov    0x2ebc(%rip),%rax
mov    %rax,-0x30(%rbp)
mov    0x2eb1(%rip),%rdi
mov    -0x18(%rbp),%rsi
call   1030 <strspn@plt>
mov    %rax,%rcx
mov    -0x30(%rbp),%rax
add    %rcx,%rax
mov    %rax,-0x10(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,-0x28(%rbp)
mov    -0x10(%rbp),%rdi
mov    -0x18(%rbp),%rsi
call   1040 <strcspn@plt>
mov    %rax,%rcx
mov    -0x28(%rbp),%rax
add    %rcx,%rax
mov    %rax,0x2e74(%rip)
mov    0x2e6d(%rip),%rax
cmp    -0x10(%rbp),%rax
jne    11ed <strtok+0xcd>
movq   $0x0,0x2e58(%rip)
movq   $0x0,-0x8(%rbp)
jmp    123c <strtok+0x11c>
mov    0x2e44(%rip),%rax
movsbl (%rax),%eax
cmp    $0x0,%eax
je     121e <strtok+0xfe>
mov    0x2e31(%rip),%rax
movb   $0x0,(%rax)
mov    0x2e27(%rip),%rax
add    $0x1,%rax
mov    %rax,-0x38(%rbp)
jmp    1229 <strtok+0x109>
xor    %eax,%eax
mov    %rax,-0x38(%rbp)
jmp    1229 <strtok+0x109>
mov    -0x38(%rbp),%rax
mov    %rax,0x2e04(%rip)
mov    -0x10(%rbp),%rax
mov    %rax,-0x8(%rbp)
mov    -0x8(%rbp),%rax
add    $0x40,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<strtok>:
push   %r15
push   %r14
push   %rbx
mov    %rdi,0x2f0c(%rip)
test   %rdi,%rdi
je     1163 <strtok+0x43>
mov    %rsi,%r14
mov    %rdi,%rbx
call   1030 <strspn@plt>
mov    %rax,%r15
add    %rbx,%r15
mov    %r15,%rdi
mov    %r14,%rsi
call   1040 <strcspn@plt>
test   %rax,%rax
je     1168 <strtok+0x48>
add    %r15,%rax
cmpb   $0x0,(%rax)
je     116f <strtok+0x4f>
movb   $0x0,(%rax)
add    $0x1,%rax
jmp    1171 <strtok+0x51>
xor    %r15d,%r15d
jmp    1178 <strtok+0x58>
xor    %eax,%eax
xor    %r15d,%r15d
jmp    1171 <strtok+0x51>
xor    %eax,%eax
mov    %rax,0x2ec0(%rip)
mov    %r15,%rax
pop    %rbx
pop    %r14
pop    %r15
ret

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

LLVM IR (-O2):
@strtok.p = internal unnamed_addr global i8* null
define i8* @strtok(i8* %0, i8* nocapture %1) {
%3 = icmp eq i8* %0, null
store i8* %0, i8** @strtok.p
br i1 %3, label %18, label %4
4: ; preds = %2
%5 = tail call i64 @strspn(i8* %0, i8* %1)
%6 = getelementptr inbounds i8, i8* %0, i64 %5
%7 = tail call i64 @strcspn(i8* %6, i8* %1)
%8 = getelementptr inbounds i8, i8* %6, i64 %7
%9 = icmp eq i64 %7, 0
br i1 %9, label %15, label %10
10: ; preds = %4
%11 = load i8, i8* %8
%12 = icmp eq i8 %11, 0
br i1 %12, label %15, label %13
13: ; preds = %10
store i8 0, i8* %8
%14 = getelementptr inbounds i8, i8* %8, i64 1
br label %15
15: ; preds = %13, %10, %4
%16 = phi i8* [ null, %4 ], [ %14, %13 ], [ null, %10 ]
%17 = phi i8* [ null, %4 ], [ %6, %13 ], [ %6, %10 ]
store i8* %16, i8** @strtok.p
br label %18
18: ; preds = %15, %2
%19 = phi i8* [ null, %2 ], [ %17, %15 ]
ret i8* %19
}