void toe24(x, y) unsigned short *x, *y;
{
  unsigned short i;
  unsigned short *p;
  if (eiisnan(x)) {
    enan(y, 24);
    return;
  }
  p = &x[0];
  y += 1;
  *y = 0;
  if (*p++)
    *y = 0x8000;
  i = *p++;
  if (i >= 255) {
    *y |= (unsigned short)0x7f80;
    *(--y) = 0;
    return;
  }
  if (i == 0) {
    (void)eshift(x, 7);
  } else {
    i <<= 7;
    (void)eshift(x, 8);
  }
  i |= *p++ & (unsigned short)0x7f;
  *y |= i;
  *(--y) = *p;
}


x86 assembly (clang, -O0):
<toe24>:
push   %rbp
mov    %rsp,%rbp
sub    $0x20,%rsp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    -0x8(%rbp),%rdi
mov    $0x0,%al
call   1050 <eiisnan@plt>
cmp    $0x0,%eax
je     1169 <toe24+0x39>
mov    -0x10(%rbp),%rdi
mov    $0x18,%esi
mov    $0x0,%al
call   1040 <enan@plt>
jmp    127d <toe24+0x14d>
mov    -0x8(%rbp),%rax
mov    %rax,-0x20(%rbp)
mov    -0x10(%rbp),%rax
add    $0x2,%rax
mov    %rax,-0x10(%rbp)
mov    -0x10(%rbp),%rax
movw   $0x0,(%rax)
mov    -0x20(%rbp),%rax
mov    %rax,%rcx
add    $0x2,%rcx
mov    %rcx,-0x20(%rbp)
cmpw   $0x0,(%rax)
je     11a8 <toe24+0x78>
mov    -0x10(%rbp),%rax
movw   $0x8000,(%rax)
mov    -0x20(%rbp),%rax
mov    %rax,%rcx
add    $0x2,%rcx
mov    %rcx,-0x20(%rbp)
mov    (%rax),%ax
mov    %ax,-0x12(%rbp)
movzwl -0x12(%rbp),%eax
cmp    $0xff,%eax
jl     11f7 <toe24+0xc7>
mov    -0x10(%rbp),%rax
movzwl (%rax),%ecx
or     $0x7f80,%ecx
mov    %cx,(%rax)
mov    -0x10(%rbp),%rax
mov    %rax,%rcx
add    $0xfffffffffffffffe,%rcx
mov    %rcx,-0x10(%rbp)
movw   $0x0,-0x2(%rax)
jmp    127d <toe24+0x14d>
movzwl -0x12(%rbp),%eax
cmp    $0x0,%eax
jne    1219 <toe24+0xe9>
mov    -0x8(%rbp),%rdi
mov    $0x7,%esi
mov    $0x0,%al
call   1030 <eshift@plt>
jmp    1234 <toe24+0x104>
movzwl -0x12(%rbp),%eax
shl    $0x7,%eax
mov    %ax,-0x12(%rbp)
mov    -0x8(%rbp),%rdi
mov    $0x8,%esi
mov    $0x0,%al
call   1030 <eshift@plt>
mov    -0x20(%rbp),%rax
mov    %rax,%rcx
add    $0x2,%rcx
mov    %rcx,-0x20(%rbp)
movzwl (%rax),%ecx
and    $0x7f,%ecx
movzwl -0x12(%rbp),%eax
or     %ecx,%eax
mov    %ax,-0x12(%rbp)
movzwl -0x12(%rbp),%edx
mov    -0x10(%rbp),%rax
movzwl (%rax),%ecx
or     %edx,%ecx
mov    %cx,(%rax)
mov    -0x20(%rbp),%rax
mov    (%rax),%cx
mov    -0x10(%rbp),%rax
mov    %rax,%rdx
add    $0xfffffffffffffffe,%rdx
mov    %rdx,-0x10(%rbp)
mov    %cx,-0x2(%rax)
add    $0x20,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<toe24>:
push   %rbp
push   %r14
push   %rbx
mov    %rsi,%r14
mov    %rdi,%rbx
xor    %eax,%eax
call   1050 <eiisnan@plt>
test   %eax,%eax
je     1158 <toe24+0x28>
mov    %r14,%rdi
mov    $0x18,%esi
xor    %eax,%eax
pop    %rbx
pop    %r14
pop    %rbp
jmp    1040 <enan@plt>
movw   $0x0,0x2(%r14)
xor    %eax,%eax
cmpw   $0x0,(%rbx)
setne  %al
shl    $0xf,%eax
mov    %ax,0x2(%r14)
movzwl 0x2(%rbx),%ecx
cmp    $0xff,%ecx
jb     118e <toe24+0x5e>
or     $0x7f80,%eax
mov    %ax,0x2(%r14)
movw   $0x0,(%r14)
jmp    11bf <toe24+0x8f>
mov    %ecx,%ebp
shl    $0x7,%ebp
cmp    $0x1,%cx
mov    $0x8,%esi
sbb    $0x0,%esi
mov    %rbx,%rdi
xor    %eax,%eax
call   1030 <eshift@plt>
movzwl 0x4(%rbx),%eax
and    $0x7f,%eax
or     %ebp,%eax
or     %ax,0x2(%r14)
movzwl 0x6(%rbx),%eax
mov    %ax,(%r14)
pop    %rbx
pop    %r14
pop    %rbp
ret

