long_mips2vms(oin, on) register long *oin;
int on;
{
  int i;
  register unsigned long n;
  register unsigned long nn;
  for (i = 0; i < on; i++, oin++) {
    nn = *oin;
    n = nn << 16 | nn >> 16;
    nn = ((n & 0x00ff00ff) << 8) | ((n & 0xff00ff00) >> 8);
    *oin = nn;
  }
}


x86 assembly (clang, -O0):
<long_mips2vms>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x10(%rbp)
mov    %esi,-0x14(%rbp)
movl   $0x0,-0x18(%rbp)
mov    -0x18(%rbp),%eax
cmp    -0x14(%rbp),%eax
jge    118c <long_mips2vms+0x8c>
mov    -0x10(%rbp),%rax
mov    (%rax),%rax
mov    %rax,-0x28(%rbp)
mov    -0x28(%rbp),%rax
shl    $0x10,%rax
mov    -0x28(%rbp),%rcx
shr    $0x10,%rcx
or     %rcx,%rax
mov    %rax,-0x20(%rbp)
mov    -0x20(%rbp),%rax
and    $0xff00ff,%rax
shl    $0x8,%rax
movabs $0xff00ff00,%rcx
and    -0x20(%rbp),%rcx
shr    $0x8,%rcx
or     %rcx,%rax
mov    %rax,-0x28(%rbp)
mov    -0x28(%rbp),%rcx
mov    -0x10(%rbp),%rax
mov    %rcx,(%rax)
mov    -0x18(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x18(%rbp)
mov    -0x10(%rbp),%rax
add    $0x8,%rax
mov    %rax,-0x10(%rbp)
jmp    1112 <long_mips2vms+0x12>
mov    -0x4(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<long_mips2vms>:
test   %esi,%esi
jle    11f7 <long_mips2vms+0xf7>
lea    -0x1(%rsi),%r8d
xor    %ecx,%ecx
cmp    $0x3,%r8d
jae    111c <long_mips2vms+0x1c>
mov    %rdi,%rax
jmp    11bc <long_mips2vms+0xbc>
add    $0x1,%r8
mov    %r8,%rcx
and    $0xfffffffffffffffc,%rcx
lea    (%rdi,%rcx,8),%rax
xor    %edx,%edx
movdqa 0xecb(%rip),%xmm0
movdqa 0xed3(%rip),%xmm1
nopl   (%rax)
movdqu (%rdi,%rdx,8),%xmm2
movdqu 0x10(%rdi,%rdx,8),%xmm3
movdqa %xmm2,%xmm4
psllq  $0x10,%xmm4
movdqa %xmm3,%xmm5
psllq  $0x10,%xmm5
psrlq  $0x10,%xmm2
por    %xmm4,%xmm2
psrlq  $0x10,%xmm3
por    %xmm5,%xmm3
movdqa %xmm2,%xmm4
psllq  $0x8,%xmm4
movdqa %xmm3,%xmm5
psllq  $0x8,%xmm5
pand   %xmm0,%xmm4
pand   %xmm0,%xmm5
psrlq  $0x8,%xmm2
psrlq  $0x8,%xmm3
pand   %xmm1,%xmm2
por    %xmm4,%xmm2
pand   %xmm1,%xmm3
por    %xmm5,%xmm3
movdqu %xmm2,(%rdi,%rdx,8)
movdqu %xmm3,0x10(%rdi,%rdx,8)
add    $0x4,%rdx
cmp    %rdx,%rcx
jne    1140 <long_mips2vms+0x40>
cmp    %rcx,%r8
je     11f7 <long_mips2vms+0xf7>
sub    %ecx,%esi
xor    %ecx,%ecx
mov    (%rax,%rcx,8),%rdx
mov    %rdx,%rdi
shl    $0x10,%rdi
shr    $0x10,%rdx
or     %rdi,%rdx
mov    %edx,%edi
and    $0xff00ff,%edi
shl    $0x8,%rdi
shr    $0x8,%rdx
and    $0xff00ff,%edx
or     %rdi,%rdx
mov    %rdx,(%rax,%rcx,8)
add    $0x1,%rcx
cmp    %ecx,%esi
jne    11c0 <long_mips2vms+0xc0>
ret

LLVM IR (-O0):
define i32 @long_mips2vms(i64* %0, i32 %1) {
%3 = alloca i32
%4 = alloca i64*
%5 = alloca i32
%6 = alloca i32
%7 = alloca i64
%8 = alloca i64
store i64* %0, i64** %4
store i32 %1, i32* %5
store i32 0, i32* %6
br label %9
9: ; preds = %30, %2
%10 = load i32, i32* %6
%11 = load i32, i32* %5
%12 = icmp slt i32 %10, %11
br i1 %12, label %13, label %35
13: ; preds = %9
%14 = load i64*, i64** %4
%15 = load i64, i64* %14
store i64 %15, i64* %8
%16 = load i64, i64* %8
%17 = shl i64 %16, 16
%18 = load i64, i64* %8
%19 = lshr i64 %18, 16
%20 = or i64 %17, %19
store i64 %20, i64* %7
%21 = load i64, i64* %7
%22 = and i64 %21, 16711935
%23 = shl i64 %22, 8
%24 = load i64, i64* %7
%25 = and i64 %24, 4278255360
%26 = lshr i64 %25, 8
%27 = or i64 %23, %26
store i64 %27, i64* %8
%28 = load i64, i64* %8
%29 = load i64*, i64** %4
store i64 %28, i64* %29
br label %30
30: ; preds = %13
%31 = load i32, i32* %6
%32 = add nsw i32 %31, 1
store i32 %32, i32* %6
%33 = load i64*, i64** %4
%34 = getelementptr inbounds i64, i64* %33, i32 1
store i64* %34, i64** %4
br label %9
35: ; preds = %9
%36 = load i32, i32* %3
ret i32 %36
}

LLVM IR (-O2):
define i32 @long_mips2vms(i64* nocapture %0, i32 %1) {
%3 = icmp sgt i32 %1, 0
br i1 %3, label %4, label %61
4: ; preds = %2
%5 = add i32 %1, -1
%6 = zext i32 %5 to i64
%7 = add nuw nsw i64 %6, 1
%8 = icmp ult i32 %5, 3
br i1 %8, label %43, label %9
9: ; preds = %4
%10 = and i64 %7, 8589934588
%11 = getelementptr i64, i64* %0, i64 %10
%12 = trunc i64 %10 to i32
br label %13
13: ; preds = %13, %9
%14 = phi i64 [ 0, %9 ], [ %39, %13 ]
%15 = getelementptr i64, i64* %0, i64 %14
%16 = bitcast i64* %15 to <2 x i64>*
%17 = load <2 x i64>, <2 x i64>* %16
%18 = getelementptr i64, i64* %15, i64 2
%19 = bitcast i64* %18 to <2 x i64>*
%20 = load <2 x i64>, <2 x i64>* %19
%21 = shl <2 x i64> %17, <i64 16, i64 16>
%22 = shl <2 x i64> %20, <i64 16, i64 16>
%23 = lshr <2 x i64> %17, <i64 16, i64 16>
%24 = lshr <2 x i64> %20, <i64 16, i64 16>
%25 = or <2 x i64> %21, %23
%26 = or <2 x i64> %22, %24
%27 = shl <2 x i64> %25, <i64 8, i64 8>
%28 = shl <2 x i64> %26, <i64 8, i64 8>
%29 = and <2 x i64> %27, <i64 4278255360, i64 4278255360>
%30 = and <2 x i64> %28, <i64 4278255360, i64 4278255360>
%31 = lshr <2 x i64> %25, <i64 8, i64 8>
%32 = lshr <2 x i64> %26, <i64 8, i64 8>
%33 = and <2 x i64> %31, <i64 16711935, i64 16711935>
%34 = and <2 x i64> %32, <i64 16711935, i64 16711935>
%35 = or <2 x i64> %29, %33
%36 = or <2 x i64> %30, %34
%37 = bitcast i64* %15 to <2 x i64>*
store <2 x i64> %35, <2 x i64>* %37
%38 = bitcast i64* %18 to <2 x i64>*
store <2 x i64> %36, <2 x i64>* %38
%39 = add nuw i64 %14, 4
%40 = icmp eq i64 %39, %10
br i1 %40, label %41, label %13
41: ; preds = %13
%42 = icmp eq i64 %7, %10
br i1 %42, label %61, label %43
43: ; preds = %4, %41
%44 = phi i64* [ %0, %4 ], [ %11, %41 ]
%45 = phi i32 [ 0, %4 ], [ %12, %41 ]
br label %46
46: ; preds = %43, %46
%47 = phi i64* [ %59, %46 ], [ %44, %43 ]
%48 = phi i32 [ %58, %46 ], [ %45, %43 ]
%49 = load i64, i64* %47
%50 = shl i64 %49, 16
%51 = lshr i64 %49, 16
%52 = or i64 %50, %51
%53 = shl i64 %52, 8
%54 = and i64 %53, 4278255360
%55 = lshr i64 %52, 8
%56 = and i64 %55, 16711935
%57 = or i64 %54, %56
store i64 %57, i64* %47
%58 = add nuw nsw i32 %48, 1
%59 = getelementptr inbounds i64, i64* %47, i64 1
%60 = icmp eq i32 %58, %1
br i1 %60, label %61, label %46
61: ; preds = %46, %41, %2
ret i32 undef
}