int subm(x, y)
unsigned short *x, *y;
{
  register unsigned long a;
  int i;
  unsigned int carry;
  x += 14;
  y += 14;
  carry = 0;
  for (i = 0; i < 14 - 1; i++) {
    a = (unsigned long)(*y) - (unsigned long)(*x) - carry;
    if (a & 0x10000)
      carry = 1;
    else
      carry = 0;
    *y = a;
    --x;
    --y;
  }
  return 0;
}


x86 assembly (clang, -O0):
<subm>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    -0x8(%rbp),%rax
add    $0x1c,%rax
mov    %rax,-0x8(%rbp)
mov    -0x10(%rbp),%rax
add    $0x1c,%rax
mov    %rax,-0x10(%rbp)
movl   $0x0,-0x20(%rbp)
movl   $0x0,-0x1c(%rbp)
cmpl   $0xd,-0x1c(%rbp)
jge    11b2 <subm+0xb2>
mov    -0x10(%rbp),%rax
movzwl (%rax),%eax
mov    -0x8(%rbp),%rcx
movzwl (%rcx),%ecx
sub    %rcx,%rax
mov    -0x20(%rbp),%ecx
sub    %rcx,%rax
mov    %rax,-0x18(%rbp)
mov    -0x18(%rbp),%rax
and    $0x10000,%rax
cmp    $0x0,%rax
je     1177 <subm+0x77>
movl   $0x1,-0x20(%rbp)
jmp    117e <subm+0x7e>
movl   $0x0,-0x20(%rbp)
mov    -0x18(%rbp),%rax
mov    %ax,%cx
mov    -0x10(%rbp),%rax
mov    %cx,(%rax)
mov    -0x8(%rbp),%rax
add    $0xfffffffffffffffe,%rax
mov    %rax,-0x8(%rbp)
mov    -0x10(%rbp),%rax
add    $0xfffffffffffffffe,%rax
mov    %rax,-0x10(%rbp)
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    1132 <subm+0x32>
xor    %eax,%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<subm>:
movzwl 0x1c(%rsi),%eax
movzwl 0x1c(%rdi),%ecx
sub    %rcx,%rax
mov    %ax,0x1c(%rsi)
shr    $0x10,%eax
and    $0x1,%eax
movzwl 0x1a(%rsi),%ecx
movzwl 0x1a(%rdi),%edx
add    %rax,%rdx
sub    %rdx,%rcx
mov    %cx,0x1a(%rsi)
shr    $0x10,%ecx
and    $0x1,%ecx
movzwl 0x18(%rsi),%eax
movzwl 0x18(%rdi),%edx
add    %rcx,%rdx
sub    %rdx,%rax
mov    %ax,0x18(%rsi)
shr    $0x10,%eax
and    $0x1,%eax
movzwl 0x16(%rsi),%ecx
movzwl 0x16(%rdi),%edx
add    %rax,%rdx
sub    %rdx,%rcx
mov    %cx,0x16(%rsi)
shr    $0x10,%ecx
and    $0x1,%ecx
movzwl 0x14(%rsi),%eax
movzwl 0x14(%rdi),%edx
add    %rcx,%rdx
sub    %rdx,%rax
mov    %ax,0x14(%rsi)
shr    $0x10,%eax
and    $0x1,%eax
movzwl 0x12(%rsi),%ecx
movzwl 0x12(%rdi),%edx
add    %rax,%rdx
sub    %rdx,%rcx
mov    %cx,0x12(%rsi)
shr    $0x10,%ecx
and    $0x1,%ecx
movzwl 0x10(%rsi),%eax
movzwl 0x10(%rdi),%edx
add    %rcx,%rdx
sub    %rdx,%rax
mov    %ax,0x10(%rsi)
shr    $0x10,%eax
and    $0x1,%eax
movzwl 0xe(%rsi),%ecx
movzwl 0xe(%rdi),%edx
add    %rax,%rdx
sub    %rdx,%rcx
mov    %cx,0xe(%rsi)
shr    $0x10,%ecx
and    $0x1,%ecx
movzwl 0xc(%rsi),%eax
movzwl 0xc(%rdi),%edx
add    %rcx,%rdx
sub    %rdx,%rax
mov    %ax,0xc(%rsi)
shr    $0x10,%eax
and    $0x1,%eax
movzwl 0xa(%rsi),%ecx
movzwl 0xa(%rdi),%edx
add    %rax,%rdx
sub    %rdx,%rcx
mov    %cx,0xa(%rsi)
shr    $0x10,%ecx
and    $0x1,%ecx
movzwl 0x8(%rsi),%eax
movzwl 0x8(%rdi),%edx
add    %rcx,%rdx
sub    %rdx,%rax
mov    %ax,0x8(%rsi)
shr    $0x10,%eax
and    $0x1,%eax
movzwl 0x6(%rsi),%ecx
movzwl 0x6(%rdi),%edx
add    %rax,%rdx
sub    %rdx,%rcx
mov    %cx,0x6(%rsi)
shr    $0x10,%ecx
and    $0x1,%ecx
add    0x4(%rdi),%cx
sub    %cx,0x4(%rsi)
xor    %eax,%eax
ret

