int substr(const char *pattern, const char *haystack) {
  const char *ph = haystack;
  while (*ph) {
    const char *pht = ph;
    const char *pp = pattern;
    while (*pp && *pht && *pp == *pht) {
      pp++;
      pht++;
    }
    if (!*pp)
      return 1;
    ph++;
  }
  return 0;
}


x86 assembly (clang, -O0):
<substr>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    -0x18(%rbp),%rax
mov    %rax,-0x20(%rbp)
mov    -0x20(%rbp),%rax
cmpb   $0x0,(%rax)
je     11c8 <substr+0xc8>
mov    -0x20(%rbp),%rax
mov    %rax,-0x28(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,-0x30(%rbp)
mov    -0x30(%rbp),%rax
movsbl (%rax),%ecx
xor    %eax,%eax
cmp    $0x0,%ecx
mov    %al,-0x31(%rbp)
je     1171 <substr+0x71>
mov    -0x28(%rbp),%rax
movsbl (%rax),%ecx
xor    %eax,%eax
cmp    $0x0,%ecx
mov    %al,-0x31(%rbp)
je     1171 <substr+0x71>
mov    -0x30(%rbp),%rax
movsbl (%rax),%eax
mov    -0x28(%rbp),%rcx
movsbl (%rcx),%ecx
cmp    %ecx,%eax
sete   %al
mov    %al,-0x31(%rbp)
mov    -0x31(%rbp),%al
test   $0x1,%al
jne    1181 <substr+0x81>
jmp    119e <substr+0x9e>
mov    -0x30(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x30(%rbp)
mov    -0x28(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x28(%rbp)
jmp    1131 <substr+0x31>
mov    -0x30(%rbp),%rax
cmpb   $0x0,(%rax)
jne    11b7 <substr+0xb7>
movl   $0x1,-0x4(%rbp)
jmp    11cf <substr+0xcf>
mov    -0x20(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x20(%rbp)
jmp    1114 <substr+0x14>
movl   $0x0,-0x4(%rbp)
mov    -0x4(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<substr>:
mov    (%rsi),%dl
xor    %eax,%eax
test   %dl,%dl
je     115d <substr+0x5d>
mov    (%rdi),%r8b
test   %r8b,%r8b
jne    112b <substr+0x2b>
mov    $0x1,%eax
ret
cs nopw 0x0(%rax,%rax,1)
mov    0x1(%rsi),%dl
add    $0x1,%rsi
test   %dl,%dl
je     115d <substr+0x5d>
test   %dl,%dl
je     1120 <substr+0x20>
cmp    %dl,%r8b
jne    1120 <substr+0x20>
mov    $0x1,%edx
nopl   0x0(%rax)
movzbl (%rdi,%rdx,1),%r9d
test   %r9b,%r9b
je     1110 <substr+0x10>
movzbl (%rsi,%rdx,1),%ecx
test   %cl,%cl
je     1120 <substr+0x20>
add    $0x1,%rdx
cmp    %cl,%r9b
je     1140 <substr+0x40>
jmp    1120 <substr+0x20>
ret

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

LLVM IR (-O2):
define i32 @substr(i8* nocapture %0, i8* nocapture %1) {
%3 = load i8, i8* %1
%4 = icmp eq i8 %3, 0
br i1 %4, label %30, label %5
5: ; preds = %2
%6 = load i8, i8* %0
%7 = icmp eq i8 %6, 0
br i1 %7, label %30, label %8
8: ; preds = %5, %26
%9 = phi i8 [ %28, %26 ], [ %3, %5 ]
%10 = phi i8* [ %27, %26 ], [ %1, %5 ]
%11 = icmp ne i8 %9, 0
%12 = icmp eq i8 %6, %9
%13 = select i1 %11, i1 %12, i1 false
br i1 %13, label %14, label %26
14: ; preds = %8, %21
%15 = phi i8* [ %18, %21 ], [ %10, %8 ]
%16 = phi i8* [ %17, %21 ], [ %0, %8 ]
%17 = getelementptr inbounds i8, i8* %16, i64 1
%18 = getelementptr inbounds i8, i8* %15, i64 1
%19 = load i8, i8* %17
%20 = icmp eq i8 %19, 0
br i1 %20, label %30, label %21
21: ; preds = %14
%22 = load i8, i8* %18
%23 = icmp ne i8 %22, 0
%24 = icmp eq i8 %19, %22
%25 = select i1 %23, i1 %24, i1 false
br i1 %25, label %14, label %26
26: ; preds = %21, %8
%27 = getelementptr inbounds i8, i8* %10, i64 1
%28 = load i8, i8* %27
%29 = icmp eq i8 %28, 0
br i1 %29, label %30, label %8
30: ; preds = %26, %14, %2, %5
%31 = phi i32 [ 1, %5 ], [ 0, %2 ], [ 1, %14 ], [ 0, %26 ]
ret i32 %31
}