#define NULL ((void *)0)
typedef unsigned long size_t; // Customize by platform.
typedef long intptr_t;
typedef unsigned long uintptr_t;
typedef long scalar_t__; // Either arithmetic or pointer type.
/* By default, we understand bool (as a convenience). */
typedef int bool;
#define false 0
#define true 1

/* Forward declarations */

/* Type definitions */

/* Variables and functions */
int /*<<< orphan*/ free(char *);
int /*<<< orphan*/ ftsh_error(int, int, char *, ...);
scalar_t__ isalpha(char);
scalar_t__ isdigit(char);
char *malloc(int);
int /*<<< orphan*/ strcat(char *, char *);
char *strchr(char *, char);
int /*<<< orphan*/ strcpy(char *, char *);
int strlen(char *);
char *variable_get(char *, int, int);
char *xxstrdup(char *);
char *variable_subst(char *value, int line) {
  char *subvalue, *newvalue;
  char *dollar, *start, *end;
  char terminator, oldend;
  int length;
  int withquotes = 0;
  int escape = 0;
  while (1) {
    for (dollar = value; *dollar; dollar++) {
      if (escape) {
        escape = 0;
      } else {
        if (*dollar == '\\') {
          escape = 1;
        } else if (*dollar == '$') {
          break;
        }
      }
    }
    if (!*dollar)
      return value;
    if (*(dollar + 1) == '{') {
      start = dollar + 2;
      terminator = '}';
    } else if (*(dollar + 1) == '(') {
      start = dollar + 2;
      terminator = ')';
    } else {
      start = dollar + 1;
      terminator = 0;
    }
    if (terminator) {
      end = strchr(start, terminator);
    } else {
      for (end = start;
           (isalpha(*end) || isdigit(*end) || (*end == '_') || (*end == '$') ||
            (*end == '#') || (*end == '@') || (*end == '*'));
           end++) {
      }
    }
    if (terminator && !end) {
      ftsh_error(10, line, "variable reference began with %c but didn't end",
                 *(dollar + 1));
      return 0;
    }
    if ((end - start) < 1) {
      ftsh_error(10, line, "empty variable reference");
      return 0;
    }
    withquotes = (dollar > value && *(dollar - 1) == '\"') && (*end) &&
                 (terminator ? *(end + 1) == '\"' : *end == '\"');
    oldend = *end;
    *end = 0;
    subvalue = variable_get(start, line, withquotes);
    *end = oldend;
    if (!subvalue) {
      subvalue = xxstrdup("");
    }
    length = strlen(value) - (end - dollar) + strlen(subvalue) + 1;
    newvalue = malloc(length);
    if (!newvalue) {
      free(subvalue);
      free(value);
      return 0;
    }
    *dollar = 0;
    strcpy(newvalue, value);
    strcat(newvalue, subvalue);
    if (terminator && *end) {
      strcat(newvalue, end + 1);
    } else {
      strcat(newvalue, end);
    }
    free(subvalue);
    free(value);
    value = newvalue;
  }
}


