l3tol(lp, cp, n) long *lp;
char *cp;
int n;
{
  register i;
  register char *a, *b;
  a = (char *)lp;
  b = cp;
  for (i = 0; i < n; i++) {
    *a++ = *b++;
    *a++ = 0;
    *a++ = *b++;
    *a++ = *b++;
  }
}


x86 assembly (clang, -O0):
<l3tol>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    %edx,-0x1c(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,-0x28(%rbp)
mov    -0x18(%rbp),%rax
mov    %rax,-0x30(%rbp)
movl   $0x0,-0x20(%rbp)
mov    -0x20(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jge    11b8 <l3tol+0xb8>
mov    -0x30(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x30(%rbp)
mov    (%rax),%cl
mov    -0x28(%rbp),%rax
mov    %rax,%rdx
add    $0x1,%rdx
mov    %rdx,-0x28(%rbp)
mov    %cl,(%rax)
mov    -0x28(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x28(%rbp)
movb   $0x0,(%rax)
mov    -0x30(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x30(%rbp)
mov    (%rax),%cl
mov    -0x28(%rbp),%rax
mov    %rax,%rdx
add    $0x1,%rdx
mov    %rdx,-0x28(%rbp)
mov    %cl,(%rax)
mov    -0x30(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x30(%rbp)
mov    (%rax),%cl
mov    -0x28(%rbp),%rax
mov    %rax,%rdx
add    $0x1,%rdx
mov    %rdx,-0x28(%rbp)
mov    %cl,(%rax)
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
jmp    1126 <l3tol+0x26>
mov    -0x4(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<l3tol>:
test   %edx,%edx
jle    1166 <l3tol+0x66>
cmp    $0x1,%edx
je     114d <l3tol+0x4d>
mov    %edx,%eax
and    $0xfffffffe,%eax
xchg   %ax,%ax
movzbl (%rsi),%ecx
mov    %cl,(%rdi)
movb   $0x0,0x1(%rdi)
movzbl 0x1(%rsi),%ecx
mov    %cl,0x2(%rdi)
movzbl 0x2(%rsi),%ecx
mov    %cl,0x3(%rdi)
movzbl 0x3(%rsi),%ecx
mov    %cl,0x4(%rdi)
movb   $0x0,0x5(%rdi)
movzbl 0x4(%rsi),%ecx
mov    %cl,0x6(%rdi)
movzbl 0x5(%rsi),%ecx
add    $0x6,%rsi
mov    %cl,0x7(%rdi)
add    $0x8,%rdi
add    $0xfffffffe,%eax
jne    1110 <l3tol+0x10>
test   $0x1,%dl
je     1166 <l3tol+0x66>
mov    (%rsi),%al
mov    %al,(%rdi)
movb   $0x0,0x1(%rdi)
mov    0x1(%rsi),%al
mov    %al,0x2(%rdi)
mov    0x2(%rsi),%al
mov    %al,0x3(%rdi)
ret

LLVM IR (-O0):
define i32 @l3tol(i64* %0, i8* %1, i32 %2) {
%4 = alloca i32
%5 = alloca i64*
%6 = alloca i8*
%7 = alloca i32
%8 = alloca i32
%9 = alloca i8*
%10 = alloca i8*
store i64* %0, i64** %5
store i8* %1, i8** %6
store i32 %2, i32* %7
%11 = load i64*, i64** %5
%12 = bitcast i64* %11 to i8*
store i8* %12, i8** %9
%13 = load i8*, i8** %6
store i8* %13, i8** %10
store i32 0, i32* %8
br label %14
14: ; preds = %36, %3
%15 = load i32, i32* %8
%16 = load i32, i32* %7
%17 = icmp slt i32 %15, %16
br i1 %17, label %18, label %39
18: ; preds = %14
%19 = load i8*, i8** %10
%20 = getelementptr inbounds i8, i8* %19, i32 1
store i8* %20, i8** %10
%21 = load i8, i8* %19
%22 = load i8*, i8** %9
%23 = getelementptr inbounds i8, i8* %22, i32 1
store i8* %23, i8** %9
store i8 %21, i8* %22
%24 = load i8*, i8** %9
%25 = getelementptr inbounds i8, i8* %24, i32 1
store i8* %25, i8** %9
store i8 0, i8* %24
%26 = load i8*, i8** %10
%27 = getelementptr inbounds i8, i8* %26, i32 1
store i8* %27, i8** %10
%28 = load i8, i8* %26
%29 = load i8*, i8** %9
%30 = getelementptr inbounds i8, i8* %29, i32 1
store i8* %30, i8** %9
store i8 %28, i8* %29
%31 = load i8*, i8** %10
%32 = getelementptr inbounds i8, i8* %31, i32 1
store i8* %32, i8** %10
%33 = load i8, i8* %31
%34 = load i8*, i8** %9
%35 = getelementptr inbounds i8, i8* %34, i32 1
store i8* %35, i8** %9
store i8 %33, i8* %34
br label %36
36: ; preds = %18
%37 = load i32, i32* %8
%38 = add nsw i32 %37, 1
store i32 %38, i32* %8
br label %14
39: ; preds = %14
%40 = load i32, i32* %4
ret i32 %40
}

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