LLVM IR (-O0):
define i32 @subm(i16* %0, i16* %1) {
%3 = alloca i16*
%4 = alloca i16*
%5 = alloca i64
%6 = alloca i32
%7 = alloca i32
store i16* %0, i16** %3
store i16* %1, i16** %4
%8 = load i16*, i16** %3
%9 = getelementptr inbounds i16, i16* %8, i64 14
store i16* %9, i16** %3
%10 = load i16*, i16** %4
%11 = getelementptr inbounds i16, i16* %10, i64 14
store i16* %11, i16** %4
store i32 0, i32* %7
store i32 0, i32* %6
br label %12
12: ; preds = %39, %2
%13 = load i32, i32* %6
%14 = icmp slt i32 %13, 13
br i1 %14, label %15, label %42
15: ; preds = %12
%16 = load i16*, i16** %4
%17 = load i16, i16* %16
%18 = zext i16 %17 to i64
%19 = load i16*, i16** %3
%20 = load i16, i16* %19
%21 = zext i16 %20 to i64
%22 = sub i64 %18, %21
%23 = load i32, i32* %7
%24 = zext i32 %23 to i64
%25 = sub i64 %22, %24
store i64 %25, i64* %5
%26 = load i64, i64* %5
%27 = and i64 %26, 65536
%28 = icmp ne i64 %27, 0
br i1 %28, label %29, label %30
29: ; preds = %15
store i32 1, i32* %7
br label %31
30: ; preds = %15
store i32 0, i32* %7
br label %31
31: ; preds = %30, %29
%32 = load i64, i64* %5
%33 = trunc i64 %32 to i16
%34 = load i16*, i16** %4
store i16 %33, i16* %34
%35 = load i16*, i16** %3
%36 = getelementptr inbounds i16, i16* %35, i32 -1
store i16* %36, i16** %3
%37 = load i16*, i16** %4
%38 = getelementptr inbounds i16, i16* %37, i32 -1
store i16* %38, i16** %4
br label %39
39: ; preds = %31
%40 = load i32, i32* %6
%41 = add nsw i32 %40, 1
store i32 %41, i32* %6
br label %12
42: ; preds = %12
ret i32 0
}

