char *QuoteEnd(string, lastChar, term)
char *string;
char *lastChar;
int term;
{
  register char *p = string;
  int count;
  while (*p != term) {
    if (*p == '\\') {
      (void)Tcl_Backslash(p, &count);
      p += count;
    } else if (*p == '[') {
      for (p++; *p != ']'; p++) {
        p = TclWordEnd(p, lastChar, 1, (int *)0);
        if (*p == 0) {
          return p;
        }
      }
      p++;
    } else if (*p == '$') {
      p = VarNameEnd(p, lastChar);
      if (*p == 0) {
        return p;
      }
      p++;
    } else if (p == lastChar) {
      return p;
    } else {
      p++;
    }
  }
  return p - 1;
}


x86 assembly (clang, -O0):
<QuoteEnd>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    %edx,-0x1c(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,-0x28(%rbp)
mov    -0x28(%rbp),%rax
movsbl (%rax),%eax
cmp    -0x1c(%rbp),%eax
je     12ac <QuoteEnd+0x17c>
mov    -0x28(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x5c,%eax
jne    1190 <QuoteEnd+0x60>
mov    -0x28(%rbp),%rdi
lea    -0x2c(%rbp),%rsi
mov    $0x0,%al
call   1040 <Tcl_Backslash@plt>
mov    -0x2c(%rbp),%ecx
mov    -0x28(%rbp),%rax
movslq %ecx,%rcx
add    %rcx,%rax
mov    %rax,-0x28(%rbp)
jmp    12a7 <QuoteEnd+0x177>
mov    -0x28(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x5b,%eax
jne    121e <QuoteEnd+0xee>
mov    -0x28(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x28(%rbp)
mov    -0x28(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x5d,%eax
je     120d <QuoteEnd+0xdd>
mov    -0x28(%rbp),%rdi
mov    -0x18(%rbp),%rsi
mov    $0x1,%edx
xor    %eax,%eax
mov    %eax,%ecx
mov    $0x0,%al
call   1050 <TclWordEnd@plt>
cltq
mov    %rax,-0x28(%rbp)
mov    -0x28(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x0,%eax
jne    11f7 <QuoteEnd+0xc7>
mov    -0x28(%rbp),%rax
mov    %rax,-0x8(%rbp)
jmp    12b8 <QuoteEnd+0x188>
jmp    11fc <QuoteEnd+0xcc>
mov    -0x28(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x28(%rbp)
jmp    11ac <QuoteEnd+0x7c>
mov    -0x28(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x28(%rbp)
jmp    12a2 <QuoteEnd+0x172>
mov    -0x28(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x24,%eax
jne    1271 <QuoteEnd+0x141>
mov    -0x28(%rbp),%rdi
mov    -0x18(%rbp),%rsi
mov    $0x0,%al
call   1030 <VarNameEnd@plt>
cltq
mov    %rax,-0x28(%rbp)
mov    -0x28(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x0,%eax
jne    1260 <QuoteEnd+0x130>
mov    -0x28(%rbp),%rax
mov    %rax,-0x8(%rbp)
jmp    12b8 <QuoteEnd+0x188>
mov    -0x28(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x28(%rbp)
jmp    129d <QuoteEnd+0x16d>
mov    -0x28(%rbp),%rax
cmp    -0x18(%rbp),%rax
jne    128c <QuoteEnd+0x15c>
mov    -0x28(%rbp),%rax
mov    %rax,-0x8(%rbp)
jmp    12b8 <QuoteEnd+0x188>
mov    -0x28(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x28(%rbp)
jmp    129d <QuoteEnd+0x16d>
jmp    12a2 <QuoteEnd+0x172>
jmp    12a7 <QuoteEnd+0x177>
jmp    114b <QuoteEnd+0x1b>
mov    -0x28(%rbp),%rax
add    $0xffffffffffffffff,%rax
mov    %rax,-0x8(%rbp)
mov    -0x8(%rbp),%rax
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<QuoteEnd>:
push   %rbp
push   %r15
push   %r14
push   %rbx
push   %rax
mov    %rdi,%rbx
movsbl (%rdi),%eax
cmp    %edx,%eax
jne    1156 <QuoteEnd+0x26>
add    $0xffffffffffffffff,%rbx
mov    %rbx,%rbp
mov    %rbp,%rax
add    $0x8,%rsp
pop    %rbx
pop    %r14
pop    %r15
pop    %rbp
ret
mov    %edx,%r14d
mov    %rsi,%rbp
lea    0x4(%rsp),%r15
jmp    1181 <QuoteEnd+0x51>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
cmp    %rbp,%rbx
je     1148 <QuoteEnd+0x18>
add    $0x1,%rbx
movsbl (%rbx),%eax
cmp    %r14d,%eax
je     1141 <QuoteEnd+0x11>
cmp    $0x24,%al
je     11c0 <QuoteEnd+0x90>
cmp    $0x5c,%al
je     11e0 <QuoteEnd+0xb0>
cmp    $0x5b,%al
jne    1170 <QuoteEnd+0x40>
nopl   (%rax)
cmpb   $0x5d,0x1(%rbx)
je     11f7 <QuoteEnd+0xc7>
add    $0x1,%rbx
mov    %rbx,%rdi
mov    %rbp,%rsi
mov    $0x1,%edx
xor    %ecx,%ecx
xor    %eax,%eax
call   1050 <TclWordEnd@plt>
movslq %eax,%rbx
cmpb   $0x0,(%rbx)
jne    1190 <QuoteEnd+0x60>
jmp    1145 <QuoteEnd+0x15>
nopl   0x0(%rax,%rax,1)
mov    %rbx,%rdi
mov    %rbp,%rsi
xor    %eax,%eax
call   1030 <VarNameEnd@plt>
movslq %eax,%rbx
cmpb   $0x0,(%rbx)
jne    1175 <QuoteEnd+0x45>
jmp    1145 <QuoteEnd+0x15>
nopw   0x0(%rax,%rax,1)
mov    %rbx,%rdi
mov    %r15,%rsi
xor    %eax,%eax
call   1040 <Tcl_Backslash@plt>
movslq 0x4(%rsp),%rax
add    %rax,%rbx
jmp    1179 <QuoteEnd+0x49>
add    $0x2,%rbx
jmp    1179 <QuoteEnd+0x49>

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

LLVM IR (-O2):
define i8* @QuoteEnd(i8* %0, i8* %1, i32 %2) {
%4 = alloca i32
%5 = bitcast i32* %4 to i8*
%6 = load i8, i8* %0
%7 = sext i8 %6 to i32
%8 = icmp eq i32 %7, %2
br i1 %8, label %47, label %9
9: ; preds = %3, %42
%10 = phi i8 [ %44, %42 ], [ %6, %3 ]
%11 = phi i8* [ %43, %42 ], [ %0, %3 ]
switch i8 %10, label %38 [
i8 92, label %12
i8 91, label %17
i8 36, label %30
]
12: ; preds = %9
%13 = call i32 (i8*, i32*, ...) bitcast (i32 (...)* @Tcl_Backslash to i32 (i8*, i32*, ...)*)(i8* %11, i32* %4)
%14 = load i32, i32* %4
%15 = sext i32 %14 to i64
%16 = getelementptr inbounds i8, i8* %11, i64 %15
br label %42
17: ; preds = %9, %22
%18 = phi i8* [ %25, %22 ], [ %11, %9 ]
%19 = getelementptr inbounds i8, i8* %18, i64 1
%20 = load i8, i8* %19
%21 = icmp eq i8 %20, 93
br i1 %21, label %28, label %22
22: ; preds = %17
%23 = call i32 (i8*, i8*, i32, i32*, ...) bitcast (i32 (...)* @TclWordEnd to i32 (i8*, i8*, i32, i32*, ...)*)(i8* %19, i8* %1, i32 1, i32* null)
%24 = sext i32 %23 to i64
%25 = inttoptr i64 %24 to i8*
%26 = load i8, i8* %25
%27 = icmp eq i8 %26, 0
br i1 %27, label %50, label %17
28: ; preds = %17
%29 = getelementptr inbounds i8, i8* %18, i64 2
br label %42
30: ; preds = %9
%31 = call i32 (i8*, i8*, ...) bitcast (i32 (...)* @VarNameEnd to i32 (i8*, i8*, ...)*)(i8* %11, i8* %1)
%32 = sext i32 %31 to i64
%33 = inttoptr i64 %32 to i8*
%34 = load i8, i8* %33
%35 = icmp eq i8 %34, 0
br i1 %35, label %52, label %36
36: ; preds = %30
%37 = getelementptr inbounds i8, i8* %33, i64 1
br label %42
38: ; preds = %9
%39 = icmp eq i8* %11, %1
br i1 %39, label %54, label %40
40: ; preds = %38
%41 = getelementptr inbounds i8, i8* %11, i64 1
br label %42
42: ; preds = %28, %40, %36, %12
%43 = phi i8* [ %16, %12 ], [ %29, %28 ], [ %37, %36 ], [ %41, %40 ]
%44 = load i8, i8* %43
%45 = sext i8 %44 to i32
%46 = icmp eq i32 %45, %2
br i1 %46, label %47, label %9
47: ; preds = %42, %3
%48 = phi i8* [ %0, %3 ], [ %43, %42 ]
%49 = getelementptr inbounds i8, i8* %48, i64 -1
br label %54
50: ; preds = %22
%51 = inttoptr i64 %24 to i8*
br label %54
52: ; preds = %30
%53 = inttoptr i64 %32 to i8*
br label %54
54: ; preds = %38, %52, %50, %47
%55 = phi i8* [ %49, %47 ], [ %51, %50 ], [ %53, %52 ], [ %1, %38 ]
ret i8* %55
}