void TclCopyAndCollapse(count, src, dst) int count;
register char *src;
register char *dst;
{
  register char c;
  int numRead;
  for (c = *src; count > 0; src++, c = *src, count--) {
    if (c == '\\') {
      *dst = Tcl_Backslash(src, &numRead);
      if (*dst != 0) {
        dst++;
      }
      src += numRead - 1;
      count -= numRead - 1;
    } else {
      *dst = c;
      dst++;
    }
  }
  *dst = 0;
}


x86 assembly (clang, -O0):
<TclCopyAndCollapse>:
push   %rbp
mov    %rsp,%rbp
sub    $0x20,%rsp
mov    %edi,-0x4(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    -0x10(%rbp),%rax
mov    (%rax),%al
mov    %al,-0x19(%rbp)
cmpl   $0x0,-0x4(%rbp)
jle    11da <TclCopyAndCollapse+0xca>
movsbl -0x19(%rbp),%eax
cmp    $0x5c,%eax
jne    119d <TclCopyAndCollapse+0x8d>
mov    -0x10(%rbp),%rdi
lea    -0x20(%rbp),%rsi
mov    $0x0,%al
call   1030 <Tcl_Backslash@plt>
mov    %al,%cl
mov    -0x18(%rbp),%rax
mov    %cl,(%rax)
mov    -0x18(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x0,%eax
je     1176 <TclCopyAndCollapse+0x66>
mov    -0x18(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x18(%rbp)
mov    -0x20(%rbp),%ecx
sub    $0x1,%ecx
mov    -0x10(%rbp),%rax
movslq %ecx,%rcx
add    %rcx,%rax
mov    %rax,-0x10(%rbp)
mov    -0x20(%rbp),%ecx
sub    $0x1,%ecx
mov    -0x4(%rbp),%eax
sub    %ecx,%eax
mov    %eax,-0x4(%rbp)
jmp    11b2 <TclCopyAndCollapse+0xa2>
mov    -0x19(%rbp),%cl
mov    -0x18(%rbp),%rax
mov    %cl,(%rax)
mov    -0x18(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x18(%rbp)
jmp    11b7 <TclCopyAndCollapse+0xa7>
mov    -0x10(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x10(%rbp)
mov    -0x10(%rbp),%rax
mov    (%rax),%al
mov    %al,-0x19(%rbp)
mov    -0x4(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x4(%rbp)
jmp    112c <TclCopyAndCollapse+0x1c>
mov    -0x18(%rbp),%rax
movb   $0x0,(%rax)
add    $0x20,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<TclCopyAndCollapse>:
push   %r15
push   %r14
push   %r12
push   %rbx
push   %rax
mov    %rdx,%r14
test   %edi,%edi
jle    117a <TclCopyAndCollapse+0x6a>
mov    %rsi,%rbx
mov    %edi,%r15d
lea    0x4(%rsp),%r12
jmp    1148 <TclCopyAndCollapse+0x38>
nopl   0x0(%rax)
mov    %al,(%r14)
add    $0x1,%r14
add    $0x1,%rbx
lea    -0x1(%r15),%eax
cmp    $0x1,%r15d
mov    %eax,%r15d
jle    117a <TclCopyAndCollapse+0x6a>
movzbl (%rbx),%eax
cmp    $0x5c,%al
jne    1130 <TclCopyAndCollapse+0x20>
mov    %rbx,%rdi
mov    %r12,%rsi
xor    %eax,%eax
call   1030 <Tcl_Backslash@plt>
mov    %al,(%r14)
cmp    $0x1,%al
sbb    $0xffffffffffffffff,%r14
movslq 0x4(%rsp),%rax
add    %rax,%rbx
add    $0xffffffffffffffff,%rbx
add    $0xffffffffffffffff,%rax
sub    %eax,%r15d
jmp    1137 <TclCopyAndCollapse+0x27>
movb   $0x0,(%r14)
add    $0x8,%rsp
pop    %rbx
pop    %r12
pop    %r14
pop    %r15
ret

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

LLVM IR (-O2):
define void @TclCopyAndCollapse(i32 %0, i8* %1, i8* nocapture writeonly %2) {
%4 = alloca i32
%5 = bitcast i32* %4 to i8*
%6 = icmp sgt i32 %0, 0
br i1 %6, label %7, label %34
7: ; preds = %3, %27
%8 = phi i8* [ %30, %27 ], [ %2, %3 ]
%9 = phi i8* [ %31, %27 ], [ %1, %3 ]
%10 = phi i32 [ %32, %27 ], [ %0, %3 ]
%11 = load i8, i8* %9
%12 = icmp eq i8 %11, 92
br i1 %12, label %13, label %25
13: ; preds = %7
%14 = call i32 (i8*, i32*, ...) bitcast (i32 (...)* @Tcl_Backslash to i32 (i8*, i32*, ...)*)(i8* %9, i32* %4)
%15 = trunc i32 %14 to i8
store i8 %15, i8* %8
%16 = and i32 %14, 255
%17 = icmp ne i32 %16, 0
%18 = zext i1 %17 to i64
%19 = getelementptr i8, i8* %8, i64 %18
%20 = load i32, i32* %4
%21 = add nsw i32 %20, -1
%22 = sext i32 %21 to i64
%23 = getelementptr inbounds i8, i8* %9, i64 %22
%24 = sub nsw i32 %10, %21
br label %27
25: ; preds = %7
store i8 %11, i8* %8
%26 = getelementptr inbounds i8, i8* %8, i64 1
br label %27
27: ; preds = %13, %25
%28 = phi i32 [ %24, %13 ], [ %10, %25 ]
%29 = phi i8* [ %23, %13 ], [ %9, %25 ]
%30 = phi i8* [ %19, %13 ], [ %26, %25 ]
%31 = getelementptr inbounds i8, i8* %29, i64 1
%32 = add nsw i32 %28, -1
%33 = icmp sgt i32 %28, 1
br i1 %33, label %7, label %34
34: ; preds = %27, %3
%35 = phi i8* [ %2, %3 ], [ %30, %27 ]
store i8 0, i8* %35
ret void
}