LLVM IR (-O2):
define i32 @subm(i16* nocapture %0, i16* nocapture %1) {
%3 = getelementptr inbounds i16, i16* %0, i64 14
%4 = getelementptr inbounds i16, i16* %1, i64 14
%5 = load i16, i16* %4
%6 = zext i16 %5 to i64
%7 = load i16, i16* %3
%8 = zext i16 %7 to i64
%9 = sub nsw i64 %6, %8
%10 = lshr i64 %9, 16
%11 = and i64 %10, 1
%12 = trunc i64 %9 to i16
store i16 %12, i16* %4
%13 = getelementptr inbounds i16, i16* %0, i64 13
%14 = getelementptr inbounds i16, i16* %1, i64 13
%15 = load i16, i16* %14
%16 = zext i16 %15 to i64
%17 = load i16, i16* %13
%18 = zext i16 %17 to i64
%19 = add nuw nsw i64 %11, %18
%20 = sub nsw i64 %16, %19
%21 = lshr i64 %20, 16
%22 = and i64 %21, 1
%23 = trunc i64 %20 to i16
store i16 %23, i16* %14
%24 = getelementptr inbounds i16, i16* %0, i64 12
%25 = getelementptr inbounds i16, i16* %1, i64 12
%26 = load i16, i16* %25
%27 = zext i16 %26 to i64
%28 = load i16, i16* %24
%29 = zext i16 %28 to i64
%30 = add nuw nsw i64 %22, %29
%31 = sub nsw i64 %27, %30
%32 = lshr i64 %31, 16
%33 = and i64 %32, 1
%34 = trunc i64 %31 to i16
store i16 %34, i16* %25
%35 = getelementptr inbounds i16, i16* %0, i64 11
%36 = getelementptr inbounds i16, i16* %1, i64 11
%37 = load i16, i16* %36
%38 = zext i16 %37 to i64
%39 = load i16, i16* %35
%40 = zext i16 %39 to i64
%41 = add nuw nsw i64 %33, %40
%42 = sub nsw i64 %38, %41
%43 = lshr i64 %42, 16
%44 = and i64 %43, 1
%45 = trunc i64 %42 to i16
store i16 %45, i16* %36
%46 = getelementptr inbounds i16, i16* %0, i64 10
%47 = getelementptr inbounds i16, i16* %1, i64 10
%48 = load i16, i16* %47
%49 = zext i16 %48 to i64
%50 = load i16, i16* %46
%51 = zext i16 %50 to i64
%52 = add nuw nsw i64 %44, %51
%53 = sub nsw i64 %49, %52
%54 = lshr i64 %53, 16
%55 = and i64 %54, 1
%56 = trunc i64 %53 to i16
store i16 %56, i16* %47
%57 = getelementptr inbounds i16, i16* %0, i64 9
%58 = getelementptr inbounds i16, i16* %1, i64 9
%59 = load i16, i16* %58
%60 = zext i16 %59 to i64
%61 = load i16, i16* %57
%62 = zext i16 %61 to i64
%63 = add nuw nsw i64 %55, %62
%64 = sub nsw i64 %60, %63
%65 = lshr i64 %64, 16
%66 = and i64 %65, 1
%67 = trunc i64 %64 to i16
store i16 %67, i16* %58
%68 = getelementptr inbounds i16, i16* %0, i64 8
%69 = getelementptr inbounds i16, i16* %1, i64 8
%70 = load i16, i16* %69
%71 = zext i16 %70 to i64
%72 = load i16, i16* %68
%73 = zext i16 %72 to i64
%74 = add nuw nsw i64 %66, %73
%75 = sub nsw i64 %71, %74
%76 = lshr i64 %75, 16
%77 = and i64 %76, 1
%78 = trunc i64 %75 to i16
store i16 %78, i16* %69
%79 = getelementptr inbounds i16, i16* %0, i64 7
%80 = getelementptr inbounds i16, i16* %1, i64 7
%81 = load i16, i16* %80
%82 = zext i16 %81 to i64
%83 = load i16, i16* %79
%84 = zext i16 %83 to i64
%85 = add nuw nsw i64 %77, %84
%86 = sub nsw i64 %82, %85
%87 = lshr i64 %86, 16
%88 = and i64 %87, 1
%89 = trunc i64 %86 to i16
store i16 %89, i16* %80
%90 = getelementptr inbounds i16, i16* %0, i64 6
%91 = getelementptr inbounds i16, i16* %1, i64 6
%92 = load i16, i16* %91
%93 = zext i16 %92 to i64
%94 = load i16, i16* %90
%95 = zext i16 %94 to i64
%96 = add nuw nsw i64 %88, %95
%97 = sub nsw i64 %93, %96
%98 = lshr i64 %97, 16
%99 = and i64 %98, 1
%100 = trunc i64 %97 to i16
store i16 %100, i16* %91
%101 = getelementptr inbounds i16, i16* %0, i64 5
%102 = getelementptr inbounds i16, i16* %1, i64 5
%103 = load i16, i16* %102
%104 = zext i16 %103 to i64
%105 = load i16, i16* %101
%106 = zext i16 %105 to i64
%107 = add nuw nsw i64 %99, %106
%108 = sub nsw i64 %104, %107
%109 = lshr i64 %108, 16
%110 = and i64 %109, 1
%111 = trunc i64 %108 to i16
store i16 %111, i16* %102
%112 = getelementptr inbounds i16, i16* %0, i64 4
%113 = getelementptr inbounds i16, i16* %1, i64 4
%114 = load i16, i16* %113
%115 = zext i16 %114 to i64
%116 = load i16, i16* %112
%117 = zext i16 %116 to i64
%118 = add nuw nsw i64 %110, %117
%119 = sub nsw i64 %115, %118
%120 = lshr i64 %119, 16
%121 = and i64 %120, 1
%122 = trunc i64 %119 to i16
store i16 %122, i16* %113
%123 = getelementptr inbounds i16, i16* %0, i64 3
%124 = getelementptr inbounds i16, i16* %1, i64 3
%125 = load i16, i16* %124
%126 = zext i16 %125 to i64
%127 = load i16, i16* %123
%128 = zext i16 %127 to i64
%129 = add nuw nsw i64 %121, %128
%130 = sub nsw i64 %126, %129
%131 = lshr i64 %130, 16
%132 = trunc i64 %130 to i16
store i16 %132, i16* %124
%133 = getelementptr inbounds i16, i16* %0, i64 2
%134 = getelementptr inbounds i16, i16* %1, i64 2
%135 = load i16, i16* %134
%136 = load i16, i16* %133
%137 = trunc i64 %131 to i16
%138 = and i16 %137, 1
%139 = add i16 %138, %136
%140 = sub i16 %135, %139
store i16 %140, i16* %134
ret i32 0
}