void mysubstr(char *dest, char *src, int position, int length) {
  while (length > 0) {
    *dest = *(src + position);
    dest++;
    src++;
    length--;
  }
  *dest = '\0';
}


x86 assembly (clang, -O0):
<mysubstr>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %edx,-0x14(%rbp)
mov    %ecx,-0x18(%rbp)
cmpl   $0x0,-0x18(%rbp)
jle    1153 <mysubstr+0x53>
mov    -0x10(%rbp),%rax
movslq -0x14(%rbp),%rcx
mov    (%rax,%rcx,1),%cl
mov    -0x8(%rbp),%rax
mov    %cl,(%rax)
mov    -0x8(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x8(%rbp)
mov    -0x10(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x10(%rbp)
mov    -0x18(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x18(%rbp)
jmp    1112 <mysubstr+0x12>
mov    -0x8(%rbp),%rax
movb   $0x0,(%rax)
pop    %rbp
ret

x86 assembly (clang, -O2):
<mysubstr>:
push   %rbx
test   %ecx,%ecx
jle    1245 <mysubstr+0x145>
movslq %edx,%r9
lea    -0x1(%rcx),%r10d
cmp    $0x1f,%r10d
jb     1229 <mysubstr+0x129>
lea    (%r9,%r10,1),%rax
add    %rsi,%rax
add    $0x1,%rax
cmp    %rdi,%rax
jbe    113f <mysubstr+0x3f>
lea    (%r10,%rdi,1),%rax
add    $0x1,%rax
lea    (%rsi,%r9,1),%rdx
cmp    %rax,%rdx
jb     1229 <mysubstr+0x129>
add    $0x1,%r10
mov    %r10,%r8
and    $0xffffffffffffffe0,%r8
lea    -0x20(%r8),%rdx
mov    %rdx,%rax
shr    $0x5,%rax
add    $0x1,%rax
mov    %eax,%r11d
and    $0x3,%r11d
cmp    $0x60,%rdx
jae    116a <mysubstr+0x6a>
xor    %edx,%edx
jmp    11d8 <mysubstr+0xd8>
and    $0xfffffffffffffffc,%rax
lea    (%r9,%rsi,1),%rbx
add    $0x70,%rbx
xor    %edx,%edx
nopl   0x0(%rax,%rax,1)
movups -0x70(%rbx,%rdx,1),%xmm0
movups -0x60(%rbx,%rdx,1),%xmm1
movups %xmm0,(%rdi,%rdx,1)
movups %xmm1,0x10(%rdi,%rdx,1)
movups -0x50(%rbx,%rdx,1),%xmm0
movups -0x40(%rbx,%rdx,1),%xmm1
movups %xmm0,0x20(%rdi,%rdx,1)
movups %xmm1,0x30(%rdi,%rdx,1)
movups -0x30(%rbx,%rdx,1),%xmm0
movups -0x20(%rbx,%rdx,1),%xmm1
movups %xmm0,0x40(%rdi,%rdx,1)
movups %xmm1,0x50(%rdi,%rdx,1)
movups -0x10(%rbx,%rdx,1),%xmm0
movups (%rbx,%rdx,1),%xmm1
movups %xmm0,0x60(%rdi,%rdx,1)
movups %xmm1,0x70(%rdi,%rdx,1)
sub    $0xffffffffffffff80,%rdx
add    $0xfffffffffffffffc,%rax
jne    1180 <mysubstr+0x80>
test   %r11,%r11
je     121b <mysubstr+0x11b>
lea    (%rdx,%r9,1),%rax
add    %rsi,%rax
add    $0x10,%rax
add    %rdi,%rdx
add    $0x10,%rdx
shl    $0x5,%r11
xor    %ebx,%ebx
cs nopw 0x0(%rax,%rax,1)
nop
movups -0x10(%rax,%rbx,1),%xmm0
movups (%rax,%rbx,1),%xmm1
movups %xmm0,-0x10(%rdx,%rbx,1)
movups %xmm1,(%rdx,%rbx,1)
add    $0x20,%rbx
cmp    %rbx,%r11
jne    1200 <mysubstr+0x100>
add    %r8,%rdi
cmp    %r8,%r10
je     1245 <mysubstr+0x145>
sub    %r8d,%ecx
add    %r8,%rsi
add    $0x1,%ecx
add    %r9,%rsi
nop
movzbl (%rsi),%eax
mov    %al,(%rdi)
add    $0x1,%rdi
add    $0xffffffff,%ecx
add    $0x1,%rsi
cmp    $0x1,%ecx
ja     1230 <mysubstr+0x130>
movb   $0x0,(%rdi)
pop    %rbx
ret

LLVM IR (-O0):
define void @mysubstr(i8* %0, i8* %1, i32 %2, i32 %3) {
%5 = alloca i8*
%6 = alloca i8*
%7 = alloca i32
%8 = alloca i32
store i8* %0, i8** %5
store i8* %1, i8** %6
store i32 %2, i32* %7
store i32 %3, i32* %8
br label %9
9: ; preds = %12, %4
%10 = load i32, i32* %8
%11 = icmp sgt i32 %10, 0
br i1 %11, label %12, label %25
12: ; preds = %9
%13 = load i8*, i8** %6
%14 = load i32, i32* %7
%15 = sext i32 %14 to i64
%16 = getelementptr inbounds i8, i8* %13, i64 %15
%17 = load i8, i8* %16
%18 = load i8*, i8** %5
store i8 %17, i8* %18
%19 = load i8*, i8** %5
%20 = getelementptr inbounds i8, i8* %19, i32 1
store i8* %20, i8** %5
%21 = load i8*, i8** %6
%22 = getelementptr inbounds i8, i8* %21, i32 1
store i8* %22, i8** %6
%23 = load i32, i32* %8
%24 = add nsw i32 %23, -1
store i32 %24, i32* %8
br label %9
25: ; preds = %9
%26 = load i8*, i8** %5
store i8 0, i8* %26
ret void
}

LLVM IR (-O2):
define void @mysubstr(i8* nocapture writeonly %0, i8* nocapture %1, i32 %2, i32 %3) {
%5 = icmp sgt i32 %3, 0
br i1 %5, label %6, label %127
6: ; preds = %4
%7 = sext i32 %2 to i64
%8 = add i32 %3, -1
%9 = zext i32 %8 to i64
%10 = add nuw nsw i64 %9, 1
%11 = icmp ult i32 %8, 31
br i1 %11, label %113, label %12
12: ; preds = %6
%13 = add i32 %3, -1
%14 = zext i32 %13 to i64
%15 = add nuw nsw i64 %14, 1
%16 = getelementptr i8, i8* %0, i64 %15
%17 = getelementptr i8, i8* %1, i64 %7
%18 = add nsw i64 %7, %14
%19 = add nsw i64 %18, 1
%20 = getelementptr i8, i8* %1, i64 %19
%21 = icmp ugt i8* %20, %0
%22 = icmp ult i8* %17, %16
%23 = and i1 %21, %22
br i1 %23, label %113, label %24
24: ; preds = %12
%25 = and i64 %10, 8589934560
%26 = trunc i64 %25 to i32
%27 = sub i32 %3, %26
%28 = getelementptr i8, i8* %0, i64 %25
%29 = getelementptr i8, i8* %1, i64 %25
%30 = add nsw i64 %25, -32
%31 = lshr exact i64 %30, 5
%32 = add nuw nsw i64 %31, 1
%33 = and i64 %32, 3
%34 = icmp ult i64 %30, 96
br i1 %34, label %90, label %35
35: ; preds = %24
%36 = and i64 %32, 1152921504606846972
%37 = getelementptr i8, i8* %1, i64 %7
%38 = getelementptr i8, i8* %1, i64 %7
%39 = getelementptr i8, i8* %1, i64 %7
%40 = getelementptr i8, i8* %1, i64 %7
br label %41
41: ; preds = %41, %35
%42 = phi i64 [ 0, %35 ], [ %87, %41 ]
%43 = phi i64 [ 0, %35 ], [ %88, %41 ]
%44 = getelementptr i8, i8* %0, i64 %42
%45 = getelementptr inbounds i8, i8* %37, i64 %42
%46 = bitcast i8* %45 to <16 x i8>*
%47 = load <16 x i8>, <16 x i8>* %46
%48 = getelementptr inbounds i8, i8* %45, i64 16
%49 = bitcast i8* %48 to <16 x i8>*
%50 = load <16 x i8>, <16 x i8>* %49
%51 = bitcast i8* %44 to <16 x i8>*
store <16 x i8> %47, <16 x i8>* %51
%52 = getelementptr i8, i8* %44, i64 16
%53 = bitcast i8* %52 to <16 x i8>*
store <16 x i8> %50, <16 x i8>* %53
%54 = or i64 %42, 32
%55 = getelementptr i8, i8* %0, i64 %54
%56 = getelementptr inbounds i8, i8* %38, i64 %54
%57 = bitcast i8* %56 to <16 x i8>*
%58 = load <16 x i8>, <16 x i8>* %57
%59 = getelementptr inbounds i8, i8* %56, i64 16
%60 = bitcast i8* %59 to <16 x i8>*
%61 = load <16 x i8>, <16 x i8>* %60
%62 = bitcast i8* %55 to <16 x i8>*
store <16 x i8> %58, <16 x i8>* %62
%63 = getelementptr i8, i8* %55, i64 16
%64 = bitcast i8* %63 to <16 x i8>*
store <16 x i8> %61, <16 x i8>* %64
%65 = or i64 %42, 64
%66 = getelementptr i8, i8* %0, i64 %65
%67 = getelementptr inbounds i8, i8* %39, i64 %65
%68 = bitcast i8* %67 to <16 x i8>*
%69 = load <16 x i8>, <16 x i8>* %68
%70 = getelementptr inbounds i8, i8* %67, i64 16
%71 = bitcast i8* %70 to <16 x i8>*
%72 = load <16 x i8>, <16 x i8>* %71
%73 = bitcast i8* %66 to <16 x i8>*
store <16 x i8> %69, <16 x i8>* %73
%74 = getelementptr i8, i8* %66, i64 16
%75 = bitcast i8* %74 to <16 x i8>*
store <16 x i8> %72, <16 x i8>* %75
%76 = or i64 %42, 96
%77 = getelementptr i8, i8* %0, i64 %76
%78 = getelementptr inbounds i8, i8* %40, i64 %76
%79 = bitcast i8* %78 to <16 x i8>*
%80 = load <16 x i8>, <16 x i8>* %79
%81 = getelementptr inbounds i8, i8* %78, i64 16
%82 = bitcast i8* %81 to <16 x i8>*
%83 = load <16 x i8>, <16 x i8>* %82
%84 = bitcast i8* %77 to <16 x i8>*
store <16 x i8> %80, <16 x i8>* %84
%85 = getelementptr i8, i8* %77, i64 16
%86 = bitcast i8* %85 to <16 x i8>*
store <16 x i8> %83, <16 x i8>* %86
%87 = add nuw i64 %42, 128
%88 = add i64 %43, 4
%89 = icmp eq i64 %88, %36
br i1 %89, label %90, label %41
90: ; preds = %41, %24
%91 = phi i64 [ 0, %24 ], [ %87, %41 ]
%92 = icmp eq i64 %33, 0
br i1 %92, label %111, label %93
93: ; preds = %90
%94 = getelementptr i8, i8* %1, i64 %7
br label %95
95: ; preds = %95, %93
%96 = phi i64 [ %91, %93 ], [ %108, %95 ]
%97 = phi i64 [ 0, %93 ], [ %109, %95 ]
%98 = getelementptr i8, i8* %0, i64 %96
%99 = getelementptr inbounds i8, i8* %94, i64 %96
%100 = bitcast i8* %99 to <16 x i8>*
%101 = load <16 x i8>, <16 x i8>* %100
%102 = getelementptr inbounds i8, i8* %99, i64 16
%103 = bitcast i8* %102 to <16 x i8>*
%104 = load <16 x i8>, <16 x i8>* %103
%105 = bitcast i8* %98 to <16 x i8>*
store <16 x i8> %101, <16 x i8>* %105
%106 = getelementptr i8, i8* %98, i64 16
%107 = bitcast i8* %106 to <16 x i8>*
store <16 x i8> %104, <16 x i8>* %107
%108 = add nuw i64 %96, 32
%109 = add i64 %97, 1
%110 = icmp eq i64 %109, %33
br i1 %110, label %111, label %95
111: ; preds = %95, %90
%112 = icmp eq i64 %10, %25
br i1 %112, label %127, label %113
113: ; preds = %12, %6, %111
%114 = phi i32 [ %3, %12 ], [ %3, %6 ], [ %27, %111 ]
%115 = phi i8* [ %0, %12 ], [ %0, %6 ], [ %28, %111 ]
%116 = phi i8* [ %1, %12 ], [ %1, %6 ], [ %29, %111 ]
br label %117
117: ; preds = %113, %117
%118 = phi i32 [ %125, %117 ], [ %114, %113 ]
%119 = phi i8* [ %123, %117 ], [ %115, %113 ]
%120 = phi i8* [ %124, %117 ], [ %116, %113 ]
%121 = getelementptr inbounds i8, i8* %120, i64 %7
%122 = load i8, i8* %121
store i8 %122, i8* %119
%123 = getelementptr inbounds i8, i8* %119, i64 1
%124 = getelementptr inbounds i8, i8* %120, i64 1
%125 = add nsw i32 %118, -1
%126 = icmp ugt i32 %118, 1
br i1 %126, label %117, label %127
127: ; preds = %117, %111, %4
%128 = phi i8* [ %0, %4 ], [ %28, %111 ], [ %123, %117 ]
store i8 0, i8* %128
ret void
}