void smatrix_unmap_roi00(short **m, long nrl0, long nrh0, long ncl0, long nch0,
                         long nrl1, long nrh1, long ncl1, long nch1) {
  long i;
  long nrow1 = nrh0 - nrl0 + 1, ncol0 = nch0 - ncl0 + 1;
  long drow = nrl1 - nrl0 + 1, dcol = ncl1 - ncl0 + 1;
  m[0] -= (drow * ncol0 + dcol);
  m[0] -= ncl0;
  for (i = nrl0 + 1; i <= nrh0; i++)
    m[i] = m[i - 1] + ncol0;
}


x86 assembly (clang, -O0):
push   %rbp
mov    %rsp,%rbp
mov    0x20(%rbp),%rax
mov    0x18(%rbp),%rax
mov    0x10(%rbp),%rax
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %rcx,-0x20(%rbp)
mov    %r8,-0x28(%rbp)
mov    %r9,-0x30(%rbp)
mov    -0x18(%rbp),%rax
sub    -0x10(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x40(%rbp)
mov    -0x28(%rbp),%rax
sub    -0x20(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x48(%rbp)
mov    -0x30(%rbp),%rax
sub    -0x10(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x50(%rbp)
mov    0x18(%rbp),%rax
sub    -0x20(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x58(%rbp)
mov    -0x50(%rbp),%rsi
imul   -0x48(%rbp),%rsi
add    -0x58(%rbp),%rsi
mov    -0x8(%rbp),%rax
mov    (%rax),%rcx
xor    %edx,%edx
sub    %rsi,%rdx
shl    $0x1,%rdx
add    %rdx,%rcx
mov    %rcx,(%rax)
mov    -0x20(%rbp),%rsi
mov    -0x8(%rbp),%rax
mov    (%rax),%rcx
xor    %edx,%edx
sub    %rsi,%rdx
shl    $0x1,%rdx
add    %rdx,%rcx
mov    %rcx,(%rax)
mov    -0x10(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x38(%rbp)
mov    -0x38(%rbp),%rax
cmp    -0x18(%rbp),%rax
jg     11f7 <smatrix_unmap_roi00+0xf7>
mov    -0x8(%rbp),%rax
mov    -0x38(%rbp),%rcx
sub    $0x1,%rcx
mov    (%rax,%rcx,8),%rdx
mov    -0x48(%rbp),%rax
shl    $0x1,%rax
add    %rax,%rdx
mov    -0x8(%rbp),%rax
mov    -0x38(%rbp),%rcx
mov    %rdx,(%rax,%rcx,8)
mov    -0x38(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x38(%rbp)
jmp    11b1 <smatrix_unmap_roi00+0xb1>
pop    %rbp
ret

x86 assembly (clang, -O2):
push   %r14
push   %rbx
mov    0x20(%rsp),%rax
mov    %r8,%r10
sub    %rcx,%r10
mov    %r10,%rbx
not    %rbx
sub    %rsi,%r9
add    $0x1,%r9
imul   %rbx,%r9
not    %rax
add    %rcx,%rax
add    %r9,%rax
add    %rax,%rax
add    (%rdi),%rax
lea    (%rcx,%rcx,1),%r9
sub    %r9,%rax
mov    %rax,(%rdi)
cmp    %rsi,%rdx
jle    11fa <smatrix_unmap_roi00+0xfa>
mov    (%rdi,%rsi,8),%rax
mov    %edx,%ebx
sub    %esi,%ebx
mov    %rsi,%r11
not    %r11
add    %rdx,%r11
and    $0x7,%rbx
je     1182 <smatrix_unmap_roi00+0x82>
lea    (%r8,%r8,1),%r14
sub    %r9,%r14
add    $0x2,%r14
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
add    %r14,%rax
mov    %rax,0x8(%rdi,%rsi,8)
add    $0x1,%rsi
add    $0xffffffffffffffff,%rbx
jne    1170 <smatrix_unmap_roi00+0x70>
cmp    $0x7,%r11
jb     11fa <smatrix_unmap_roi00+0xfa>
add    $0x1,%r10
lea    (%rax,%r10,2),%rax
mov    %r8,%r10
shl    $0x4,%r10
shl    $0x4,%rcx
sub    %rcx,%r10
add    $0x10,%r10
add    %r8,%r8
sub    %r9,%r8
add    $0x2,%r8
nopl   0x0(%rax)
mov    %rax,0x8(%rdi,%rsi,8)
lea    (%rax,%r8,1),%rcx
mov    %rcx,0x10(%rdi,%rsi,8)
add    %r8,%rcx
mov    %rcx,0x18(%rdi,%rsi,8)
add    %r8,%rcx
mov    %rcx,0x20(%rdi,%rsi,8)
add    %r8,%rcx
mov    %rcx,0x28(%rdi,%rsi,8)
add    %r8,%rcx
mov    %rcx,0x30(%rdi,%rsi,8)
add    %r8,%rcx
mov    %rcx,0x38(%rdi,%rsi,8)
add    %r8,%rcx
mov    %rcx,0x40(%rdi,%rsi,8)
add    $0x8,%rsi
add    %r10,%rax
cmp    %rsi,%rdx
jne    11b0 <smatrix_unmap_roi00+0xb0>
pop    %rbx
pop    %r14
ret

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

LLVM IR (-O2):
define void @smatrix_unmap_roi00(i16** nocapture %0, i64 %1, i64 %2, i64 %3, i64 %4, i64 %5, i64 %6, i64 %7, i64 %8) {
%10 = sub nsw i64 %4, %3
%11 = xor i64 %10, -1
%12 = add nsw i64 %10, 1
%13 = sub i64 1, %1
%14 = add i64 %13, %5
%15 = xor i64 %7, -1
%16 = add i64 %15, %3
%17 = mul i64 %14, %11
%18 = add i64 %16, %17
%19 = load i16*, i16** %0
%20 = getelementptr inbounds i16, i16* %19, i64 %18
%21 = sub i64 0, %3
%22 = getelementptr inbounds i16, i16* %20, i64 %21
store i16* %22, i16** %0
%23 = icmp sgt i64 %2, %1
br i1 %23, label %24, label %73
24: ; preds = %9
%25 = getelementptr inbounds i16*, i16** %0, i64 %1
%26 = load i16*, i16** %25
%27 = sub i64 %2, %1
%28 = xor i64 %1, -1
%29 = add i64 %28, %2
%30 = and i64 %27, 7
%31 = icmp eq i64 %30, 0
br i1 %31, label %41, label %32
32: ; preds = %24, %32
%33 = phi i16* [ %37, %32 ], [ %26, %24 ]
%34 = phi i64 [ %36, %32 ], [ %1, %24 ]
%35 = phi i64 [ %39, %32 ], [ 0, %24 ]
%36 = add nsw i64 %34, 1
%37 = getelementptr inbounds i16, i16* %33, i64 %12
%38 = getelementptr inbounds i16*, i16** %0, i64 %36
store i16* %37, i16** %38
%39 = add i64 %35, 1
%40 = icmp eq i64 %39, %30
br i1 %40, label %41, label %32
41: ; preds = %32, %24
%42 = phi i16* [ %26, %24 ], [ %37, %32 ]
%43 = phi i64 [ %1, %24 ], [ %36, %32 ]
%44 = icmp ult i64 %29, 7
br i1 %44, label %73, label %45
45: ; preds = %41, %45
%46 = phi i16* [ %70, %45 ], [ %42, %41 ]
%47 = phi i64 [ %69, %45 ], [ %43, %41 ]
%48 = add nsw i64 %47, 1
%49 = getelementptr inbounds i16, i16* %46, i64 %12
%50 = getelementptr inbounds i16*, i16** %0, i64 %48
store i16* %49, i16** %50
%51 = add nsw i64 %47, 2
%52 = getelementptr inbounds i16, i16* %49, i64 %12
%53 = getelementptr inbounds i16*, i16** %0, i64 %51
store i16* %52, i16** %53
%54 = add nsw i64 %47, 3
%55 = getelementptr inbounds i16, i16* %52, i64 %12
%56 = getelementptr inbounds i16*, i16** %0, i64 %54
store i16* %55, i16** %56
%57 = add nsw i64 %47, 4
%58 = getelementptr inbounds i16, i16* %55, i64 %12
%59 = getelementptr inbounds i16*, i16** %0, i64 %57
store i16* %58, i16** %59
%60 = add nsw i64 %47, 5
%61 = getelementptr inbounds i16, i16* %58, i64 %12
%62 = getelementptr inbounds i16*, i16** %0, i64 %60
store i16* %61, i16** %62
%63 = add nsw i64 %47, 6
%64 = getelementptr inbounds i16, i16* %61, i64 %12
%65 = getelementptr inbounds i16*, i16** %0, i64 %63
store i16* %64, i16** %65
%66 = add nsw i64 %47, 7
%67 = getelementptr inbounds i16, i16* %64, i64 %12
%68 = getelementptr inbounds i16*, i16** %0, i64 %66
store i16* %67, i16** %68
%69 = add nsw i64 %47, 8
%70 = getelementptr inbounds i16, i16* %67, i64 %12
%71 = getelementptr inbounds i16*, i16** %0, i64 %69
store i16* %70, i16** %71
%72 = icmp eq i64 %69, %2
br i1 %72, label %73, label %45
73: ; preds = %41, %45, %9
ret void
}