LLVM IR (-O0):
define void @toe24(i16* %0, i16* %1) {
%3 = alloca i16*
%4 = alloca i16*
%5 = alloca i16
%6 = alloca i16*
store i16* %0, i16** %3
store i16* %1, i16** %4
%7 = load i16*, i16** %3
%8 = call i32 (i16*, ...) bitcast (i32 (...)* @eiisnan to i32 (i16*, ...)*)(i16* %7)
%9 = icmp ne i32 %8, 0
br i1 %9, label %10, label %13
10: ; preds = %2
%11 = load i16*, i16** %4
%12 = call i32 (i16*, i32, ...) bitcast (i32 (...)* @enan to i32 (i16*, i32, ...)*)(i16* %11, i32 24)
br label %75
13: ; preds = %2
%14 = load i16*, i16** %3
%15 = getelementptr inbounds i16, i16* %14, i64 0
store i16* %15, i16** %6
%16 = load i16*, i16** %4
%17 = getelementptr inbounds i16, i16* %16, i64 1
store i16* %17, i16** %4
%18 = load i16*, i16** %4
store i16 0, i16* %18
%19 = load i16*, i16** %6
%20 = getelementptr inbounds i16, i16* %19, i32 1
store i16* %20, i16** %6
%21 = load i16, i16* %19
%22 = icmp ne i16 %21, 0
br i1 %22, label %23, label %25
23: ; preds = %13
%24 = load i16*, i16** %4
store i16 -32768, i16* %24
br label %25
25: ; preds = %23, %13
%26 = load i16*, i16** %6
%27 = getelementptr inbounds i16, i16* %26, i32 1
store i16* %27, i16** %6
%28 = load i16, i16* %26
store i16 %28, i16* %5
%29 = load i16, i16* %5
%30 = zext i16 %29 to i32
%31 = icmp sge i32 %30, 255
br i1 %31, label %32, label %40
32: ; preds = %25
%33 = load i16*, i16** %4
%34 = load i16, i16* %33
%35 = zext i16 %34 to i32
%36 = or i32 %35, 32640
%37 = trunc i32 %36 to i16
store i16 %37, i16* %33
%38 = load i16*, i16** %4
%39 = getelementptr inbounds i16, i16* %38, i32 -1
store i16* %39, i16** %4
store i16 0, i16* %39
br label %75
40: ; preds = %25
%41 = load i16, i16* %5
%42 = zext i16 %41 to i32
%43 = icmp eq i32 %42, 0
br i1 %43, label %44, label %47
44: ; preds = %40
%45 = load i16*, i16** %3
%46 = call i32 (i16*, i32, ...) bitcast (i32 (...)* @eshift to i32 (i16*, i32, ...)*)(i16* %45, i32 7)
br label %54
47: ; preds = %40
%48 = load i16, i16* %5
%49 = zext i16 %48 to i32
%50 = shl i32 %49, 7
%51 = trunc i32 %50 to i16
store i16 %51, i16* %5
%52 = load i16*, i16** %3
%53 = call i32 (i16*, i32, ...) bitcast (i32 (...)* @eshift to i32 (i16*, i32, ...)*)(i16* %52, i32 8)
br label %54
54: ; preds = %47, %44
%55 = load i16*, i16** %6
%56 = getelementptr inbounds i16, i16* %55, i32 1
store i16* %56, i16** %6
%57 = load i16, i16* %55
%58 = zext i16 %57 to i32
%59 = and i32 %58, 127
%60 = load i16, i16* %5
%61 = zext i16 %60 to i32
%62 = or i32 %61, %59
%63 = trunc i32 %62 to i16
store i16 %63, i16* %5
%64 = load i16, i16* %5
%65 = zext i16 %64 to i32
%66 = load i16*, i16** %4
%67 = load i16, i16* %66
%68 = zext i16 %67 to i32
%69 = or i32 %68, %65
%70 = trunc i32 %69 to i16
store i16 %70, i16* %66
%71 = load i16*, i16** %6
%72 = load i16, i16* %71
%73 = load i16*, i16** %4
%74 = getelementptr inbounds i16, i16* %73, i32 -1
store i16* %74, i16** %4
store i16 %72, i16* %74
br label %75
75: ; preds = %54, %32, %10
ret void
}

LLVM IR (-O2):
define void @toe24(i16* %0, i16* %1) {
%3 = tail call i32 (i16*, ...) bitcast (i32 (...)* @eiisnan to i32 (i16*, ...)*)(i16* %0)
%4 = icmp eq i32 %3, 0
br i1 %4, label %7, label %5
5: ; preds = %2
%6 = tail call i32 (i16*, i32, ...) bitcast (i32 (...)* @enan to i32 (i16*, i32, ...)*)(i16* %1, i32 24)
br label %30
7: ; preds = %2
%8 = getelementptr inbounds i16, i16* %1, i64 1
store i16 0, i16* %8
%9 = getelementptr inbounds i16, i16* %0, i64 1
%10 = load i16, i16* %0
%11 = icmp eq i16 %10, 0
%12 = select i1 %11, i16 0, i16 -32768
store i16 %12, i16* %8
%13 = load i16, i16* %9
%14 = icmp ugt i16 %13, 254
br i1 %14, label %15, label %17
15: ; preds = %7
%16 = or i16 %12, 32640
store i16 %16, i16* %8
store i16 0, i16* %1
br label %30
17: ; preds = %7
%18 = getelementptr inbounds i16, i16* %0, i64 2
%19 = icmp eq i16 %13, 0
%20 = shl i16 %13, 7
%21 = select i1 %19, i32 7, i32 8
%22 = tail call i32 (i16*, i32, ...) bitcast (i32 (...)* @eshift to i32 (i16*, i32, ...)*)(i16* %0, i32 %21)
%23 = getelementptr inbounds i16, i16* %0, i64 3
%24 = load i16, i16* %18
%25 = and i16 %24, 127
%26 = or i16 %25, %20
%27 = load i16, i16* %8
%28 = or i16 %26, %27
store i16 %28, i16* %8
%29 = load i16, i16* %23
store i16 %29, i16* %1
br label %30
30: ; preds = %17, %15, %5
ret void
}