char *SubStrings_Find(const char *const Match, const int ResultNumber,
                      const char *const InStream) {
  register const char *Worker = InStream;
  const unsigned MatchLen = SubStrings_Length(Match);
  const unsigned SLen = SubStrings_Length(InStream);
  register const char *SubWorker = Worker, *SubMatch = ((void *)0);
  register unsigned Inc = 0;
  register int CountInc = 0;
  if (MatchLen > SLen || !MatchLen || !SLen || !ResultNumber)
    return ((void *)0);
  for (; *Worker != '\0'; SubWorker = ++Worker) {
    for (Inc = 0, SubMatch = Match;
         (*SubWorker == *SubMatch) && (*SubWorker && *SubMatch);
         ++SubWorker, ++SubMatch, ++Inc)
      ;
    if (Inc == MatchLen) {
      if (CountInc + 1 == ResultNumber)
        return (char *)Worker;
      else
        ++CountInc;
    }
  }
  return ((void *)0);
}


x86 assembly (clang, -O0):
<SubStrings_Find>:
push   %rbp
mov    %rsp,%rbp
sub    $0x50,%rsp
mov    %rdi,-0x10(%rbp)
mov    %esi,-0x14(%rbp)
mov    %rdx,-0x20(%rbp)
mov    -0x20(%rbp),%rax
mov    %rax,-0x28(%rbp)
mov    -0x10(%rbp),%rdi
mov    $0x0,%al
call   1030 <SubStrings_Length@plt>
mov    %eax,-0x2c(%rbp)
mov    -0x20(%rbp),%rdi
mov    $0x0,%al
call   1030 <SubStrings_Length@plt>
mov    %eax,-0x30(%rbp)
mov    -0x28(%rbp),%rax
mov    %rax,-0x38(%rbp)
movq   $0x0,-0x40(%rbp)
movl   $0x0,-0x44(%rbp)
movl   $0x0,-0x48(%rbp)
mov    -0x2c(%rbp),%eax
cmp    -0x30(%rbp),%eax
ja     118f <SubStrings_Find+0x7f>
cmpl   $0x0,-0x2c(%rbp)
je     118f <SubStrings_Find+0x7f>
cmpl   $0x0,-0x30(%rbp)
je     118f <SubStrings_Find+0x7f>
cmpl   $0x0,-0x14(%rbp)
jne    119c <SubStrings_Find+0x8c>
movq   $0x0,-0x8(%rbp)
jmp    1299 <SubStrings_Find+0x189>
jmp    11a1 <SubStrings_Find+0x91>
mov    -0x28(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x0,%eax
je     1291 <SubStrings_Find+0x181>
movl   $0x0,-0x44(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,-0x40(%rbp)
mov    -0x38(%rbp),%rax
movsbl (%rax),%ecx
mov    -0x40(%rbp),%rax
movsbl (%rax),%edx
xor    %eax,%eax
cmp    %edx,%ecx
mov    %al,-0x49(%rbp)
jne    1206 <SubStrings_Find+0xf6>
mov    -0x38(%rbp),%rax
movsbl (%rax),%ecx
xor    %eax,%eax
cmp    $0x0,%ecx
mov    %al,-0x4a(%rbp)
je     1200 <SubStrings_Find+0xf0>
mov    -0x40(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x0,%eax
setne  %al
mov    %al,-0x4a(%rbp)
mov    -0x4a(%rbp),%al
mov    %al,-0x49(%rbp)
mov    -0x49(%rbp),%al
test   $0x1,%al
jne    1216 <SubStrings_Find+0x106>
jmp    1241 <SubStrings_Find+0x131>
jmp    121b <SubStrings_Find+0x10b>
mov    -0x38(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x38(%rbp)
mov    -0x40(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x40(%rbp)
mov    -0x44(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x44(%rbp)
jmp    11c0 <SubStrings_Find+0xb0>
mov    -0x44(%rbp),%eax
cmp    -0x2c(%rbp),%eax
jne    1277 <SubStrings_Find+0x167>
mov    -0x48(%rbp),%eax
add    $0x1,%eax
cmp    -0x14(%rbp),%eax
jne    1269 <SubStrings_Find+0x159>
mov    -0x28(%rbp),%rax
mov    %rax,-0x8(%rbp)
jmp    1299 <SubStrings_Find+0x189>
mov    -0x48(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x48(%rbp)
jmp    1277 <SubStrings_Find+0x167>
jmp    127c <SubStrings_Find+0x16c>
mov    -0x28(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x28(%rbp)
mov    %rax,-0x38(%rbp)
jmp    11a1 <SubStrings_Find+0x91>
movq   $0x0,-0x8(%rbp)
mov    -0x8(%rbp),%rax
add    $0x50,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<SubStrings_Find>:
push   %rbp
push   %r15
push   %r14
push   %r12
push   %rbx
mov    %rdx,%rbx
mov    %esi,%r15d
mov    %rdi,%rbp
xor    %r14d,%r14d
xor    %eax,%eax
call   1030 <SubStrings_Length@plt>
mov    %eax,%r12d
mov    %rbx,%rdi
xor    %eax,%eax
call   1030 <SubStrings_Length@plt>
test   %r15d,%r15d
je     11b0 <SubStrings_Find+0xa0>
test   %eax,%eax
je     11b0 <SubStrings_Find+0xa0>
test   %r12d,%r12d
je     11b0 <SubStrings_Find+0xa0>
cmp    %eax,%r12d
ja     11b0 <SubStrings_Find+0xa0>
mov    (%rbx),%al
xor    %r14d,%r14d
test   %al,%al
je     11b0 <SubStrings_Find+0xa0>
mov    0x0(%rbp),%r8b
xor    %esi,%esi
jmp    116b <SubStrings_Find+0x5b>
nopl   0x0(%rax)
mov    0x1(%rbx),%al
add    $0x1,%rbx
test   %al,%al
je     11b0 <SubStrings_Find+0xa0>
xor    %edx,%edx
test   %r8b,%r8b
je     11a0 <SubStrings_Find+0x90>
cmp    %r8b,%al
jne    11a0 <SubStrings_Find+0x90>
xor    %edi,%edi
nopl   0x0(%rax)
movzbl 0x1(%rbp,%rdi,1),%eax
lea    0x1(%rdi),%rdx
test   %al,%al
je     11a0 <SubStrings_Find+0x90>
movzbl 0x1(%rbx,%rdi,1),%ecx
test   %cl,%cl
je     11a0 <SubStrings_Find+0x90>
mov    %rdx,%rdi
cmp    %al,%cl
je     1180 <SubStrings_Find+0x70>
nopl   (%rax)
cmp    %r12d,%edx
jne    1160 <SubStrings_Find+0x50>
add    $0x1,%esi
cmp    %r15d,%esi
jne    1160 <SubStrings_Find+0x50>
mov    %rbx,%r14
mov    %r14,%rax
pop    %rbx
pop    %r12
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
define i8* @SubStrings_Find(i8* %0, i32 %1, i8* %2) {
%4 = alloca i8*
%5 = alloca i8*
%6 = alloca i32
%7 = alloca i8*
%8 = alloca i8*
%9 = alloca i32
%10 = alloca i32
%11 = alloca i8*
%12 = alloca i8*
%13 = alloca i32
%14 = alloca i32
store i8* %0, i8** %5
store i32 %1, i32* %6
store i8* %2, i8** %7
%15 = load i8*, i8** %7
store i8* %15, i8** %8
%16 = load i8*, i8** %5
%17 = call i32 (i8*, ...) bitcast (i32 (...)* @SubStrings_Length to i32 (i8*, ...)*)(i8* %16)
store i32 %17, i32* %9
%18 = load i8*, i8** %7
%19 = call i32 (i8*, ...) bitcast (i32 (...)* @SubStrings_Length to i32 (i8*, ...)*)(i8* %18)
store i32 %19, i32* %10
%20 = load i8*, i8** %8
store i8* %20, i8** %11
store i8* null, i8** %12
store i32 0, i32* %13
store i32 0, i32* %14
%21 = load i32, i32* %9
%22 = load i32, i32* %10
%23 = icmp ugt i32 %21, %22
br i1 %23, label %33, label %24
24: ; preds = %3
%25 = load i32, i32* %9
%26 = icmp ne i32 %25, 0
br i1 %26, label %27, label %33
27: ; preds = %24
%28 = load i32, i32* %10
%29 = icmp ne i32 %28, 0
br i1 %29, label %30, label %33
30: ; preds = %27
%31 = load i32, i32* %6
%32 = icmp ne i32 %31, 0
br i1 %32, label %34, label %33
33: ; preds = %30, %27, %24, %3
store i8* null, i8** %4
br label %92
34: ; preds = %30
br label %35
35: ; preds = %88, %34
%36 = load i8*, i8** %8
%37 = load i8, i8* %36
%38 = sext i8 %37 to i32
%39 = icmp ne i32 %38, 0
br i1 %39, label %40, label %91
40: ; preds = %35
store i32 0, i32* %13
%41 = load i8*, i8** %5
store i8* %41, i8** %12
br label %42
42: ; preds = %65, %40
%43 = load i8*, i8** %11
%44 = load i8, i8* %43
%45 = sext i8 %44 to i32
%46 = load i8*, i8** %12
%47 = load i8, i8* %46
%48 = sext i8 %47 to i32
%49 = icmp eq i32 %45, %48
br i1 %49, label %50, label %62
50: ; preds = %42
%51 = load i8*, i8** %11
%52 = load i8, i8* %51
%53 = sext i8 %52 to i32
%54 = icmp ne i32 %53, 0
br i1 %54, label %55, label %60
55: ; preds = %50
%56 = load i8*, i8** %12
%57 = load i8, i8* %56
%58 = sext i8 %57 to i32
%59 = icmp ne i32 %58, 0
br label %60
60: ; preds = %55, %50
%61 = phi i1 [ false, %50 ], [ %59, %55 ]
br label %62
62: ; preds = %60, %42
%63 = phi i1 [ false, %42 ], [ %61, %60 ]
br i1 %63, label %64, label %72
64: ; preds = %62
br label %65
65: ; preds = %64
%66 = load i8*, i8** %11
%67 = getelementptr inbounds i8, i8* %66, i32 1
store i8* %67, i8** %11
%68 = load i8*, i8** %12
%69 = getelementptr inbounds i8, i8* %68, i32 1
store i8* %69, i8** %12
%70 = load i32, i32* %13
%71 = add i32 %70, 1
store i32 %71, i32* %13
br label %42
72: ; preds = %62
%73 = load i32, i32* %13
%74 = load i32, i32* %9
%75 = icmp eq i32 %73, %74
br i1 %75, label %76, label %87
76: ; preds = %72
%77 = load i32, i32* %14
%78 = add nsw i32 %77, 1
%79 = load i32, i32* %6
%80 = icmp eq i32 %78, %79
br i1 %80, label %81, label %83
81: ; preds = %76
%82 = load i8*, i8** %8
store i8* %82, i8** %4
br label %92
83: ; preds = %76
%84 = load i32, i32* %14
%85 = add nsw i32 %84, 1
store i32 %85, i32* %14
br label %86
86: ; preds = %83
br label %87
87: ; preds = %86, %72
br label %88
88: ; preds = %87
%89 = load i8*, i8** %8
%90 = getelementptr inbounds i8, i8* %89, i32 1
store i8* %90, i8** %8
store i8* %90, i8** %11
br label %35
91: ; preds = %35
store i8* null, i8** %4
br label %92
92: ; preds = %91, %81, %33
%93 = load i8*, i8** %4
ret i8* %93
}

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