void move_l(unsigned long *p, unsigned short *o) {
  *p = (((*p) >> 9) & 070000) | (((*p) >> 12) & 07) | (((*p) << 9) & 07000) |
       (((*p) << 12) & 070000000) | ((*p) & 07700770);
  *o = (((((*o) >> 6) & 0x300) + 0x200) % 0x300) |
       (((((*o) >> 8) & 0x3) + 0x1) % 0x3) |
       (((((*o) << 6) & 0xc0) + 0x80) % 0xc0) |
       (((((*o) << 8) & 0xc000) + 0x4000) % 0xc000) | ((*o) & 0x3c3c);
}


x86 assembly (clang, -O0):
<move_l>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    -0x8(%rbp),%rax
mov    (%rax),%rcx
shr    $0x9,%rcx
and    $0x7000,%rcx
mov    -0x8(%rbp),%rax
mov    (%rax),%rax
shr    $0xc,%rax
and    $0x7,%rax
or     %rax,%rcx
mov    -0x8(%rbp),%rax
mov    (%rax),%rax
shl    $0x9,%rax
and    $0xe00,%rax
or     %rax,%rcx
mov    -0x8(%rbp),%rax
mov    (%rax),%rax
shl    $0xc,%rax
and    $0xe00000,%rax
or     %rax,%rcx
mov    -0x8(%rbp),%rax
mov    (%rax),%rax
and    $0x1f81f8,%rax
or     %rax,%rcx
mov    -0x8(%rbp),%rax
mov    %rcx,(%rax)
mov    -0x10(%rbp),%rax
movzwl (%rax),%eax
sar    $0x6,%eax
and    $0x300,%eax
add    $0x200,%eax
mov    $0x300,%ecx
cltd
idiv   %ecx
mov    %edx,-0x1c(%rbp)
mov    -0x10(%rbp),%rax
movzwl (%rax),%eax
sar    $0x8,%eax
and    $0x3,%eax
add    $0x1,%eax
mov    $0x3,%ecx
cltd
idiv   %ecx
mov    %edx,%eax
mov    -0x1c(%rbp),%edx
or     %eax,%edx
mov    %edx,-0x18(%rbp)
mov    -0x10(%rbp),%rax
movzwl (%rax),%eax
shl    $0x6,%eax
and    $0xc0,%eax
add    $0x80,%eax
mov    $0xc0,%ecx
cltd
idiv   %ecx
mov    -0x18(%rbp),%eax
or     %edx,%eax
mov    %eax,-0x14(%rbp)
mov    -0x10(%rbp),%rax
movzwl (%rax),%eax
shl    $0x8,%eax
and    $0xc000,%eax
add    $0x4000,%eax
mov    $0xc000,%ecx
cltd
idiv   %ecx
mov    -0x14(%rbp),%eax
or     %edx,%eax
mov    -0x10(%rbp),%rcx
movzwl (%rcx),%ecx
and    $0x3c3c,%ecx
or     %ecx,%eax
mov    %ax,%cx
mov    -0x10(%rbp),%rax
mov    %cx,(%rax)
pop    %rbp
ret

x86 assembly (clang, -O2):
<move_l>:
mov    (%rdi),%rax
mov    %rax,%r8
shr    $0x9,%r8
and    $0x7000,%r8d
mov    %eax,%r9d
shr    $0xc,%r9d
and    $0x7,%r9d
mov    %eax,%ecx
and    $0x7,%ecx
shl    $0x9,%rcx
mov    %eax,%edx
shl    $0xc,%edx
and    $0xe00000,%edx
and    $0x1f81f8,%eax
or     %r9,%rax
or     %r8,%rax
or     %rcx,%rax
or     %rdx,%rax
mov    %rax,(%rdi)
movzwl (%rsi),%eax
mov    %eax,%r9d
shr    $0x6,%r9d
and    $0x300,%r9d
add    $0x200,%r9d
imul   $0xaaab,%r9d,%edx
shr    $0x11,%edx
and    $0x300,%edx
lea    (%rdx,%rdx,2),%edx
sub    %edx,%r9d
mov    %eax,%edx
shr    $0x8,%edx
and    $0x3,%dl
add    $0x1,%dl
movzbl %dl,%edx
imul   $0xab,%edx,%edi
shr    $0x9,%edi
lea    (%rdi,%rdi,2),%edi
sub    %dil,%dl
movzbl %dl,%r8d
mov    %eax,%edi
shl    $0x6,%edi
movzbl %dil,%edi
sub    $0xffffff80,%edi
imul   $0xaaab,%edi,%edx
shr    $0x11,%edx
and    $0xffffffc0,%edx
lea    (%rdx,%rdx,2),%edx
sub    %edx,%edi
mov    %eax,%edx
shl    $0x8,%edx
and    $0xc000,%edx
add    $0x4000,%edx
mov    $0xaaaaaaab,%ecx
imul   %rdx,%rcx
shr    $0x2f,%rcx
shl    $0xe,%ecx
lea    (%rcx,%rcx,2),%ecx
sub    %ecx,%edx
or     %edi,%edx
and    $0x3c3c,%eax
or     %r9d,%eax
or     %edx,%eax
or     %r8d,%eax
mov    %ax,(%rsi)
ret

