void ctodpf(in, out, n) unsigned char in[], out[];
int *n;
{
  register int i, j, joff;
  unsigned char *p, sign, *manp[6];
  long exp;
  static unsigned char maxman = 0xff, minman = 0;
  for (i = 0; i < *n; i++) {
    p = in + i * 8;
    joff = i * 8;
    sign = *(p)&0200;
    manp[0] = p + 2;
    manp[1] = p + 3;
    manp[2] = p + 4;
    manp[3] = p + 5;
    manp[4] = p + 6;
    manp[5] = p + 7;
    exp = (*(p + 1)) | ((*p & 0x7f) << 8);
    if (exp != 0)
      exp = exp - 040000 + 1022;
    if (exp > 2046) {
      exp = 2046;
      for (j = 0; j < 6; j++)
        manp[j] = &maxman;
    } else if (exp <= 0) {
      exp = 0;
      for (j = 0; j < 6; j++)
        manp[j] = &minman;
    }
    out[joff + 0] = sign | (exp >> 4);
    out[joff + 1] = ((exp & 0xf) << 4) | ((*manp[0] >> 3) & 0xf);
    out[joff + 2] = ((*manp[0] & 0x7) << 5) | ((*manp[1] & 0xf8) >> 3);
    out[joff + 3] = ((*manp[1] & 0x7) << 5) | ((*manp[2] & 0xf8) >> 3);
    out[joff + 4] = ((*manp[2] & 0x7) << 5) | ((*manp[3] & 0xf8) >> 3);
    out[joff + 5] = ((*manp[3] & 0x7) << 5) | ((*manp[4] & 0xf8) >> 3);
    out[joff + 6] = ((*manp[4] & 0x7) << 5) | ((*manp[5] & 0xf8) >> 3);
    out[joff + 7] = ((*manp[5] & 0x7) << 5);
  }
}