x86 assembly (clang, -O0):
<variable_subst>:
push   %rbp
mov    %rsp,%rbp
sub    $0x60,%rsp
mov    %rdi,-0x10(%rbp)
mov    %esi,-0x14(%rbp)
movl   $0x0,-0x4c(%rbp)
movl   $0x0,-0x50(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,-0x30(%rbp)
mov    -0x30(%rbp),%rax
cmpb   $0x0,(%rax)
je     1249 <variable_subst+0x99>
cmpl   $0x0,-0x50(%rbp)
je     11f8 <variable_subst+0x48>
movl   $0x0,-0x50(%rbp)
jmp    1233 <variable_subst+0x83>
mov    -0x30(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x5c,%eax
jne    1214 <variable_subst+0x64>
movl   $0x1,-0x50(%rbp)
jmp    122e <variable_subst+0x7e>
mov    -0x30(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x24,%eax
jne    1229 <variable_subst+0x79>
jmp    1249 <variable_subst+0x99>
jmp    122e <variable_subst+0x7e>
jmp    1233 <variable_subst+0x83>
jmp    1238 <variable_subst+0x88>
mov    -0x30(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x30(%rbp)
jmp    11d5 <variable_subst+0x25>
mov    -0x30(%rbp),%rax
cmpb   $0x0,(%rax)
jne    1263 <variable_subst+0xb3>
mov    -0x10(%rbp),%rax
mov    %rax,-0x8(%rbp)
jmp    15fa <variable_subst+0x44a>
mov    -0x30(%rbp),%rax
movsbl 0x1(%rax),%eax
cmp    $0x7b,%eax
jne    1289 <variable_subst+0xd9>
mov    -0x30(%rbp),%rax
add    $0x2,%rax
mov    %rax,-0x38(%rbp)
movb   $0x7d,-0x41(%rbp)
jmp    12c4 <variable_subst+0x114>
mov    -0x30(%rbp),%rax
movsbl 0x1(%rax),%eax
cmp    $0x28,%eax
jne    12af <variable_subst+0xff>
mov    -0x30(%rbp),%rax
add    $0x2,%rax
mov    %rax,-0x38(%rbp)
movb   $0x29,-0x41(%rbp)
jmp    12bf <variable_subst+0x10f>
mov    -0x30(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x38(%rbp)
movb   $0x0,-0x41(%rbp)
jmp    12c4 <variable_subst+0x114>
cmpb   $0x0,-0x41(%rbp)
je     12e4 <variable_subst+0x134>
mov    -0x38(%rbp),%rdi
movsbl -0x41(%rbp),%esi
call   1070 <strchr@plt>
mov    %rax,-0x40(%rbp)
jmp    13b7 <variable_subst+0x207>
mov    -0x38(%rbp),%rax
mov    %rax,-0x40(%rbp)
mov    -0x40(%rbp),%rax
movsbl (%rax),%edi
call   10b0 <isalpha@plt>
mov    %rax,%rcx
mov    $0x1,%al
cmp    $0x0,%rcx
mov    %al,-0x51(%rbp)
jne    138c <variable_subst+0x1dc>
mov    -0x40(%rbp),%rax
movsbl (%rax),%edi
call   1040 <isdigit@plt>
mov    %rax,%rcx
mov    $0x1,%al
cmp    $0x0,%rcx
mov    %al,-0x51(%rbp)
jne    138c <variable_subst+0x1dc>
mov    -0x40(%rbp),%rax
movsbl (%rax),%ecx
mov    $0x1,%al
cmp    $0x5f,%ecx
mov    %al,-0x51(%rbp)
je     138c <variable_subst+0x1dc>
mov    -0x40(%rbp),%rax
movsbl (%rax),%ecx
mov    $0x1,%al
cmp    $0x24,%ecx
mov    %al,-0x51(%rbp)
je     138c <variable_subst+0x1dc>
mov    -0x40(%rbp),%rax
movsbl (%rax),%ecx
mov    $0x1,%al
cmp    $0x23,%ecx
mov    %al,-0x51(%rbp)
je     138c <variable_subst+0x1dc>
mov    -0x40(%rbp),%rax
movsbl (%rax),%ecx
mov    $0x1,%al
cmp    $0x40,%ecx
mov    %al,-0x51(%rbp)
je     138c <variable_subst+0x1dc>
mov    -0x40(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x2a,%eax
sete   %al
mov    %al,-0x51(%rbp)
mov    -0x51(%rbp),%al
test   $0x1,%al
jne    139c <variable_subst+0x1ec>
jmp    13b2 <variable_subst+0x202>
jmp    13a1 <variable_subst+0x1f1>
mov    -0x40(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x40(%rbp)
jmp    12ec <variable_subst+0x13c>
jmp    13b7 <variable_subst+0x207>
movsbl -0x41(%rbp),%eax
cmp    $0x0,%eax
je     13fa <variable_subst+0x24a>
cmpq   $0x0,-0x40(%rbp)
jne    13fa <variable_subst+0x24a>
mov    -0x14(%rbp),%esi
mov    -0x30(%rbp),%rax
movsbl 0x1(%rax),%ecx
mov    $0xa,%edi
lea    0xc1a(%rip),%rdx
mov    $0x0,%al
call   10a0 <ftsh_error@plt>
movq   $0x0,-0x8(%rbp)
jmp    15fa <variable_subst+0x44a>
mov    -0x40(%rbp),%rax
mov    -0x38(%rbp),%rcx
sub    %rcx,%rax
cmp    $0x1,%rax
jge    1432 <variable_subst+0x282>
mov    -0x14(%rbp),%esi
mov    $0xa,%edi
lea    0xc12(%rip),%rdx
mov    $0x0,%al
call   10a0 <ftsh_error@plt>
movq   $0x0,-0x8(%rbp)
jmp    15fa <variable_subst+0x44a>
mov    -0x30(%rbp),%rcx
xor    %eax,%eax
cmp    -0x10(%rbp),%rcx
mov    %al,-0x52(%rbp)
jbe    14b9 <variable_subst+0x309>
mov    -0x30(%rbp),%rax
movsbl -0x1(%rax),%ecx
xor    %eax,%eax
cmp    $0x22,%ecx
mov    %al,-0x52(%rbp)
jne    14b9 <variable_subst+0x309>
mov    -0x40(%rbp),%rax
movsbl (%rax),%ecx
xor    %eax,%eax
cmp    $0x0,%ecx
mov    %al,-0x52(%rbp)
je     14b9 <variable_subst+0x309>
movsbl -0x41(%rbp),%eax
cmp    $0x0,%eax
je     1498 <variable_subst+0x2e8>
mov    -0x40(%rbp),%rax
movsbl 0x1(%rax),%eax
cmp    $0x22,%eax
sete   %al
and    $0x1,%al
movzbl %al,%eax
mov    %eax,-0x58(%rbp)
jmp    14ad <variable_subst+0x2fd>
mov    -0x40(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x22,%eax
sete   %al
and    $0x1,%al
movzbl %al,%eax
mov    %eax,-0x58(%rbp)
mov    -0x58(%rbp),%eax
cmp    $0x0,%eax
setne  %al
mov    %al,-0x52(%rbp)
mov    -0x52(%rbp),%al
and    $0x1,%al
movzbl %al,%eax
mov    %eax,-0x4c(%rbp)
mov    -0x40(%rbp),%rax
mov    (%rax),%al
mov    %al,-0x42(%rbp)
mov    -0x40(%rbp),%rax
movb   $0x0,(%rax)
mov    -0x38(%rbp),%rdi
mov    -0x14(%rbp),%esi
mov    -0x4c(%rbp),%edx
call   1080 <variable_get@plt>
mov    %rax,-0x20(%rbp)
mov    -0x42(%rbp),%cl
mov    -0x40(%rbp),%rax
mov    %cl,(%rax)
cmpq   $0x0,-0x20(%rbp)
jne    150b <variable_subst+0x35b>
lea    0xb2d(%rip),%rdi
call   10c0 <xxstrdup@plt>
mov    %rax,-0x20(%rbp)
mov    -0x10(%rbp),%rdi
call   1060 <strlen@plt>
cltq
mov    -0x40(%rbp),%rcx
mov    -0x30(%rbp),%rdx
sub    %rdx,%rcx
sub    %rcx,%rax
mov    %rax,-0x60(%rbp)
mov    -0x20(%rbp),%rdi
call   1060 <strlen@plt>
mov    %eax,%ecx
mov    -0x60(%rbp),%rax
movslq %ecx,%rcx
add    %rcx,%rax
add    $0x1,%rax
mov    %eax,-0x48(%rbp)
mov    -0x48(%rbp),%edi
call   1090 <malloc@plt>
mov    %rax,-0x28(%rbp)
cmpq   $0x0,-0x28(%rbp)
jne    157a <variable_subst+0x3ca>
mov    -0x20(%rbp),%rdi
call   1030 <free@plt>
mov    -0x10(%rbp),%rdi
call   1030 <free@plt>
movq   $0x0,-0x8(%rbp)
jmp    15fa <variable_subst+0x44a>
mov    -0x30(%rbp),%rax
movb   $0x0,(%rax)
mov    -0x28(%rbp),%rdi
mov    -0x10(%rbp),%rsi
call   1050 <strcpy@plt>
mov    -0x28(%rbp),%rdi
mov    -0x20(%rbp),%rsi
call   10d0 <strcat@plt>
movsbl -0x41(%rbp),%eax
cmp    $0x0,%eax
je     15ce <variable_subst+0x41e>
mov    -0x40(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x0,%eax
je     15ce <variable_subst+0x41e>
mov    -0x28(%rbp),%rdi
mov    -0x40(%rbp),%rsi
add    $0x1,%rsi
call   10d0 <strcat@plt>
jmp    15db <variable_subst+0x42b>
mov    -0x28(%rbp),%rdi
mov    -0x40(%rbp),%rsi
call   10d0 <strcat@plt>
mov    -0x20(%rbp),%rdi
call   1030 <free@plt>
mov    -0x10(%rbp),%rdi
call   1030 <free@plt>
mov    -0x28(%rbp),%rax
mov    %rax,-0x10(%rbp)
jmp    11cd <variable_subst+0x1d>
mov    -0x8(%rbp),%rax
add    $0x60,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<variable_subst>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x18,%rsp
mov    %rdi,%rbx
mov    (%rdi),%al
test   %al,%al
je     139e <variable_subst+0x1ee>
mov    %rbx,%r12
lea    0x1(%rbx),%r15d
xor    %ecx,%ecx
mov    %rbx,%r13
movabs $0x1000000020000083,%rbx
jmp    1205 <variable_subst+0x55>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
movzbl 0x1(%r13),%eax
add    $0x1,%r13
add    $0x1,%r15d
test   %al,%al
je     139b <variable_subst+0x1eb>
test   %ecx,%ecx
mov    $0x0,%ecx
jne    11f0 <variable_subst+0x40>
mov    $0x1,%ecx
cmp    $0x5c,%al
je     11f0 <variable_subst+0x40>
cmp    $0x24,%al
je     121f <variable_subst+0x6f>
xor    %ecx,%ecx
jmp    11f0 <variable_subst+0x40>
movzbl 0x1(%r13),%r14d
cmp    $0x28,%r14d
mov    %esi,0xc(%rsp)
je     1295 <variable_subst+0xe5>
lea    0x1(%r13),%rbp
mov    $0x7d,%al
mov    %rbp,0x10(%rsp)
cmp    $0x7b,%r14b
je     1297 <variable_subst+0xe7>
jmp    1259 <variable_subst+0xa9>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
movzbl 0x1(%rbp),%r14d
add    $0x1,%rbp
movsbl %r14b,%edi
call   10b0 <isalpha@plt>
test   %rax,%rax
jne    1250 <variable_subst+0xa0>
movsbl 0x0(%rbp),%edi
call   1040 <isdigit@plt>
test   %rax,%rax
jne    1250 <variable_subst+0xa0>
movzbl 0x0(%rbp),%eax
add    $0xdd,%al
cmp    $0x3c,%al
ja     1288 <variable_subst+0xd8>
movzbl %al,%eax
bt     %rax,%rbx
jb     1250 <variable_subst+0xa0>
mov    $0x1,%cl
mov    0xc(%rsp),%esi
mov    0x10(%rsp),%rdi
jmp    12bb <variable_subst+0x10b>
mov    $0x29,%al
lea    0x2(%r13),%rdi
movzbl %al,%esi
mov    %rdi,%rbx
call   1070 <strchr@plt>
test   %rax,%rax
je     13db <variable_subst+0x22b>
mov    %rax,%rbp
xor    %ecx,%ecx
mov    0xc(%rsp),%esi
mov    %rbx,%rdi
mov    %rbp,%rax
sub    %rdi,%rax
test   %rax,%rax
jle    13b0 <variable_subst+0x200>
cmp    %r12,%r13
mov    %ecx,0x10(%rsp)
jbe    12ef <variable_subst+0x13f>
cmpb   $0x22,-0x1(%r13)
jne    12ef <variable_subst+0x13f>
mov    0x0(%rbp),%al
test   %al,%al
je     12ef <variable_subst+0x13f>
test   %cl,%cl
jne    12e8 <variable_subst+0x138>
mov    0x1(%rbp),%al
cmp    $0x22,%al
sete   %al
jmp    12f1 <variable_subst+0x141>
xor    %eax,%eax
movzbl %al,%edx
mov    0x0(%rbp),%bl
movb   $0x0,0x0(%rbp)
call   1080 <variable_get@plt>
mov    %rax,%r14
mov    %bl,0x0(%rbp)
test   %rax,%rax
jne    131a <variable_subst+0x16a>
lea    0xd1d(%rip),%rdi
call   10c0 <xxstrdup@plt>
mov    %rax,%r14
mov    %r12,%rdi
call   1060 <strlen@plt>
mov    %eax,%ebx
mov    %r14,%rdi
call   1060 <strlen@plt>
add    %eax,%ebx
sub    %ebp,%ebx
add    %r15d,%ebx
mov    %ebx,%edi
call   1090 <malloc@plt>
test   %rax,%rax
je     13c7 <variable_subst+0x217>
mov    %rax,%rbx
movb   $0x0,0x0(%r13)
mov    %rax,%rdi
mov    %r12,%rsi
call   1050 <strcpy@plt>
mov    %rbx,%rdi
mov    %r14,%rsi
call   10d0 <strcat@plt>
cmpb   $0x0,0x10(%rsp)
jne    1370 <variable_subst+0x1c0>
cmpb   $0x1,0x0(%rbp)
sbb    $0xffffffffffffffff,%rbp
mov    %rbx,%rdi
mov    %rbp,%rsi
call   10d0 <strcat@plt>
mov    %r14,%rdi
call   1030 <free@plt>
mov    %r12,%rdi
call   1030 <free@plt>
mov    (%rbx),%al
test   %al,%al
mov    0xc(%rsp),%esi
jne    11cb <variable_subst+0x1b>
jmp    139e <variable_subst+0x1ee>
mov    %r12,%rbx
mov    %rbx,%rax
add    $0x18,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret
lea    0xc79(%rip),%rdx
xor    %ebx,%ebx
mov    $0xa,%edi
xor    %eax,%eax
call   10a0 <ftsh_error@plt>
jmp    139e <variable_subst+0x1ee>
mov    %r14,%rdi
call   1030 <free@plt>
mov    %r12,%rdi
call   1030 <free@plt>
xor    %ebx,%ebx
jmp    139e <variable_subst+0x1ee>
lea    0xc1e(%rip),%rdx
xor    %ebx,%ebx
mov    $0xa,%edi
mov    0xc(%rsp),%esi
mov    %r14d,%ecx
xor    %eax,%eax
call   10a0 <ftsh_error@plt>
jmp    139e <variable_subst+0x1ee>

LLVM IR (-O0):
@.str = [48 x i8] c"variable reference began with %c but didn't end\00"
@.str.1 = [25 x i8] c"empty variable reference\00"
@.str.2 = [1 x i8] zeroinitializer
define i8* @variable_subst(i8* %0, i32 %1) {
%3 = alloca i8*
%4 = alloca i8*
%5 = alloca i32
%6 = alloca i8*
%7 = alloca i8*
%8 = alloca i8*
%9 = alloca i8*
%10 = alloca i8*
%11 = alloca i8
%12 = alloca i8
%13 = alloca i32
%14 = alloca i32
%15 = alloca i32
store i8* %0, i8** %4
store i32 %1, i32* %5
store i32 0, i32* %14
store i32 0, i32* %15
br label %16
16: ; preds = %2, %248
%17 = load i8*, i8** %4
store i8* %17, i8** %8
br label %18
18: ; preds = %41, %16
%19 = load i8*, i8** %8
%20 = load i8, i8* %19
%21 = icmp ne i8 %20, 0
br i1 %21, label %22, label %44
22: ; preds = %18
%23 = load i32, i32* %15
%24 = icmp ne i32 %23, 0
br i1 %24, label %25, label %26
25: ; preds = %22
store i32 0, i32* %15
br label %40
26: ; preds = %22
%27 = load i8*, i8** %8
%28 = load i8, i8* %27
%29 = sext i8 %28 to i32
%30 = icmp eq i32 %29, 92
br i1 %30, label %31, label %32
31: ; preds = %26
store i32 1, i32* %15
br label %39
32: ; preds = %26
%33 = load i8*, i8** %8
%34 = load i8, i8* %33
%35 = sext i8 %34 to i32
%36 = icmp eq i32 %35, 36
br i1 %36, label %37, label %38
37: ; preds = %32
br label %44
38: ; preds = %32
br label %39
39: ; preds = %38, %31
br label %40
40: ; preds = %39, %25
br label %41
41: ; preds = %40
%42 = load i8*, i8** %8
%43 = getelementptr inbounds i8, i8* %42, i32 1
store i8* %43, i8** %8
br label %18
44: ; preds = %37, %18
%45 = load i8*, i8** %8
%46 = load i8, i8* %45
%47 = icmp ne i8 %46, 0
br i1 %47, label %50, label %48
48: ; preds = %44
%49 = load i8*, i8** %4
store i8* %49, i8** %3
br label %254
50: ; preds = %44
%51 = load i8*, i8** %8
%52 = getelementptr inbounds i8, i8* %51, i64 1
%53 = load i8, i8* %52
%54 = sext i8 %53 to i32
%55 = icmp eq i32 %54, 123
br i1 %55, label %56, label %59
56: ; preds = %50
%57 = load i8*, i8** %8
%58 = getelementptr inbounds i8, i8* %57, i64 2
store i8* %58, i8** %9
store i8 125, i8* %11
br label %72
59: ; preds = %50
%60 = load i8*, i8** %8
%61 = getelementptr inbounds i8, i8* %60, i64 1
%62 = load i8, i8* %61
%63 = sext i8 %62 to i32
%64 = icmp eq i32 %63, 40
br i1 %64, label %65, label %68
65: ; preds = %59
%66 = load i8*, i8** %8
%67 = getelementptr inbounds i8, i8* %66, i64 2
store i8* %67, i8** %9
store i8 41, i8* %11
br label %71
68: ; preds = %59
%69 = load i8*, i8** %8
%70 = getelementptr inbounds i8, i8* %69, i64 1
store i8* %70, i8** %9
store i8 0, i8* %11
br label %71
71: ; preds = %68, %65
br label %72
72: ; preds = %71, %56
%73 = load i8, i8* %11
%74 = icmp ne i8 %73, 0
br i1 %74, label %75, label %79
75: ; preds = %72
%76 = load i8*, i8** %9
%77 = load i8, i8* %11
%78 = call i8* @strchr(i8* %76, i8 signext %77)
store i8* %78, i8** %10
br label %123
79: ; preds = %72
%80 = load i8*, i8** %9
store i8* %80, i8** %10
br label %81
81: ; preds = %119, %79
%82 = load i8*, i8** %10
%83 = load i8, i8* %82
%84 = call i64 @isalpha(i8 signext %83)
%85 = icmp ne i64 %84, 0
br i1 %85, label %116, label %86
86: ; preds = %81
%87 = load i8*, i8** %10
%88 = load i8, i8* %87
%89 = call i64 @isdigit(i8 signext %88)
%90 = icmp ne i64 %89, 0
br i1 %90, label %116, label %91
91: ; preds = %86
%92 = load i8*, i8** %10
%93 = load i8, i8* %92
%94 = sext i8 %93 to i32
%95 = icmp eq i32 %94, 95
br i1 %95, label %116, label %96
96: ; preds = %91
%97 = load i8*, i8** %10
%98 = load i8, i8* %97
%99 = sext i8 %98 to i32
%100 = icmp eq i32 %99, 36
br i1 %100, label %116, label %101
101: ; preds = %96
%102 = load i8*, i8** %10
%103 = load i8, i8* %102
%104 = sext i8 %103 to i32
%105 = icmp eq i32 %104, 35
br i1 %105, label %116, label %106
106: ; preds = %101
%107 = load i8*, i8** %10
%108 = load i8, i8* %107
%109 = sext i8 %108 to i32
%110 = icmp eq i32 %109, 64
br i1 %110, label %116, label %111
111: ; preds = %106
%112 = load i8*, i8** %10
%113 = load i8, i8* %112
%114 = sext i8 %113 to i32
%115 = icmp eq i32 %114, 42
br label %116
116: ; preds = %111, %106, %101, %96, %91, %86, %81
%117 = phi i1 [ true, %106 ], [ true, %101 ], [ true, %96 ], [ true, %91 ], [ true, %86 ], [ true, %81 ], [ %115, %111 ]
br i1 %117, label %118, label %122
118: ; preds = %116
br label %119
119: ; preds = %118
%120 = load i8*, i8** %10
%121 = getelementptr inbounds i8, i8* %120, i32 1
store i8* %121, i8** %10
br label %81
122: ; preds = %116
br label %123
123: ; preds = %122, %75
%124 = load i8, i8* %11
%125 = sext i8 %124 to i32
%126 = icmp ne i32 %125, 0
br i1 %126, label %127, label %137
127: ; preds = %123
%128 = load i8*, i8** %10
%129 = icmp ne i8* %128, null
br i1 %129, label %137, label %130
130: ; preds = %127
%131 = load i32, i32* %5
%132 = load i8*, i8** %8
%133 = getelementptr inbounds i8, i8* %132, i64 1
%134 = load i8, i8* %133
%135 = sext i8 %134 to i32
%136 = call i32 (i32, i32, i8*, ...) @ftsh_error(i32 10, i32 %131, i8* getelementptr inbounds ([48 x i8], [48 x i8]* @.str, i64 0, i64 0), i32 %135)
store i8* null, i8** %3
br label %254
137: ; preds = %127, %123
%138 = load i8*, i8** %10
%139 = load i8*, i8** %9
%140 = ptrtoint i8* %138 to i64
%141 = ptrtoint i8* %139 to i64
%142 = sub i64 %140, %141
%143 = icmp slt i64 %142, 1
br i1 %143, label %144, label %147
144: ; preds = %137
%145 = load i32, i32* %5
%146 = call i32 (i32, i32, i8*, ...) @ftsh_error(i32 10, i32 %145, i8* getelementptr inbounds ([25 x i8], [25 x i8]* @.str.1, i64 0, i64 0))
store i8* null, i8** %3
br label %254
147: ; preds = %137
%148 = load i8*, i8** %8
%149 = load i8*, i8** %4
%150 = icmp ugt i8* %148, %149
br i1 %150, label %151, label %182
151: ; preds = %147
%152 = load i8*, i8** %8
%153 = getelementptr inbounds i8, i8* %152, i64 -1
%154 = load i8, i8* %153
%155 = sext i8 %154 to i32
%156 = icmp eq i32 %155, 34
br i1 %156, label %157, label %182
157: ; preds = %151
%158 = load i8*, i8** %10
%159 = load i8, i8* %158
%160 = sext i8 %159 to i32
%161 = icmp ne i32 %160, 0
br i1 %161, label %162, label %182
162: ; preds = %157
%163 = load i8, i8* %11
%164 = sext i8 %163 to i32
%165 = icmp ne i32 %164, 0
br i1 %165, label %166, label %173
166: ; preds = %162
%167 = load i8*, i8** %10
%168 = getelementptr inbounds i8, i8* %167, i64 1
%169 = load i8, i8* %168
%170 = sext i8 %169 to i32
%171 = icmp eq i32 %170, 34
%172 = zext i1 %171 to i32
br label %179
173: ; preds = %162
%174 = load i8*, i8** %10
%175 = load i8, i8* %174
%176 = sext i8 %175 to i32
%177 = icmp eq i32 %176, 34
%178 = zext i1 %177 to i32
br label %179
179: ; preds = %173, %166
%180 = phi i32 [ %172, %166 ], [ %178, %173 ]
%181 = icmp ne i32 %180, 0
br label %182
182: ; preds = %179, %157, %151, %147
%183 = phi i1 [ false, %157 ], [ false, %151 ], [ false, %147 ], [ %181, %179 ]
%184 = zext i1 %183 to i32
store i32 %184, i32* %14
%185 = load i8*, i8** %10
%186 = load i8, i8* %185
store i8 %186, i8* %12
%187 = load i8*, i8** %10
store i8 0, i8* %187
%188 = load i8*, i8** %9
%189 = load i32, i32* %5
%190 = load i32, i32* %14
%191 = call i8* @variable_get(i8* %188, i32 %189, i32 %190)
store i8* %191, i8** %6
%192 = load i8, i8* %12
%193 = load i8*, i8** %10
store i8 %192, i8* %193
%194 = load i8*, i8** %6
%195 = icmp ne i8* %194, null
br i1 %195, label %198, label %196
196: ; preds = %182
%197 = call i8* @xxstrdup(i8* getelementptr inbounds ([1 x i8], [1 x i8]* @.str.2, i64 0, i64 0))
store i8* %197, i8** %6
br label %198
198: ; preds = %196, %182
%199 = load i8*, i8** %4
%200 = call i32 @strlen(i8* %199)
%201 = sext i32 %200 to i64
%202 = load i8*, i8** %10
%203 = load i8*, i8** %8
%204 = ptrtoint i8* %202 to i64
%205 = ptrtoint i8* %203 to i64
%206 = sub i64 %204, %205
%207 = sub nsw i64 %201, %206
%208 = load i8*, i8** %6
%209 = call i32 @strlen(i8* %208)
%210 = sext i32 %209 to i64
%211 = add nsw i64 %207, %210
%212 = add nsw i64 %211, 1
%213 = trunc i64 %212 to i32
store i32 %213, i32* %13
%214 = load i32, i32* %13
%215 = call i8* @malloc(i32 %214)
store i8* %215, i8** %7
%216 = load i8*, i8** %7
%217 = icmp ne i8* %216, null
br i1 %217, label %223, label %218
218: ; preds = %198
%219 = load i8*, i8** %6
%220 = call i32 @free(i8* %219)
%221 = load i8*, i8** %4
%222 = call i32 @free(i8* %221)
store i8* null, i8** %3
br label %254
223: ; preds = %198
%224 = load i8*, i8** %8
store i8 0, i8* %224
%225 = load i8*, i8** %7
%226 = load i8*, i8** %4
%227 = call i32 @strcpy(i8* %225, i8* %226)
%228 = load i8*, i8** %7
%229 = load i8*, i8** %6
%230 = call i32 @strcat(i8* %228, i8* %229)
%231 = load i8, i8* %11
%232 = sext i8 %231 to i32
%233 = icmp ne i32 %232, 0
br i1 %233, label %234, label %244
234: ; preds = %223
%235 = load i8*, i8** %10
%236 = load i8, i8* %235
%237 = sext i8 %236 to i32
%238 = icmp ne i32 %237, 0
br i1 %238, label %239, label %244
239: ; preds = %234
%240 = load i8*, i8** %7
%241 = load i8*, i8** %10
%242 = getelementptr inbounds i8, i8* %241, i64 1
%243 = call i32 @strcat(i8* %240, i8* %242)
br label %248
244: ; preds = %234, %223
%245 = load i8*, i8** %7
%246 = load i8*, i8** %10
%247 = call i32 @strcat(i8* %245, i8* %246)
br label %248
248: ; preds = %244, %239
%249 = load i8*, i8** %6
%250 = call i32 @free(i8* %249)
%251 = load i8*, i8** %4
%252 = call i32 @free(i8* %251)
%253 = load i8*, i8** %7
store i8* %253, i8** %4
br label %16
254: ; preds = %218, %144, %130, %48
%255 = load i8*, i8** %3
ret i8* %255
}

LLVM IR (-O2):
@.str = [48 x i8] c"variable reference began with %c but didn't end\00"
@.str.1 = [25 x i8] c"empty variable reference\00"
@.str.2 = [1 x i8] zeroinitializer
define i8* @variable_subst(i8* %0, i32 %1) {
%3 = load i8, i8* %0
%4 = icmp eq i8 %3, 0
br i1 %4, label %110, label %5
5: ; preds = %2, %103
%6 = phi i8 [ %108, %103 ], [ %3, %2 ]
%7 = phi i8* [ %90, %103 ], [ %0, %2 ]
br label %8
8: ; preds = %5, %15
%9 = phi i8 [ %6, %5 ], [ %18, %15 ]
%10 = phi i32 [ 0, %5 ], [ %16, %15 ]
%11 = phi i8* [ %7, %5 ], [ %17, %15 ]
%12 = icmp eq i32 %10, 0
br i1 %12, label %13, label %15
13: ; preds = %8
switch i8 %9, label %14 [
i8 92, label %15
i8 36, label %20
]
14: ; preds = %13
br label %15
15: ; preds = %13, %14, %8
%16 = phi i32 [ 0, %8 ], [ 1, %13 ], [ 0, %14 ]
%17 = getelementptr inbounds i8, i8* %11, i64 1
%18 = load i8, i8* %17
%19 = icmp eq i8 %18, 0
br i1 %19, label %110, label %8
20: ; preds = %13
%21 = getelementptr inbounds i8, i8* %11, i64 1
%22 = load i8, i8* %21
switch i8 %22, label %24 [
i8 123, label %38
i8 40, label %23
]
23: ; preds = %20
br label %38
24: ; preds = %20, %35
%25 = phi i8 [ %37, %35 ], [ %22, %20 ]
%26 = phi i8* [ %36, %35 ], [ %21, %20 ]
%27 = tail call i64 @isalpha(i8 signext %25)
%28 = icmp eq i64 %27, 0
br i1 %28, label %29, label %35
29: ; preds = %24
%30 = load i8, i8* %26
%31 = tail call i64 @isdigit(i8 signext %30)
%32 = icmp eq i64 %31, 0
br i1 %32, label %33, label %35
33: ; preds = %29
%34 = load i8, i8* %26
switch i8 %34, label %46 [
i8 95, label %35
i8 36, label %35
i8 35, label %35
i8 64, label %35
i8 42, label %35
]
35: ; preds = %33, %33, %33, %33, %33, %24, %29
%36 = getelementptr inbounds i8, i8* %26, i64 1
%37 = load i8, i8* %36
br label %24
38: ; preds = %20, %23
%39 = phi i8 [ 41, %23 ], [ 125, %20 ]
%40 = getelementptr inbounds i8, i8* %11, i64 2
%41 = tail call i8* @strchr(i8* %40, i8 signext %39)
%42 = icmp eq i8* %41, null
br i1 %42, label %43, label %46
43: ; preds = %38
%44 = zext i8 %22 to i32
%45 = tail call i32 (i32, i32, i8*, ...) @ftsh_error(i32 10, i32 %1, i8* getelementptr inbounds ([48 x i8], [48 x i8]* @.str, i64 0, i64 0), i32 %44)
br label %110
46: ; preds = %33, %38
%47 = phi i8* [ %41, %38 ], [ %26, %33 ]
%48 = phi i8* [ %40, %38 ], [ %21, %33 ]
%49 = phi i1 [ false, %38 ], [ true, %33 ]
%50 = ptrtoint i8* %47 to i64
%51 = ptrtoint i8* %48 to i64
%52 = sub i64 %50, %51
%53 = icmp slt i64 %52, 1
br i1 %53, label %54, label %56
54: ; preds = %46
%55 = tail call i32 (i32, i32, i8*, ...) @ftsh_error(i32 10, i32 %1, i8* getelementptr inbounds ([25 x i8], [25 x i8]* @.str.1, i64 0, i64 0))
br label %110
56: ; preds = %46
%57 = icmp ugt i8* %11, %7
br i1 %57, label %58, label %72
58: ; preds = %56
%59 = getelementptr inbounds i8, i8* %11, i64 -1
%60 = load i8, i8* %59
%61 = icmp eq i8 %60, 34
br i1 %61, label %62, label %72
62: ; preds = %58
%63 = load i8, i8* %47
%64 = icmp eq i8 %63, 0
br i1 %64, label %72, label %65
65: ; preds = %62
br i1 %49, label %69, label %66
66: ; preds = %65
%67 = getelementptr inbounds i8, i8* %47, i64 1
%68 = load i8, i8* %67
br label %69
69: ; preds = %65, %66
%70 = phi i8 [ %68, %66 ], [ %63, %65 ]
%71 = icmp eq i8 %70, 34
br label %72
72: ; preds = %69, %62, %58, %56
%73 = phi i1 [ false, %62 ], [ false, %58 ], [ false, %56 ], [ %71, %69 ]
%74 = zext i1 %73 to i32
%75 = load i8, i8* %47
store i8 0, i8* %47
%76 = tail call i8* @variable_get(i8* %48, i32 %1, i32 %74)
store i8 %75, i8* %47
%77 = icmp eq i8* %76, null
br i1 %77, label %78, label %80
78: ; preds = %72
%79 = tail call i8* @xxstrdup(i8* getelementptr inbounds ([1 x i8], [1 x i8]* @.str.2, i64 0, i64 0))
br label %80
80: ; preds = %78, %72
%81 = phi i8* [ %76, %72 ], [ %79, %78 ]
%82 = tail call i32 @strlen(i8* %7)
%83 = ptrtoint i8* %11 to i64
%84 = sub i64 %83, %50
%85 = tail call i32 @strlen(i8* %81)
%86 = trunc i64 %84 to i32
%87 = add i32 %86, 1
%88 = add i32 %87, %82
%89 = add i32 %88, %85
%90 = tail call i8* @malloc(i32 %89)
%91 = icmp eq i8* %90, null
br i1 %91, label %92, label %95
92: ; preds = %80
%93 = tail call i32 @free(i8* %81)
%94 = tail call i32 @free(i8* %7)
br label %110
95: ; preds = %80
store i8 0, i8* %11
%96 = tail call i32 @strcpy(i8* %90, i8* %7)
%97 = tail call i32 @strcat(i8* %90, i8* %81)
br i1 %49, label %103, label %98
98: ; preds = %95
%99 = load i8, i8* %47
%100 = icmp ne i8 %99, 0
%101 = zext i1 %100 to i64
%102 = getelementptr i8, i8* %47, i64 %101
br label %103
103: ; preds = %98, %95
%104 = phi i8* [ %47, %95 ], [ %102, %98 ]
%105 = tail call i32 @strcat(i8* %90, i8* %104)
%106 = tail call i32 @free(i8* %81)
%107 = tail call i32 @free(i8* %7)
%108 = load i8, i8* %90
%109 = icmp eq i8 %108, 0
br i1 %109, label %110, label %5
110: ; preds = %103, %15, %2, %92, %54, %43
%111 = phi i8* [ null, %54 ], [ null, %92 ], [ null, %43 ], [ %0, %2 ], [ %7, %15 ], [ %90, %103 ]
ret i8* %111
}