LLVM IR (-O0):
define void @move_l(i64* %0, i16* %1) {
%3 = alloca i64*
%4 = alloca i16*
store i64* %0, i64** %3
store i16* %1, i16** %4
%5 = load i64*, i64** %3
%6 = load i64, i64* %5
%7 = lshr i64 %6, 9
%8 = and i64 %7, 28672
%9 = load i64*, i64** %3
%10 = load i64, i64* %9
%11 = lshr i64 %10, 12
%12 = and i64 %11, 7
%13 = or i64 %8, %12
%14 = load i64*, i64** %3
%15 = load i64, i64* %14
%16 = shl i64 %15, 9
%17 = and i64 %16, 3584
%18 = or i64 %13, %17
%19 = load i64*, i64** %3
%20 = load i64, i64* %19
%21 = shl i64 %20, 12
%22 = and i64 %21, 14680064
%23 = or i64 %18, %22
%24 = load i64*, i64** %3
%25 = load i64, i64* %24
%26 = and i64 %25, 2064888
%27 = or i64 %23, %26
%28 = load i64*, i64** %3
store i64 %27, i64* %28
%29 = load i16*, i16** %4
%30 = load i16, i16* %29
%31 = zext i16 %30 to i32
%32 = ashr i32 %31, 6
%33 = and i32 %32, 768
%34 = add nsw i32 %33, 512
%35 = srem i32 %34, 768
%36 = load i16*, i16** %4
%37 = load i16, i16* %36
%38 = zext i16 %37 to i32
%39 = ashr i32 %38, 8
%40 = and i32 %39, 3
%41 = add nsw i32 %40, 1
%42 = srem i32 %41, 3
%43 = or i32 %35, %42
%44 = load i16*, i16** %4
%45 = load i16, i16* %44
%46 = zext i16 %45 to i32
%47 = shl i32 %46, 6
%48 = and i32 %47, 192
%49 = add nsw i32 %48, 128
%50 = srem i32 %49, 192
%51 = or i32 %43, %50
%52 = load i16*, i16** %4
%53 = load i16, i16* %52
%54 = zext i16 %53 to i32
%55 = shl i32 %54, 8
%56 = and i32 %55, 49152
%57 = add nsw i32 %56, 16384
%58 = srem i32 %57, 49152
%59 = or i32 %51, %58
%60 = load i16*, i16** %4
%61 = load i16, i16* %60
%62 = zext i16 %61 to i32
%63 = and i32 %62, 15420
%64 = or i32 %59, %63
%65 = trunc i32 %64 to i16
%66 = load i16*, i16** %4
store i16 %65, i16* %66
ret void
}

LLVM IR (-O2):
define void @move_l(i64* nocapture %0, i16* nocapture %1) {
%3 = load i64, i64* %0
%4 = lshr i64 %3, 9
%5 = and i64 %4, 28672
%6 = lshr i64 %3, 12
%7 = and i64 %6, 7
%8 = shl i64 %3, 9
%9 = and i64 %8, 3584
%10 = shl i64 %3, 12
%11 = and i64 %10, 14680064
%12 = and i64 %3, 2064888
%13 = or i64 %7, %12
%14 = or i64 %13, %5
%15 = or i64 %14, %9
%16 = or i64 %15, %11
store i64 %16, i64* %0
%17 = load i16, i16* %1
%18 = zext i16 %17 to i32
%19 = lshr i16 %17, 6
%20 = and i16 %19, 768
%21 = add nuw nsw i16 %20, 512
%22 = urem i16 %21, 768
%23 = zext i16 %22 to i32
%24 = lshr i16 %17, 8
%25 = trunc i16 %24 to i8
%26 = and i8 %25, 3
%27 = add nuw nsw i8 %26, 1
%28 = urem i8 %27, 3
%29 = zext i8 %28 to i32
%30 = shl i16 %17, 6
%31 = and i16 %30, 192
%32 = add nuw nsw i16 %31, 128
%33 = urem i16 %32, 192
%34 = zext i16 %33 to i32
%35 = shl nuw nsw i32 %18, 8
%36 = and i32 %35, 49152
%37 = add nuw nsw i32 %36, 16384
%38 = urem i32 %37, 49152
%39 = and i32 %18, 15420
%40 = or i32 %39, %23
%41 = or i32 %40, %34
%42 = or i32 %41, %38
%43 = or i32 %42, %29
%44 = trunc i32 %43 to i16
store i16 %44, i16* %1
ret void
}