void tm_blockify_ferret_strings(char **mr_blk1, char *pblock, int bufsiz,
                                int outstrlen) {
  int i;
  char *poutchar, *poutstr, *pinchar, **pinstr;
  for (i = 0; i < bufsiz; i++)
    pblock[i] = '\0';
  pinstr = mr_blk1;
  poutstr = pblock;
  for (i = 0; i < bufsiz / outstrlen; i++) {
    poutchar = poutstr;
    pinchar = *pinstr;
    poutstr += outstrlen;
    pinstr += (8 / sizeof(char **));
    while ((poutchar < poutstr) && (*pinchar != '\0')) {
      *poutchar = *pinchar;
      poutchar++;
      pinchar++;
    }
  }
}


x86 assembly (clang, -O0):
<tm_blockify_ferret_strings>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %edx,-0x14(%rbp)
mov    %ecx,-0x18(%rbp)
movl   $0x0,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
cmp    -0x14(%rbp),%eax
jge    113f <tm_blockify_ferret_strings+0x3f>
mov    -0x10(%rbp),%rax
movslq -0x1c(%rbp),%rcx
movb   $0x0,(%rax,%rcx,1)
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    1119 <tm_blockify_ferret_strings+0x19>
mov    -0x8(%rbp),%rax
mov    %rax,-0x40(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,-0x30(%rbp)
movl   $0x0,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
mov    %eax,-0x44(%rbp)
mov    -0x14(%rbp),%eax
cltd
idivl  -0x18(%rbp)
mov    %eax,%ecx
mov    -0x44(%rbp),%eax
cmp    %ecx,%eax
jge    120f <tm_blockify_ferret_strings+0x10f>
mov    -0x30(%rbp),%rax
mov    %rax,-0x28(%rbp)
mov    -0x40(%rbp),%rax
mov    (%rax),%rax
mov    %rax,-0x38(%rbp)
mov    -0x18(%rbp),%ecx
mov    -0x30(%rbp),%rax
movslq %ecx,%rcx
add    %rcx,%rax
mov    %rax,-0x30(%rbp)
mov    -0x40(%rbp),%rax
add    $0x8,%rax
mov    %rax,-0x40(%rbp)
mov    -0x28(%rbp),%rcx
xor    %eax,%eax
cmp    -0x30(%rbp),%rcx
mov    %al,-0x45(%rbp)
jae    11c3 <tm_blockify_ferret_strings+0xc3>
mov    -0x38(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x0,%eax
setne  %al
mov    %al,-0x45(%rbp)
mov    -0x45(%rbp),%al
test   $0x1,%al
jne    11d3 <tm_blockify_ferret_strings+0xd3>
jmp    11fc <tm_blockify_ferret_strings+0xfc>
mov    -0x38(%rbp),%rax
mov    (%rax),%cl
mov    -0x28(%rbp),%rax
mov    %cl,(%rax)
mov    -0x28(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x28(%rbp)
mov    -0x38(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x38(%rbp)
jmp    11a0 <tm_blockify_ferret_strings+0xa0>
jmp    1201 <tm_blockify_ferret_strings+0x101>
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    1156 <tm_blockify_ferret_strings+0x56>
pop    %rbp
ret

x86 assembly (clang, -O2):
<tm_blockify_ferret_strings>:
push   %rbp
push   %r15
push   %r14
push   %r12
push   %rbx
mov    %ecx,%r12d
mov    %edx,%r15d
mov    %rsi,%rbx
mov    %rdi,%r14
test   %edx,%edx
jle    1135 <tm_blockify_ferret_strings+0x25>
mov    %r15d,%edx
mov    %rbx,%rdi
xor    %esi,%esi
call   1030 <memset@plt>
mov    %r15d,%eax
cltd
idiv   %r12d
test   %eax,%eax
jle    1176 <tm_blockify_ferret_strings+0x66>
movslq %r12d,%r9
cmp    $0x1,%eax
jne    117f <tm_blockify_ferret_strings+0x6f>
test   $0x1,%al
je     1176 <tm_blockify_ferret_strings+0x66>
test   %r12d,%r12d
jle    1176 <tm_blockify_ferret_strings+0x66>
add    %rbx,%r9
mov    (%r14),%rax
nopw   0x0(%rax,%rax,1)
movzbl (%rax),%ecx
test   %cl,%cl
je     1176 <tm_blockify_ferret_strings+0x66>
mov    %cl,(%rbx)
add    $0x1,%rbx
add    $0x1,%rax
cmp    %r9,%rbx
jb     1160 <tm_blockify_ferret_strings+0x50>
pop    %rbx
pop    %r12
pop    %r14
pop    %r15
pop    %rbp
ret
mov    %eax,%r8d
and    $0xfffffffe,%r8d
xor    %esi,%esi
jmp    119c <tm_blockify_ferret_strings+0x8c>
nopw   0x0(%rax,%rax,1)
add    $0x10,%r14
add    $0x2,%esi
cmp    %r8d,%esi
je     1148 <tm_blockify_ferret_strings+0x38>
lea    (%rbx,%r9,1),%rdi
test   %r12d,%r12d
jle    11cc <tm_blockify_ferret_strings+0xbc>
mov    (%r14),%rdx
xor    %ebp,%ebp
nopw   0x0(%rax,%rax,1)
movzbl (%rdx,%rbp,1),%ecx
test   %cl,%cl
je     11cc <tm_blockify_ferret_strings+0xbc>
mov    %cl,(%rbx,%rbp,1)
lea    (%rbx,%rbp,1),%rcx
add    $0x1,%rcx
add    $0x1,%rbp
cmp    %rdi,%rcx
jb     11b0 <tm_blockify_ferret_strings+0xa0>
lea    (%rdi,%r9,1),%rbx
test   %r12d,%r12d
jle    1190 <tm_blockify_ferret_strings+0x80>
mov    0x8(%r14),%rdx
nopl   0x0(%rax)
movzbl (%rdx),%ecx
test   %cl,%cl
je     1190 <tm_blockify_ferret_strings+0x80>
mov    %cl,(%rdi)
add    $0x1,%rdi
add    $0x1,%rdx
cmp    %rbx,%rdi
jb     11e0 <tm_blockify_ferret_strings+0xd0>
jmp    1190 <tm_blockify_ferret_strings+0x80>

LLVM IR (-O0):
define void @tm_blockify_ferret_strings(i8** %0, i8* %1, i32 %2, i32 %3) {
%5 = alloca i8**
%6 = alloca i8*
%7 = alloca i32
%8 = alloca i32
%9 = alloca i32
%10 = alloca i8*
%11 = alloca i8*
%12 = alloca i8*
%13 = alloca i8**
store i8** %0, i8*** %5
store i8* %1, i8** %6
store i32 %2, i32* %7
store i32 %3, i32* %8
store i32 0, i32* %9
br label %14
14: ; preds = %23, %4
%15 = load i32, i32* %9
%16 = load i32, i32* %7
%17 = icmp slt i32 %15, %16
br i1 %17, label %18, label %26
18: ; preds = %14
%19 = load i8*, i8** %6
%20 = load i32, i32* %9
%21 = sext i32 %20 to i64
%22 = getelementptr inbounds i8, i8* %19, i64 %21
store i8 0, i8* %22
br label %23
23: ; preds = %18
%24 = load i32, i32* %9
%25 = add nsw i32 %24, 1
store i32 %25, i32* %9
br label %14
26: ; preds = %14
%27 = load i8**, i8*** %5
store i8** %27, i8*** %13
%28 = load i8*, i8** %6
store i8* %28, i8** %11
store i32 0, i32* %9
br label %29
29: ; preds = %65, %26
%30 = load i32, i32* %9
%31 = load i32, i32* %7
%32 = load i32, i32* %8
%33 = sdiv i32 %31, %32
%34 = icmp slt i32 %30, %33
br i1 %34, label %35, label %68
35: ; preds = %29
%36 = load i8*, i8** %11
store i8* %36, i8** %10
%37 = load i8**, i8*** %13
%38 = load i8*, i8** %37
store i8* %38, i8** %12
%39 = load i32, i32* %8
%40 = load i8*, i8** %11
%41 = sext i32 %39 to i64
%42 = getelementptr inbounds i8, i8* %40, i64 %41
store i8* %42, i8** %11
%43 = load i8**, i8*** %13
%44 = getelementptr inbounds i8*, i8** %43, i64 1
store i8** %44, i8*** %13
br label %45
45: ; preds = %56, %35
%46 = load i8*, i8** %10
%47 = load i8*, i8** %11
%48 = icmp ult i8* %46, %47
br i1 %48, label %49, label %54
49: ; preds = %45
%50 = load i8*, i8** %12
%51 = load i8, i8* %50
%52 = sext i8 %51 to i32
%53 = icmp ne i32 %52, 0
br label %54
54: ; preds = %49, %45
%55 = phi i1 [ false, %45 ], [ %53, %49 ]
br i1 %55, label %56, label %64
56: ; preds = %54
%57 = load i8*, i8** %12
%58 = load i8, i8* %57
%59 = load i8*, i8** %10
store i8 %58, i8* %59
%60 = load i8*, i8** %10
%61 = getelementptr inbounds i8, i8* %60, i32 1
store i8* %61, i8** %10
%62 = load i8*, i8** %12
%63 = getelementptr inbounds i8, i8* %62, i32 1
store i8* %63, i8** %12
br label %45
64: ; preds = %54
br label %65
65: ; preds = %64
%66 = load i32, i32* %9
%67 = add nsw i32 %66, 1
store i32 %67, i32* %9
br label %29
68: ; preds = %29
ret void
}

LLVM IR (-O2):
define void @tm_blockify_ferret_strings(i8** nocapture %0, i8* writeonly %1, i32 %2, i32 %3) {
%5 = icmp sgt i32 %2, 0
br i1 %5, label %6, label %8
6: ; preds = %4
%7 = zext i32 %2 to i64
br label %8
8: ; preds = %6, %4
%9 = sdiv i32 %2, %3
%10 = icmp sgt i32 %9, 0
br i1 %10, label %11, label %69
11: ; preds = %8
%12 = sext i32 %3 to i64
%13 = icmp sgt i32 %3, 0
%14 = and i32 %9, 1
%15 = icmp eq i32 %9, 1
br i1 %15, label %52, label %16
16: ; preds = %11
%17 = and i32 %9, -2
br label %18
18: ; preds = %49, %16
%19 = phi i8** [ %0, %16 ], [ %37, %49 ]
%20 = phi i8* [ %1, %16 ], [ %36, %49 ]
%21 = phi i32 [ 0, %16 ], [ %50, %49 ]
%22 = getelementptr inbounds i8, i8* %20, i64 %12
%23 = getelementptr inbounds i8*, i8** %19, i64 1
br i1 %13, label %24, label %35
24: ; preds = %18
%25 = load i8*, i8** %19
br label %26
26: ; preds = %24, %31
%27 = phi i8* [ %33, %31 ], [ %25, %24 ]
%28 = phi i8* [ %32, %31 ], [ %20, %24 ]
%29 = load i8, i8* %27
%30 = icmp eq i8 %29, 0
br i1 %30, label %35, label %31
31: ; preds = %26
store i8 %29, i8* %28
%32 = getelementptr inbounds i8, i8* %28, i64 1
%33 = getelementptr inbounds i8, i8* %27, i64 1
%34 = icmp ult i8* %32, %22
br i1 %34, label %26, label %35
35: ; preds = %31, %26, %18
%36 = getelementptr inbounds i8, i8* %22, i64 %12
%37 = getelementptr inbounds i8*, i8** %19, i64 2
br i1 %13, label %38, label %49
38: ; preds = %35
%39 = load i8*, i8** %23
br label %40
40: ; preds = %45, %38
%41 = phi i8* [ %47, %45 ], [ %39, %38 ]
%42 = phi i8* [ %46, %45 ], [ %22, %38 ]
%43 = load i8, i8* %41
%44 = icmp eq i8 %43, 0
br i1 %44, label %49, label %45
45: ; preds = %40
store i8 %43, i8* %42
%46 = getelementptr inbounds i8, i8* %42, i64 1
%47 = getelementptr inbounds i8, i8* %41, i64 1
%48 = icmp ult i8* %46, %36
br i1 %48, label %40, label %49
49: ; preds = %40, %45, %35
%50 = add i32 %21, 2
%51 = icmp eq i32 %50, %17
br i1 %51, label %52, label %18
52: ; preds = %49, %11
%53 = phi i8** [ %0, %11 ], [ %37, %49 ]
%54 = phi i8* [ %1, %11 ], [ %36, %49 ]
%55 = icmp eq i32 %14, 0
br i1 %55, label %69, label %56
56: ; preds = %52
%57 = getelementptr inbounds i8, i8* %54, i64 %12
br i1 %13, label %58, label %69
58: ; preds = %56
%59 = load i8*, i8** %53
br label %60
60: ; preds = %65, %58
%61 = phi i8* [ %67, %65 ], [ %59, %58 ]
%62 = phi i8* [ %66, %65 ], [ %54, %58 ]
%63 = load i8, i8* %61
%64 = icmp eq i8 %63, 0
br i1 %64, label %69, label %65
65: ; preds = %60
store i8 %63, i8* %62
%66 = getelementptr inbounds i8, i8* %62, i64 1
%67 = getelementptr inbounds i8, i8* %61, i64 1
%68 = icmp ult i8* %66, %57
br i1 %68, label %60, label %69
69: ; preds = %52, %60, %65, %56, %8
ret void
}