void expand(argv, argc) register char *argv[];
register int argc;
{
  register char *t;
  register char *p;
  register int n;
  register int argno;
  t = argv[0];
  p = t;
  while (*p)
    p++;
  p--;
  while (p > t) {
    if (*(p - 1) != '$')
      putback(*p);
    else {
      switch (*p) {
      case '#':
        pbnum(argc - 2);
        break;
      case '0':
      case '1':
      case '2':
      case '3':
      case '4':
      case '5':
      case '6':
      case '7':
      case '8':
      case '9':
        if ((argno = *p - '0') < argc - 1)
          pbstr(argv[argno + 1]);
        break;
      case '*':
        for (n = argc - 1; n > 2; n--) {
          pbstr(argv[n]);
          putback(',');
        }
        pbstr(argv[2]);
        break;
      default:
        putback(*p);
        putback('$');
        break;
      }
      p--;
    }
    p--;
  }
  if (p == t)
    putback(*p);
}


x86 assembly (clang, -O0):
<expand>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    -0x8(%rbp),%rax
mov    (%rax),%rax
mov    %rax,-0x18(%rbp)
mov    -0x18(%rbp),%rax
mov    %rax,-0x20(%rbp)
mov    -0x20(%rbp),%rax
cmpb   $0x0,(%rax)
je     1170 <expand+0x40>
mov    -0x20(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x20(%rbp)
jmp    1152 <expand+0x22>
mov    -0x20(%rbp),%rax
add    $0xffffffffffffffff,%rax
mov    %rax,-0x20(%rbp)
mov    -0x20(%rbp),%rax
cmp    -0x18(%rbp),%rax
jbe    12c0 <expand+0x190>
mov    -0x20(%rbp),%rax
movsbl -0x1(%rax),%eax
cmp    $0x24,%eax
je     11ae <expand+0x7e>
mov    -0x20(%rbp),%rax
movsbl (%rax),%edi
mov    $0x0,%al
call   1050 <putback@plt>
jmp    12af <expand+0x17f>
mov    -0x20(%rbp),%rax
movsbl (%rax),%eax
mov    %eax,-0x2c(%rbp)
sub    $0x23,%eax
je     11eb <expand+0xbb>
jmp    11c6 <expand+0x96>
mov    -0x2c(%rbp),%eax
sub    $0x2a,%eax
je     1235 <expand+0x105>
jmp    11d7 <expand+0xa7>
mov    -0x2c(%rbp),%eax
add    $0xffffffd0,%eax
sub    $0xa,%eax
jb     11fd <expand+0xcd>
jmp    1289 <expand+0x159>
mov    -0xc(%rbp),%edi
sub    $0x2,%edi
mov    $0x0,%al
call   1030 <pbnum@plt>
jmp    12a3 <expand+0x173>
mov    -0x20(%rbp),%rax
movsbl (%rax),%eax
sub    $0x30,%eax
mov    %eax,-0x28(%rbp)
mov    -0xc(%rbp),%ecx
sub    $0x1,%ecx
cmp    %ecx,%eax
jge    1230 <expand+0x100>
mov    -0x8(%rbp),%rax
mov    -0x28(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
mov    (%rax,%rcx,8),%rdi
mov    $0x0,%al
call   1040 <pbstr@plt>
jmp    12a3 <expand+0x173>
mov    -0xc(%rbp),%eax
sub    $0x1,%eax
mov    %eax,-0x24(%rbp)
cmpl   $0x2,-0x24(%rbp)
jle    1275 <expand+0x145>
mov    -0x8(%rbp),%rax
movslq -0x24(%rbp),%rcx
mov    (%rax,%rcx,8),%rdi
mov    $0x0,%al
call   1040 <pbstr@plt>
mov    $0x2c,%edi
mov    $0x0,%al
call   1050 <putback@plt>
mov    -0x24(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x24(%rbp)
jmp    123e <expand+0x10e>
mov    -0x8(%rbp),%rax
mov    0x10(%rax),%rdi
mov    $0x0,%al
call   1040 <pbstr@plt>
jmp    12a3 <expand+0x173>
mov    -0x20(%rbp),%rax
movsbl (%rax),%edi
mov    $0x0,%al
call   1050 <putback@plt>
mov    $0x24,%edi
mov    $0x0,%al
call   1050 <putback@plt>
mov    -0x20(%rbp),%rax
add    $0xffffffffffffffff,%rax
mov    %rax,-0x20(%rbp)
mov    -0x20(%rbp),%rax
add    $0xffffffffffffffff,%rax
mov    %rax,-0x20(%rbp)
jmp    117c <expand+0x4c>
mov    -0x20(%rbp),%rax
cmp    -0x18(%rbp),%rax
jne    12dc <expand+0x1ac>
mov    -0x20(%rbp),%rax
movsbl (%rax),%edi
mov    $0x0,%al
call   1050 <putback@plt>
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<expand>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
push   %rax
mov    %esi,%r14d
mov    %rdi,%r12
mov    (%rdi),%rbp
lea    -0x1(%rbp),%r15
nopl   0x0(%rax,%rax,1)
cmpb   $0x0,0x1(%r15)
lea    0x1(%r15),%r15
jne    1150 <expand+0x20>
lea    -0x1(%r15),%rbx
cmp    %rbp,%rbx
jbe    1233 <expand+0x103>
lea    -0x2(%r14),%eax
mov    %eax,0x4(%rsp)
mov    %r14d,%r13d
add    $0x1,%r13
jmp    1197 <expand+0x67>
nopl   0x0(%rax)
xor    %eax,%eax
call   1050 <putback@plt>
mov    %rbx,%r15
lea    -0x1(%r15),%rbx
cmp    %rbp,%rbx
jbe    1233 <expand+0x103>
cmpb   $0x24,-0x2(%r15)
movsbl (%rbx),%edi
jne    1180 <expand+0x50>
add    $0xfffffffffffffffe,%r15
lea    -0x30(%rdi),%eax
cmp    $0xa,%eax
jae    11c4 <expand+0x94>
add    $0xffffffd1,%edi
cmp    %r14d,%edi
jge    118a <expand+0x5a>
mov    %edi,%eax
mov    (%r12,%rax,8),%rdi
xor    %eax,%eax
call   1040 <pbstr@plt>
jmp    118a <expand+0x5a>
cmp    $0x23,%edi
je     120b <expand+0xdb>
cmp    $0x2a,%edi
jne    121b <expand+0xeb>
mov    %r13,%rbx
cmp    $0x4,%r14d
jl     1204 <expand+0xd4>
nopw   0x0(%rax,%rax,1)
lea    -0x2(%rbx),%eax
mov    (%r12,%rax,8),%rdi
xor    %eax,%eax
call   1040 <pbstr@plt>
mov    $0x2c,%edi
xor    %eax,%eax
call   1050 <putback@plt>
add    $0xffffffffffffffff,%rbx
cmp    $0x4,%rbx
jg     11e0 <expand+0xb0>
mov    0x10(%r12),%rdi
jmp    11bb <expand+0x8b>
mov    0x4(%rsp),%edi
xor    %eax,%eax
call   1030 <pbnum@plt>
jmp    118a <expand+0x5a>
xor    %eax,%eax
call   1050 <putback@plt>
mov    $0x24,%edi
xor    %eax,%eax
call   1050 <putback@plt>
jmp    118a <expand+0x5a>
cmp    %rbp,%rbx
je     1247 <expand+0x117>
add    $0x8,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret
movsbl 0x0(%rbp),%edi
xor    %eax,%eax
add    $0x8,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
jmp    1050 <putback@plt>

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

LLVM IR (-O2):
define void @expand(i8** nocapture %0, i32 %1) {
%3 = load i8*, i8** %0
br label %4
4: ; preds = %4, %2
%5 = phi i8* [ %3, %2 ], [ %8, %4 ]
%6 = load i8, i8* %5
%7 = icmp eq i8 %6, 0
%8 = getelementptr inbounds i8, i8* %5, i64 1
br i1 %7, label %9, label %4
9: ; preds = %4
%10 = getelementptr inbounds i8, i8* %5, i64 -1
%11 = icmp ugt i8* %10, %3
br i1 %11, label %12, label %58
12: ; preds = %9
%13 = icmp sgt i32 %1, 3
%14 = getelementptr inbounds i8*, i8** %0, i64 2
%15 = add nsw i32 %1, -2
%16 = zext i32 %1 to i64
br label %17
17: ; preds = %12, %54
%18 = phi i8* [ %10, %12 ], [ %56, %54 ]
%19 = phi i8* [ %5, %12 ], [ %55, %54 ]
%20 = getelementptr inbounds i8, i8* %19, i64 -2
%21 = load i8, i8* %20
%22 = icmp eq i8 %21, 36
%23 = load i8, i8* %18
%24 = sext i8 %23 to i32
br i1 %22, label %27, label %25
25: ; preds = %17
%26 = tail call i32 (i32, ...) bitcast (i32 (...)* @putback to i32 (i32, ...)*)(i32 %24)
br label %54
27: ; preds = %17
switch i32 %24, label %51 [
i32 35, label %29
i32 48, label %31
i32 49, label %31
i32 50, label %31
i32 51, label %31
i32 52, label %31
i32 53, label %31
i32 54, label %31
i32 55, label %31
i32 56, label %31
i32 57, label %31
i32 42, label %28
]
28: ; preds = %27
br i1 %13, label %39, label %48
29: ; preds = %27
%30 = tail call i32 (i32, ...) bitcast (i32 (...)* @pbnum to i32 (i32, ...)*)(i32 %15)
br label %54
31: ; preds = %27, %27, %27, %27, %27, %27, %27, %27, %27, %27
%32 = add nsw i32 %24, -47
%33 = icmp slt i32 %32, %1
br i1 %33, label %34, label %54
34: ; preds = %31
%35 = zext i32 %32 to i64
%36 = getelementptr inbounds i8*, i8** %0, i64 %35
%37 = load i8*, i8** %36
%38 = tail call i32 (i8*, ...) bitcast (i32 (...)* @pbstr to i32 (i8*, ...)*)(i8* %37)
br label %54
39: ; preds = %28, %39
%40 = phi i64 [ %41, %39 ], [ %16, %28 ]
%41 = add nsw i64 %40, -1
%42 = and i64 %41, 4294967295
%43 = getelementptr inbounds i8*, i8** %0, i64 %42
%44 = load i8*, i8** %43
%45 = tail call i32 (i8*, ...) bitcast (i32 (...)* @pbstr to i32 (i8*, ...)*)(i8* %44)
%46 = tail call i32 (i32, ...) bitcast (i32 (...)* @putback to i32 (i32, ...)*)(i32 44)
%47 = icmp sgt i64 %40, 4
br i1 %47, label %39, label %48
48: ; preds = %39, %28
%49 = load i8*, i8** %14
%50 = tail call i32 (i8*, ...) bitcast (i32 (...)* @pbstr to i32 (i8*, ...)*)(i8* %49)
br label %54
51: ; preds = %27
%52 = tail call i32 (i32, ...) bitcast (i32 (...)* @putback to i32 (i32, ...)*)(i32 %24)
%53 = tail call i32 (i32, ...) bitcast (i32 (...)* @putback to i32 (i32, ...)*)(i32 36)
br label %54
54: ; preds = %29, %48, %51, %34, %31, %25
%55 = phi i8* [ %18, %25 ], [ %20, %31 ], [ %20, %34 ], [ %20, %51 ], [ %20, %48 ], [ %20, %29 ]
%56 = getelementptr inbounds i8, i8* %55, i64 -1
%57 = icmp ugt i8* %56, %3
br i1 %57, label %17, label %58
58: ; preds = %54, %9
%59 = phi i8* [ %10, %9 ], [ %56, %54 ]
%60 = icmp eq i8* %59, %3
br i1 %60, label %61, label %65
61: ; preds = %58
%62 = load i8, i8* %3
%63 = sext i8 %62 to i32
%64 = tail call i32 (i32, ...) bitcast (i32 (...)* @putback to i32 (i32, ...)*)(i32 %63)
br label %65
65: ; preds = %61, %58
ret void
}