int int_to_ext(line, nbytes)
char *line;
int nbytes;
{
  register char *fm, *to;
  register unsigned cc;
  int lnb;
  int cn;
  int i, j;
  line[nbytes] = '\n';
  fm = to = line;
  cn = -1;
  lnb = 0;
  while ((cc = *fm++) != '\n') {
    cn++;
    if (cc != ' ') {
      while (++lnb <= cn)
        *to++ = ' ';
      if (cc == 7) {
        if (*fm >= '@' || (unsigned)*fm > 0200) {
          *to++ = *fm++ & 037;
          continue;
        }
        if (*fm == '#') {
          *to++ = '\177';
          fm++;
          continue;
        }
        i = 0;
        j = 0;
        while (j++ < 3 && (*fm >= '0' && *fm <= '7'))
          i = (i << 3) + (*fm++ - '0');
        *to++ = i & 0377;
        continue;
      }
      *to++ = cc;
    }
  }
  *to++ = '\n';
  return (to - line);
}


x86 assembly (clang, -O0):
<int_to_ext>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    -0x8(%rbp),%rax
movslq -0xc(%rbp),%rcx
movb   $0xa,(%rax,%rcx,1)
mov    -0x8(%rbp),%rax
mov    %rax,-0x20(%rbp)
mov    %rax,-0x18(%rbp)
movl   $0xffffffff,-0x2c(%rbp)
movl   $0x0,-0x28(%rbp)
mov    -0x18(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x18(%rbp)
movsbl (%rax),%eax
mov    %eax,-0x24(%rbp)
cmp    $0xa,%eax
je     12de <int_to_ext+0x1de>
mov    -0x2c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x2c(%rbp)
cmpl   $0x20,-0x24(%rbp)
je     12d9 <int_to_ext+0x1d9>
jmp    1167 <int_to_ext+0x67>
mov    -0x28(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x28(%rbp)
cmp    -0x2c(%rbp),%eax
jg     1190 <int_to_ext+0x90>
mov    -0x20(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x20(%rbp)
movb   $0x20,(%rax)
jmp    1167 <int_to_ext+0x67>
cmpl   $0x7,-0x24(%rbp)
jne    12c3 <int_to_ext+0x1c3>
mov    -0x18(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x40,%eax
jge    11bc <int_to_ext+0xbc>
mov    -0x18(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x80,%eax
jbe    11e9 <int_to_ext+0xe9>
mov    -0x18(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x18(%rbp)
movsbl (%rax),%eax
and    $0x1f,%eax
mov    %al,%cl
mov    -0x20(%rbp),%rax
mov    %rax,%rdx
add    $0x1,%rdx
mov    %rdx,-0x20(%rbp)
mov    %cl,(%rax)
jmp    1131 <int_to_ext+0x31>
mov    -0x18(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x23,%eax
jne    121c <int_to_ext+0x11c>
mov    -0x20(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x20(%rbp)
movb   $0x7f,(%rax)
mov    -0x18(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x18(%rbp)
jmp    1131 <int_to_ext+0x31>
movl   $0x0,-0x30(%rbp)
movl   $0x0,-0x34(%rbp)
mov    -0x34(%rbp),%ecx
mov    %ecx,%eax
add    $0x1,%eax
mov    %eax,-0x34(%rbp)
xor    %eax,%eax
cmp    $0x3,%ecx
mov    %al,-0x35(%rbp)
jge    126e <int_to_ext+0x16e>
mov    -0x18(%rbp),%rax
movsbl (%rax),%ecx
xor    %eax,%eax
cmp    $0x30,%ecx
mov    %al,-0x36(%rbp)
jl     1268 <int_to_ext+0x168>
mov    -0x18(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x37,%eax
setle  %al
mov    %al,-0x36(%rbp)
mov    -0x36(%rbp),%al
mov    %al,-0x35(%rbp)
mov    -0x35(%rbp),%al
test   $0x1,%al
jne    127e <int_to_ext+0x17e>
jmp    12a3 <int_to_ext+0x1a3>
mov    -0x30(%rbp),%eax
shl    $0x3,%eax
mov    -0x18(%rbp),%rcx
mov    %rcx,%rdx
add    $0x1,%rdx
mov    %rdx,-0x18(%rbp)
movsbl (%rcx),%ecx
sub    $0x30,%ecx
add    %ecx,%eax
mov    %eax,-0x30(%rbp)
jmp    122a <int_to_ext+0x12a>
mov    -0x30(%rbp),%eax
and    $0xff,%eax
mov    %al,%cl
mov    -0x20(%rbp),%rax
mov    %rax,%rdx
add    $0x1,%rdx
mov    %rdx,-0x20(%rbp)
mov    %cl,(%rax)
jmp    1131 <int_to_ext+0x31>
mov    -0x24(%rbp),%eax
mov    %al,%cl
mov    -0x20(%rbp),%rax
mov    %rax,%rdx
add    $0x1,%rdx
mov    %rdx,-0x20(%rbp)
mov    %cl,(%rax)
jmp    1131 <int_to_ext+0x31>
mov    -0x20(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x20(%rbp)
movb   $0xa,(%rax)
mov    -0x20(%rbp),%rax
mov    -0x8(%rbp),%rcx
sub    %rcx,%rax
pop    %rbp
ret

x86 assembly (clang, -O2):
<int_to_ext>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x18,%rsp
mov    %rdi,%r12
movslq %esi,%rax
movb   $0xa,(%rdi,%rax,1)
mov    (%rdi),%r14b
mov    %rdi,%rax
mov    %rdi,0x10(%rsp)
cmp    $0xa,%r14b
jne    1159 <int_to_ext+0x49>
movb   $0xa,(%r12)
sub    0x10(%rsp),%r12d
add    $0x1,%r12d
mov    %r12d,%eax
add    $0x18,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret
xor    %ebx,%ebx
xor    %r15d,%r15d
mov    0x10(%rsp),%r12
mov    %r12,%rbp
jmp    1187 <int_to_ext+0x77>
nopl   0x0(%rax,%rax,1)
mov    %r15d,%esi
movzbl 0x0(%r13),%r14d
add    $0x1,%ebx
mov    %esi,%r15d
mov    %r13,%rbp
cmp    $0xa,%r14b
je     1139 <int_to_ext+0x29>
lea    0x1(%rbp),%r13
cmp    $0x20,%r14b
je     1170 <int_to_ext+0x60>
lea    -0x1(%rbx),%eax
lea    0x1(%r15),%esi
cmp    %eax,%r15d
jg     11cb <int_to_ext+0xbb>
cmp    %esi,%ebx
cmovg  %ebx,%esi
mov    %esi,0xc(%rsp)
not    %r15d
add    %esi,%r15d
lea    0x1(%r15),%rdx
mov    %r12,%rdi
mov    $0x20,%esi
call   1030 <memset@plt>
mov    0xc(%rsp),%esi
add    %r15,%r12
add    $0x1,%r12
add    $0x1,%esi
cmp    $0x7,%r14b
jne    11f0 <int_to_ext+0xe0>
movzbl 0x0(%r13),%eax
cmp    $0x40,%eax
jb     11fd <int_to_ext+0xed>
add    $0x2,%rbp
and    $0x1f,%al
mov    %al,(%r12)
add    $0x1,%r12
jmp    120e <int_to_ext+0xfe>
nopl   0x0(%rax,%rax,1)
mov    %r14b,(%r12)
add    $0x1,%r12
jmp    1173 <int_to_ext+0x63>
cmp    $0x23,%al
jne    1216 <int_to_ext+0x106>
movb   $0x7f,(%r12)
add    $0x1,%r12
add    $0x2,%rbp
mov    %rbp,%r13
jmp    1173 <int_to_ext+0x63>
mov    %eax,%edx
and    $0xf8,%dl
xor    %ecx,%ecx
cmp    $0x30,%dl
jne    1265 <int_to_ext+0x155>
add    $0xffffffd0,%eax
movzbl 0x2(%rbp),%ecx
mov    %ecx,%edx
and    $0xf8,%dl
cmp    $0x30,%dl
jne    1253 <int_to_ext+0x143>
lea    (%rcx,%rax,8),%ecx
add    $0xffffffd0,%ecx
movzbl 0x3(%rbp),%eax
mov    %eax,%edx
and    $0xf8,%dl
cmp    $0x30,%dl
jne    125e <int_to_ext+0x14e>
add    $0x4,%rbp
lea    (%rax,%rcx,8),%ecx
add    $0xffffffd0,%ecx
jmp    1262 <int_to_ext+0x152>
add    $0x2,%rbp
mov    %rbp,%r13
mov    %eax,%ecx
jmp    1265 <int_to_ext+0x155>
add    $0x3,%rbp
mov    %rbp,%r13
mov    %cl,(%r12)
add    $0x1,%r12
jmp    1173 <int_to_ext+0x63>

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

LLVM IR (-O2):
define i32 @int_to_ext(i8* %0, i32 %1) {
%3 = sext i32 %1 to i64
%4 = getelementptr inbounds i8, i8* %0, i64 %3
store i8 10, i8* %4
%5 = load i8, i8* %0
%6 = icmp eq i8 %5, 10
br i1 %6, label %84, label %7
7: ; preds = %2, %40
%8 = phi i32 [ %46, %40 ], [ 0, %2 ]
%9 = phi i8 [ %44, %40 ], [ %5, %2 ]
%10 = phi i32 [ %15, %40 ], [ -1, %2 ]
%11 = phi i32 [ %43, %40 ], [ 0, %2 ]
%12 = phi i8* [ %42, %40 ], [ %0, %2 ]
%13 = phi i8* [ %41, %40 ], [ %0, %2 ]
%14 = getelementptr inbounds i8, i8* %12, i64 1
%15 = add nsw i32 %10, 1
%16 = icmp eq i8 %9, 32
br i1 %16, label %40, label %17
17: ; preds = %7
%18 = add i32 %11, 1
%19 = icmp sgt i32 %11, %10
br i1 %19, label %29, label %20
20: ; preds = %17
%21 = call i32 @llvm.smax.i32(i32 %8, i32 %18)
%22 = xor i32 %11, -1
%23 = add i32 %21, %22
%24 = zext i32 %23 to i64
%25 = add nuw nsw i64 %24, 1
%26 = getelementptr i8, i8* %13, i64 1
%27 = getelementptr i8, i8* %26, i64 %24
%28 = add nuw i32 %21, 1
br label %29
29: ; preds = %20, %17
%30 = phi i8* [ %13, %17 ], [ %27, %20 ]
%31 = phi i32 [ %18, %17 ], [ %28, %20 ]
%32 = icmp eq i8 %9, 7
br i1 %32, label %33, label %82
33: ; preds = %29
%34 = load i8, i8* %14
%35 = icmp ugt i8 %34, 63
br i1 %35, label %36, label %47
36: ; preds = %33
%37 = getelementptr inbounds i8, i8* %12, i64 2
%38 = and i8 %34, 31
%39 = getelementptr inbounds i8, i8* %30, i64 1
store i8 %38, i8* %30
br label %40
40: ; preds = %7, %82, %36, %53, %77
%41 = phi i8* [ %39, %36 ], [ %54, %53 ], [ %81, %77 ], [ %83, %82 ], [ %13, %7 ]
%42 = phi i8* [ %37, %36 ], [ %55, %53 ], [ %78, %77 ], [ %14, %82 ], [ %14, %7 ]
%43 = phi i32 [ %31, %36 ], [ %31, %53 ], [ %31, %77 ], [ %31, %82 ], [ %11, %7 ]
%44 = load i8, i8* %42
%45 = icmp eq i8 %44, 10
%46 = add nuw i32 %8, 1
br i1 %45, label %84, label %7
47: ; preds = %33
%48 = icmp eq i8 %34, 35
br i1 %48, label %53, label %49
49: ; preds = %47
%50 = getelementptr i8, i8* %12, i64 4
%51 = and i8 %34, -8
%52 = icmp eq i8 %51, 48
br i1 %52, label %56, label %77
53: ; preds = %47
%54 = getelementptr inbounds i8, i8* %30, i64 1
store i8 127, i8* %30
%55 = getelementptr inbounds i8, i8* %12, i64 2
br label %40
56: ; preds = %49
%57 = zext i8 %34 to i32
%58 = getelementptr inbounds i8, i8* %12, i64 2
%59 = add nsw i32 %57, -48
%60 = load i8, i8* %58
%61 = and i8 %60, -8
%62 = icmp eq i8 %61, 48
br i1 %62, label %63, label %77
63: ; preds = %56
%64 = zext i8 %60 to i32
%65 = shl nuw nsw i32 %59, 3
%66 = getelementptr inbounds i8, i8* %12, i64 3
%67 = add nsw i32 %65, -48
%68 = add nsw i32 %67, %64
%69 = load i8, i8* %66
%70 = and i8 %69, -8
%71 = icmp eq i8 %70, 48
br i1 %71, label %72, label %77
72: ; preds = %63
%73 = zext i8 %69 to i32
%74 = shl nuw nsw i32 %68, 3
%75 = add nsw i32 %74, -48
%76 = add nsw i32 %75, %73
br label %77
77: ; preds = %72, %63, %56, %49
%78 = phi i8* [ %14, %49 ], [ %58, %56 ], [ %66, %63 ], [ %50, %72 ]
%79 = phi i32 [ 0, %49 ], [ %59, %56 ], [ %68, %63 ], [ %76, %72 ]
%80 = trunc i32 %79 to i8
%81 = getelementptr inbounds i8, i8* %30, i64 1
store i8 %80, i8* %30
br label %40
82: ; preds = %29
%83 = getelementptr inbounds i8, i8* %30, i64 1
store i8 %9, i8* %30
br label %40
84: ; preds = %40, %2
%85 = phi i8* [ %0, %2 ], [ %41, %40 ]
%86 = getelementptr inbounds i8, i8* %85, i64 1
store i8 10, i8* %85
%87 = ptrtoint i8* %86 to i64
%88 = ptrtoint i8* %0 to i64
%89 = sub i64 %87, %88
%90 = trunc i64 %89 to i32
ret i32 %90
}