x86 assembly (clang, -O0):
<ctodpf>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
movl   $0x0,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
mov    -0x18(%rbp),%rcx
cmp    (%rcx),%eax
jge    13e0 <ctodpf+0x2e0>
mov    -0x8(%rbp),%rax
mov    -0x1c(%rbp),%ecx
shl    $0x3,%ecx
movslq %ecx,%rcx
add    %rcx,%rax
mov    %rax,-0x30(%rbp)
mov    -0x1c(%rbp),%eax
shl    $0x3,%eax
mov    %eax,-0x24(%rbp)
mov    -0x30(%rbp),%rax
movzbl (%rax),%eax
and    $0x80,%eax
mov    %al,-0x31(%rbp)
mov    -0x30(%rbp),%rax
add    $0x2,%rax
mov    %rax,-0x70(%rbp)
mov    -0x30(%rbp),%rax
add    $0x3,%rax
mov    %rax,-0x68(%rbp)
mov    -0x30(%rbp),%rax
add    $0x4,%rax
mov    %rax,-0x60(%rbp)
mov    -0x30(%rbp),%rax
add    $0x5,%rax
mov    %rax,-0x58(%rbp)
mov    -0x30(%rbp),%rax
add    $0x6,%rax
mov    %rax,-0x50(%rbp)
mov    -0x30(%rbp),%rax
add    $0x7,%rax
mov    %rax,-0x48(%rbp)
mov    -0x30(%rbp),%rax
movzbl 0x1(%rax),%eax
mov    -0x30(%rbp),%rcx
movzbl (%rcx),%ecx
and    $0x7f,%ecx
shl    $0x8,%ecx
or     %ecx,%eax
cltq
mov    %rax,-0x78(%rbp)
cmpq   $0x0,-0x78(%rbp)
je     11d6 <ctodpf+0xd6>
mov    -0x78(%rbp),%rax
sub    $0x4000,%rax
add    $0x3fe,%rax
mov    %rax,-0x78(%rbp)
cmpq   $0x7fe,-0x78(%rbp)
jle    1220 <ctodpf+0x120>
movq   $0x7fe,-0x78(%rbp)
movl   $0x0,-0x20(%rbp)
cmpl   $0x6,-0x20(%rbp)
jge    121b <ctodpf+0x11b>
movslq -0x20(%rbp),%rax
lea    0x2e18(%rip),%rcx
mov    %rcx,-0x70(%rbp,%rax,8)
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
jmp    11f3 <ctodpf+0xf3>
jmp    126c <ctodpf+0x16c>
cmpq   $0x0,-0x78(%rbp)
jg     1267 <ctodpf+0x167>
movq   $0x0,-0x78(%rbp)
movl   $0x0,-0x20(%rbp)
cmpl   $0x6,-0x20(%rbp)
jge    1262 <ctodpf+0x162>
movslq -0x20(%rbp),%rax
lea    0x2dd3(%rip),%rcx
mov    %rcx,-0x70(%rbp,%rax,8)
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
jmp    123a <ctodpf+0x13a>
jmp    1267 <ctodpf+0x167>
jmp    126c <ctodpf+0x16c>
movzbl -0x31(%rbp),%eax
mov    -0x78(%rbp),%rcx
sar    $0x4,%rcx
or     %rcx,%rax
mov    %al,%dl
mov    -0x10(%rbp),%rax
mov    -0x24(%rbp),%ecx
add    $0x0,%ecx
movslq %ecx,%rcx
mov    %dl,(%rax,%rcx,1)
mov    -0x78(%rbp),%rax
and    $0xf,%rax
shl    $0x4,%rax
mov    -0x70(%rbp),%rcx
movzbl (%rcx),%ecx
sar    $0x3,%ecx
and    $0xf,%ecx
movslq %ecx,%rcx
or     %rcx,%rax
mov    %al,%dl
mov    -0x10(%rbp),%rax
mov    -0x24(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
mov    %dl,(%rax,%rcx,1)
mov    -0x70(%rbp),%rax
movzbl (%rax),%eax
and    $0x7,%eax
shl    $0x5,%eax
mov    -0x68(%rbp),%rcx
movzbl (%rcx),%ecx
and    $0xf8,%ecx
sar    $0x3,%ecx
or     %ecx,%eax
mov    %al,%dl
mov    -0x10(%rbp),%rax
mov    -0x24(%rbp),%ecx
add    $0x2,%ecx
movslq %ecx,%rcx
mov    %dl,(%rax,%rcx,1)
mov    -0x68(%rbp),%rax
movzbl (%rax),%eax
and    $0x7,%eax
shl    $0x5,%eax
mov    -0x60(%rbp),%rcx
movzbl (%rcx),%ecx
and    $0xf8,%ecx
sar    $0x3,%ecx
or     %ecx,%eax
mov    %al,%dl
mov    -0x10(%rbp),%rax
mov    -0x24(%rbp),%ecx
add    $0x3,%ecx
movslq %ecx,%rcx
mov    %dl,(%rax,%rcx,1)
mov    -0x60(%rbp),%rax
movzbl (%rax),%eax
and    $0x7,%eax
shl    $0x5,%eax
mov    -0x58(%rbp),%rcx
movzbl (%rcx),%ecx
and    $0xf8,%ecx
sar    $0x3,%ecx
or     %ecx,%eax
mov    %al,%dl
mov    -0x10(%rbp),%rax
mov    -0x24(%rbp),%ecx
add    $0x4,%ecx
movslq %ecx,%rcx
mov    %dl,(%rax,%rcx,1)
mov    -0x58(%rbp),%rax
movzbl (%rax),%eax
and    $0x7,%eax
shl    $0x5,%eax
mov    -0x50(%rbp),%rcx
movzbl (%rcx),%ecx
and    $0xf8,%ecx
sar    $0x3,%ecx
or     %ecx,%eax
mov    %al,%dl
mov    -0x10(%rbp),%rax
mov    -0x24(%rbp),%ecx
add    $0x5,%ecx
movslq %ecx,%rcx
mov    %dl,(%rax,%rcx,1)
mov    -0x50(%rbp),%rax
movzbl (%rax),%eax
and    $0x7,%eax
shl    $0x5,%eax
mov    -0x48(%rbp),%rcx
movzbl (%rcx),%ecx
and    $0xf8,%ecx
sar    $0x3,%ecx
or     %ecx,%eax
mov    %al,%dl
mov    -0x10(%rbp),%rax
mov    -0x24(%rbp),%ecx
add    $0x6,%ecx
movslq %ecx,%rcx
mov    %dl,(%rax,%rcx,1)
mov    -0x48(%rbp),%rax
movzbl (%rax),%eax
and    $0x7,%eax
shl    $0x5,%eax
mov    %al,%dl
mov    -0x10(%rbp),%rax
mov    -0x24(%rbp),%ecx
add    $0x7,%ecx
movslq %ecx,%rcx
mov    %dl,(%rax,%rcx,1)
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    1117 <ctodpf+0x17>
pop    %rbp
ret

x86 assembly (clang, -O2):
<ctodpf>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
mov    %rdx,-0x8(%rsp)
cmpl   $0x0,(%rdx)
jle    1273 <ctodpf+0x173>
xor    %eax,%eax
xor    %r12d,%r12d
jmp    11e9 <ctodpf+0xe9>
lea    0xed8(%rip),%rcx
mov    %rcx,%r10
mov    %rcx,%r11
mov    %rcx,%r14
mov    %rcx,%r15
mov    %rcx,%r13
xor    %ebx,%ebx
nopw   0x0(%rax,%rax,1)
mov    %rbx,%rbp
shr    $0x4,%rbp
or     %bpl,%r9b
mov    %r9b,(%rsi,%rax,1)
movzbl (%rcx),%edx
shr    $0x3,%dl
and    $0xf,%dl
shl    $0x4,%bl
or     %dl,%bl
mov    %bl,0x1(%rsi,%rax,1)
movzbl (%rcx),%ecx
movzbl 0x0(%r13),%edx
shr    $0x3,%dl
shl    $0x5,%cl
or     %dl,%cl
mov    %cl,0x2(%rsi,%rax,1)
movzbl 0x0(%r13),%ecx
movzbl (%r15),%edx
shr    $0x3,%dl
shl    $0x5,%cl
or     %dl,%cl
mov    %cl,0x3(%rsi,%rax,1)
movzbl (%r15),%ecx
movzbl (%r14),%edx
shr    $0x3,%dl
shl    $0x5,%cl
or     %dl,%cl
mov    %cl,0x4(%rsi,%rax,1)
movzbl (%r14),%ecx
movzbl (%r11),%edx
shr    $0x3,%dl
shl    $0x5,%cl
or     %dl,%cl
mov    %cl,0x5(%rsi,%rax,1)
movzbl (%r11),%ecx
movzbl (%r10),%edx
shr    $0x3,%dl
shl    $0x5,%cl
or     %dl,%cl
mov    %cl,0x6(%rsi,%rax,1)
movzbl (%r10),%ecx
shl    $0x5,%cl
mov    %cl,0x7(%rsi,%rax,1)
add    $0x1,%r12
mov    -0x8(%rsp),%rcx
movslq (%rcx),%rcx
add    $0x8,%rax
cmp    %rcx,%r12
jge    1273 <ctodpf+0x173>
movzbl (%rdi,%rax,1),%ecx
mov    %ecx,%r9d
and    $0x80,%r9b
movzbl 0x1(%rdi,%rax,1),%ebp
and    $0x7f,%ecx
shl    $0x8,%rcx
lea    (%rcx,%rbp,1),%rbx
test   %rbx,%rbx
lea    -0x3c02(%rcx,%rbp,1),%r8
ff
cmove  %rbx,%r8
mov    $0x7fe,%ebx
lea    0xde1(%rip),%rcx
mov    %rcx,%r10
mov    %rcx,%r11
mov    %rcx,%r14
mov    %rcx,%r15
mov    %rcx,%r13
cmp    $0x7fe,%r8
jg     1140 <ctodpf+0x40>
test   %r8,%r8
jle    1122 <ctodpf+0x22>
lea    (%rdi,%rax,1),%r10
add    $0x7,%r10
lea    0x6(%rdi,%rax,1),%r11
lea    0x5(%rdi,%rax,1),%r14
lea    0x4(%rdi,%rax,1),%r15
lea    (%rdi,%rax,1),%r13
add    $0x3,%r13
lea    (%rdi,%rax,1),%rcx
add    $0x2,%rcx
mov    %r8,%rbx
jmp    1140 <ctodpf+0x40>
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

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

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