void hflip1_smatrix(short **S, long nrl, long nrh, long ncl, long nch) {
  int i, j, n = ncl + nch;
  short t;
  for (i = nrl; i <= nrh; i++) {
    for (j = ncl; j <= nch; j++) {
      t = S[i][n - j];
      S[i][n - j] = S[i][j];
      S[i][j] = t;
    }
  }
}


x86 assembly (clang, -O0):
<hflip1_smatrix>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %rcx,-0x20(%rbp)
mov    %r8,-0x28(%rbp)
mov    -0x20(%rbp),%rax
add    -0x28(%rbp),%rax
mov    %eax,-0x34(%rbp)
mov    -0x10(%rbp),%rax
mov    %eax,-0x2c(%rbp)
movslq -0x2c(%rbp),%rax
cmp    -0x18(%rbp),%rax
jg     11d0 <hflip1_smatrix+0xd0>
mov    -0x20(%rbp),%rax
mov    %eax,-0x30(%rbp)
movslq -0x30(%rbp),%rax
cmp    -0x28(%rbp),%rax
jg     11bd <hflip1_smatrix+0xbd>
mov    -0x8(%rbp),%rax
movslq -0x2c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
mov    -0x34(%rbp),%ecx
sub    -0x30(%rbp),%ecx
movslq %ecx,%rcx
mov    (%rax,%rcx,2),%ax
mov    %ax,-0x36(%rbp)
mov    -0x8(%rbp),%rax
movslq -0x2c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x30(%rbp),%rcx
mov    (%rax,%rcx,2),%dx
mov    -0x8(%rbp),%rax
movslq -0x2c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
mov    -0x34(%rbp),%ecx
sub    -0x30(%rbp),%ecx
movslq %ecx,%rcx
mov    %dx,(%rax,%rcx,2)
mov    -0x36(%rbp),%dx
mov    -0x8(%rbp),%rax
movslq -0x2c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x30(%rbp),%rcx
mov    %dx,(%rax,%rcx,2)
mov    -0x30(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x30(%rbp)
jmp    113f <hflip1_smatrix+0x3f>
jmp    11c2 <hflip1_smatrix+0xc2>
mov    -0x2c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x2c(%rbp)
jmp    112a <hflip1_smatrix+0x2a>
pop    %rbp
ret

x86 assembly (clang, -O2):
<hflip1_smatrix>:
push   %rbp
push   %rbx
movslq %esi,%r11
cmp    %rdx,%r11
jle    110d <hflip1_smatrix+0xd>
pop    %rbx
pop    %rbp
ret
lea    (%r8,%rcx,1),%eax
movslq %ecx,%r10
movslq %eax,%r9
sub    %r10,%r9
jmp    1129 <hflip1_smatrix+0x29>
nopl   0x0(%rax)
add    $0x1,%r11
cmp    %rdx,%r11
jg     110a <hflip1_smatrix+0xa>
cmp    %r8,%r10
jg     1120 <hflip1_smatrix+0x20>
mov    (%rdi,%r11,8),%rsi
mov    %r9,%rcx
mov    %r10,%rax
nopl   0x0(%rax,%rax,1)
movzwl (%rsi,%rcx,2),%ebx
movzwl (%rsi,%rax,2),%ebp
mov    %bp,(%rsi,%rcx,2)
mov    %bx,(%rsi,%rax,2)
add    $0x1,%rax
add    $0xffffffffffffffff,%rcx
cmp    %r8,%rax
jle    1140 <hflip1_smatrix+0x40>
jmp    1120 <hflip1_smatrix+0x20>

LLVM IR (-O0):
define void @hflip1_smatrix(i16** %0, i64 %1, i64 %2, i64 %3, i64 %4) {
%6 = alloca i16**
%7 = alloca i64
%8 = alloca i64
%9 = alloca i64
%10 = alloca i64
%11 = alloca i32
%12 = alloca i32
%13 = alloca i32
%14 = alloca i16
store i16** %0, i16*** %6
store i64 %1, i64* %7
store i64 %2, i64* %8
store i64 %3, i64* %9
store i64 %4, i64* %10
%15 = load i64, i64* %9
%16 = load i64, i64* %10
%17 = add nsw i64 %15, %16
%18 = trunc i64 %17 to i32
store i32 %18, i32* %13
%19 = load i64, i64* %7
%20 = trunc i64 %19 to i32
store i32 %20, i32* %11
br label %21
21: ; preds = %78, %5
%22 = load i32, i32* %11
%23 = sext i32 %22 to i64
%24 = load i64, i64* %8
%25 = icmp sle i64 %23, %24
br i1 %25, label %26, label %81
26: ; preds = %21
%27 = load i64, i64* %9
%28 = trunc i64 %27 to i32
store i32 %28, i32* %12
br label %29
29: ; preds = %74, %26
%30 = load i32, i32* %12
%31 = sext i32 %30 to i64
%32 = load i64, i64* %10
%33 = icmp sle i64 %31, %32
br i1 %33, label %34, label %77
34: ; preds = %29
%35 = load i16**, i16*** %6
%36 = load i32, i32* %11
%37 = sext i32 %36 to i64
%38 = getelementptr inbounds i16*, i16** %35, i64 %37
%39 = load i16*, i16** %38
%40 = load i32, i32* %13
%41 = load i32, i32* %12
%42 = sub nsw i32 %40, %41
%43 = sext i32 %42 to i64
%44 = getelementptr inbounds i16, i16* %39, i64 %43
%45 = load i16, i16* %44
store i16 %45, i16* %14
%46 = load i16**, i16*** %6
%47 = load i32, i32* %11
%48 = sext i32 %47 to i64
%49 = getelementptr inbounds i16*, i16** %46, i64 %48
%50 = load i16*, i16** %49
%51 = load i32, i32* %12
%52 = sext i32 %51 to i64
%53 = getelementptr inbounds i16, i16* %50, i64 %52
%54 = load i16, i16* %53
%55 = load i16**, i16*** %6
%56 = load i32, i32* %11
%57 = sext i32 %56 to i64
%58 = getelementptr inbounds i16*, i16** %55, i64 %57
%59 = load i16*, i16** %58
%60 = load i32, i32* %13
%61 = load i32, i32* %12
%62 = sub nsw i32 %60, %61
%63 = sext i32 %62 to i64
%64 = getelementptr inbounds i16, i16* %59, i64 %63
store i16 %54, i16* %64
%65 = load i16, i16* %14
%66 = load i16**, i16*** %6
%67 = load i32, i32* %11
%68 = sext i32 %67 to i64
%69 = getelementptr inbounds i16*, i16** %66, i64 %68
%70 = load i16*, i16** %69
%71 = load i32, i32* %12
%72 = sext i32 %71 to i64
%73 = getelementptr inbounds i16, i16* %70, i64 %72
store i16 %65, i16* %73
br label %74
74: ; preds = %34
%75 = load i32, i32* %12
%76 = add nsw i32 %75, 1
store i32 %76, i32* %12
br label %29
77: ; preds = %29
br label %78
78: ; preds = %77
%79 = load i32, i32* %11
%80 = add nsw i32 %79, 1
store i32 %80, i32* %11
br label %21
81: ; preds = %21
ret void
}

LLVM IR (-O2):
define void @hflip1_smatrix(i16** nocapture %0, i64 %1, i64 %2, i64 %3, i64 %4) {
%6 = shl i64 %1, 32
%7 = ashr exact i64 %6, 32
%8 = icmp sgt i64 %7, %2
br i1 %8, label %33, label %9
9: ; preds = %5
%10 = add nsw i64 %4, %3
%11 = shl i64 %3, 32
%12 = ashr exact i64 %11, 32
%13 = icmp sgt i64 %12, %4
%14 = shl i64 %10, 32
%15 = ashr exact i64 %14, 32
br label %16
16: ; preds = %9, %30
%17 = phi i64 [ %7, %9 ], [ %31, %30 ]
br i1 %13, label %30, label %18
18: ; preds = %16
%19 = getelementptr inbounds i16*, i16** %0, i64 %17
%20 = load i16*, i16** %19
br label %21
21: ; preds = %18, %21
%22 = phi i64 [ %12, %18 ], [ %28, %21 ]
%23 = sub nsw i64 %15, %22
%24 = getelementptr inbounds i16, i16* %20, i64 %23
%25 = load i16, i16* %24
%26 = getelementptr inbounds i16, i16* %20, i64 %22
%27 = load i16, i16* %26
store i16 %27, i16* %24
store i16 %25, i16* %26
%28 = add i64 %22, 1
%29 = icmp sgt i64 %28, %4
br i1 %29, label %30, label %21
30: ; preds = %21, %16
%31 = add i64 %17, 1
%32 = icmp sgt i64 %31, %2
br i1 %32, label %33, label %16
33: ; preds = %30, %5
ret void
}