int bi_sftadd(int a_len, unsigned long *a_data, int b_len,
              unsigned long *b_data, int s_len) {
  unsigned long carry;
  unsigned long long sum;
  int i, b_len_s, len_max;
  b_len_s = b_len + s_len;
  len_max = (a_len < b_len_s) ? b_len_s : a_len;
  for (i = a_len; i < len_max; i++)
    a_data[i] = 0;
  for (i = b_len; i < len_max - s_len; i++)
    b_data[i] = 0;
  carry = 0;
  for (i = s_len; i < len_max; i++) {
    sum = a_data[i];
    sum = sum + b_data[i - s_len] + carry;
    a_data[i] = (unsigned long)(sum & (((unsigned long long)0x1 << 32) - 1));
    carry = (unsigned long)(sum >> 32);
  }
  a_data[len_max] = carry;
  return len_max + carry;
}


x86 assembly (clang, -O0):
<bi_sftadd>:
push   %rbp
mov    %rsp,%rbp
mov    %edi,-0x4(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %edx,-0x14(%rbp)
mov    %rcx,-0x20(%rbp)
mov    %r8d,-0x24(%rbp)
mov    -0x14(%rbp),%eax
add    -0x24(%rbp),%eax
mov    %eax,-0x40(%rbp)
mov    -0x4(%rbp),%eax
cmp    -0x40(%rbp),%eax
jge    1136 <bi_sftadd+0x36>
mov    -0x40(%rbp),%eax
mov    %eax,-0x48(%rbp)
jmp    113c <bi_sftadd+0x3c>
mov    -0x4(%rbp),%eax
mov    %eax,-0x48(%rbp)
mov    -0x48(%rbp),%eax
mov    %eax,-0x44(%rbp)
mov    -0x4(%rbp),%eax
mov    %eax,-0x3c(%rbp)
mov    -0x3c(%rbp),%eax
cmp    -0x44(%rbp),%eax
jge    1172 <bi_sftadd+0x72>
mov    -0x10(%rbp),%rax
movslq -0x3c(%rbp),%rcx
movq   $0x0,(%rax,%rcx,8)
mov    -0x3c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x3c(%rbp)
jmp    1148 <bi_sftadd+0x48>
mov    -0x14(%rbp),%eax
mov    %eax,-0x3c(%rbp)
mov    -0x3c(%rbp),%eax
mov    -0x44(%rbp),%ecx
sub    -0x24(%rbp),%ecx
cmp    %ecx,%eax
jge    11a7 <bi_sftadd+0xa7>
mov    -0x20(%rbp),%rax
movslq -0x3c(%rbp),%rcx
movq   $0x0,(%rax,%rcx,8)
mov    -0x3c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x3c(%rbp)
jmp    1178 <bi_sftadd+0x78>
movq   $0x0,-0x30(%rbp)
mov    -0x24(%rbp),%eax
mov    %eax,-0x3c(%rbp)
mov    -0x3c(%rbp),%eax
cmp    -0x44(%rbp),%eax
jge    1222 <bi_sftadd+0x122>
mov    -0x10(%rbp),%rax
movslq -0x3c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
mov    %rax,-0x38(%rbp)
mov    -0x38(%rbp),%rax
mov    -0x20(%rbp),%rcx
mov    -0x3c(%rbp),%edx
sub    -0x24(%rbp),%edx
movslq %edx,%rdx
add    (%rcx,%rdx,8),%rax
add    -0x30(%rbp),%rax
mov    %rax,-0x38(%rbp)
movabs $0xffffffff,%rdx
and    -0x38(%rbp),%rdx
mov    -0x10(%rbp),%rax
movslq -0x3c(%rbp),%rcx
mov    %rdx,(%rax,%rcx,8)
mov    -0x38(%rbp),%rax
shr    $0x20,%rax
mov    %rax,-0x30(%rbp)
mov    -0x3c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x3c(%rbp)
jmp    11b5 <bi_sftadd+0xb5>
mov    -0x30(%rbp),%rdx
mov    -0x10(%rbp),%rax
movslq -0x44(%rbp),%rcx
mov    %rdx,(%rax,%rcx,8)
movslq -0x44(%rbp),%rax
add    -0x30(%rbp),%rax
pop    %rbp
ret

x86 assembly (clang, -O2):
<bi_sftadd>:
push   %rbp
push   %r15
push   %r14
push   %r12
push   %rbx
mov    %r8d,%r15d
mov    %rcx,%rbx
mov    %edx,%r12d
mov    %rsi,%r14
lea    (%r15,%r12,1),%ebp
cmp    %edi,%ebp
cmovle %edi,%ebp
jle    114c <bi_sftadd+0x3c>
movslq %edi,%rax
lea    (%r14,%rax,8),%rax
not    %edi
add    %ebp,%edi
lea    0x8(,%rdi,8),%rdx
mov    %rax,%rdi
xor    %esi,%esi
call   1030 <memset@plt>
mov    %ebp,%eax
sub    %r15d,%eax
cmp    %r12d,%eax
jle    1176 <bi_sftadd+0x66>
movslq %r12d,%rax
lea    (%rbx,%rax,8),%rdi
mov    %r15d,%eax
not    %eax
add    %ebp,%eax
sub    %r12d,%eax
lea    0x8(,%rax,8),%rdx
xor    %esi,%esi
call   1030 <memset@plt>
cmp    %r15d,%ebp
jle    119f <bi_sftadd+0x8f>
movslq %r15d,%r10
movslq %ebp,%r8
mov    %r8,%r9
sub    %r10,%r9
mov    %r10,%rax
not    %rax
add    %r8,%rax
jne    11a6 <bi_sftadd+0x96>
xor    %ecx,%ecx
mov    %r10,%rdi
test   $0x1,%r9b
jne    11f9 <bi_sftadd+0xe9>
jmp    1211 <bi_sftadd+0x101>
movslq %ebp,%r8
xor    %ecx,%ecx
jmp    1211 <bi_sftadd+0x101>
mov    %r9,%rsi
and    $0xfffffffffffffffe,%rsi
lea    (%r14,%r10,8),%rax
add    $0x8,%rax
xor    %ecx,%ecx
xor    %edi,%edi
nopl   0x0(%rax)
add    -0x8(%rax,%rdi,8),%rcx
add    (%rbx,%rdi,8),%rcx
mov    %ecx,%edx
mov    %rdx,-0x8(%rax,%rdi,8)
shr    $0x20,%rcx
add    (%rax,%rdi,8),%rcx
add    0x8(%rbx,%rdi,8),%rcx
mov    %ecx,%edx
mov    %rdx,(%rax,%rdi,8)
shr    $0x20,%rcx
add    $0x2,%rdi
cmp    %rdi,%rsi
jne    11c0 <bi_sftadd+0xb0>
add    %r10,%rdi
test   $0x1,%r9b
je     1211 <bi_sftadd+0x101>
mov    %rdi,%rax
sub    %r10,%rax
add    (%r14,%rdi,8),%rcx
add    (%rbx,%rax,8),%rcx
mov    %ecx,%eax
mov    %rax,(%r14,%rdi,8)
shr    $0x20,%rcx
mov    %rcx,(%r14,%r8,8)
add    %ecx,%ebp
mov    %ebp,%eax
pop    %rbx
pop    %r12
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
define i32 @bi_sftadd(i32 %0, i64* %1, i32 %2, i64* %3, i32 %4) {
%6 = alloca i32
%7 = alloca i64*
%8 = alloca i32
%9 = alloca i64*
%10 = alloca i32
%11 = alloca i64
%12 = alloca i64
%13 = alloca i32
%14 = alloca i32
%15 = alloca i32
store i32 %0, i32* %6
store i64* %1, i64** %7
store i32 %2, i32* %8
store i64* %3, i64** %9
store i32 %4, i32* %10
%16 = load i32, i32* %8
%17 = load i32, i32* %10
%18 = add nsw i32 %16, %17
store i32 %18, i32* %14
%19 = load i32, i32* %6
%20 = load i32, i32* %14
%21 = icmp slt i32 %19, %20
br i1 %21, label %22, label %24
22: ; preds = %5
%23 = load i32, i32* %14
br label %26
24: ; preds = %5
%25 = load i32, i32* %6
br label %26
26: ; preds = %24, %22
%27 = phi i32 [ %23, %22 ], [ %25, %24 ]
store i32 %27, i32* %15
%28 = load i32, i32* %6
store i32 %28, i32* %13
br label %29
29: ; preds = %38, %26
%30 = load i32, i32* %13
%31 = load i32, i32* %15
%32 = icmp slt i32 %30, %31
br i1 %32, label %33, label %41
33: ; preds = %29
%34 = load i64*, i64** %7
%35 = load i32, i32* %13
%36 = sext i32 %35 to i64
%37 = getelementptr inbounds i64, i64* %34, i64 %36
store i64 0, i64* %37
br label %38
38: ; preds = %33
%39 = load i32, i32* %13
%40 = add nsw i32 %39, 1
store i32 %40, i32* %13
br label %29
41: ; preds = %29
%42 = load i32, i32* %8
store i32 %42, i32* %13
br label %43
43: ; preds = %54, %41
%44 = load i32, i32* %13
%45 = load i32, i32* %15
%46 = load i32, i32* %10
%47 = sub nsw i32 %45, %46
%48 = icmp slt i32 %44, %47
br i1 %48, label %49, label %57
49: ; preds = %43
%50 = load i64*, i64** %9
%51 = load i32, i32* %13
%52 = sext i32 %51 to i64
%53 = getelementptr inbounds i64, i64* %50, i64 %52
store i64 0, i64* %53
br label %54
54: ; preds = %49
%55 = load i32, i32* %13
%56 = add nsw i32 %55, 1
store i32 %56, i32* %13
br label %43
57: ; preds = %43
store i64 0, i64* %11
%58 = load i32, i32* %10
store i32 %58, i32* %13
br label %59
59: ; preds = %88, %57
%60 = load i32, i32* %13
%61 = load i32, i32* %15
%62 = icmp slt i32 %60, %61
br i1 %62, label %63, label %91
63: ; preds = %59
%64 = load i64*, i64** %7
%65 = load i32, i32* %13
%66 = sext i32 %65 to i64
%67 = getelementptr inbounds i64, i64* %64, i64 %66
%68 = load i64, i64* %67
store i64 %68, i64* %12
%69 = load i64, i64* %12
%70 = load i64*, i64** %9
%71 = load i32, i32* %13
%72 = load i32, i32* %10
%73 = sub nsw i32 %71, %72
%74 = sext i32 %73 to i64
%75 = getelementptr inbounds i64, i64* %70, i64 %74
%76 = load i64, i64* %75
%77 = add i64 %69, %76
%78 = load i64, i64* %11
%79 = add i64 %77, %78
store i64 %79, i64* %12
%80 = load i64, i64* %12
%81 = and i64 %80, 4294967295
%82 = load i64*, i64** %7
%83 = load i32, i32* %13
%84 = sext i32 %83 to i64
%85 = getelementptr inbounds i64, i64* %82, i64 %84
store i64 %81, i64* %85
%86 = load i64, i64* %12
%87 = lshr i64 %86, 32
store i64 %87, i64* %11
br label %88
88: ; preds = %63
%89 = load i32, i32* %13
%90 = add nsw i32 %89, 1
store i32 %90, i32* %13
br label %59
91: ; preds = %59
%92 = load i64, i64* %11
%93 = load i64*, i64** %7
%94 = load i32, i32* %15
%95 = sext i32 %94 to i64
%96 = getelementptr inbounds i64, i64* %93, i64 %95
store i64 %92, i64* %96
%97 = load i32, i32* %15
%98 = sext i32 %97 to i64
%99 = load i64, i64* %11
%100 = add i64 %98, %99
%101 = trunc i64 %100 to i32
ret i32 %101
}

LLVM IR (-O2):
define i32 @bi_sftadd(i32 %0, i64* nocapture %1, i32 %2, i64* nocapture %3, i32 %4) {
%6 = add nsw i32 %4, %2
%7 = icmp sgt i32 %6, %0
%8 = select i1 %7, i32 %6, i32 %0
br i1 %7, label %9, label %18
9: ; preds = %5
%10 = sext i32 %0 to i64
%11 = getelementptr i64, i64* %1, i64 %10
%12 = bitcast i64* %11 to i8*
%13 = xor i32 %0, -1
%14 = add i32 %8, %13
%15 = zext i32 %14 to i64
%16 = shl nuw nsw i64 %15, 3
%17 = add nuw nsw i64 %16, 8
br label %18
18: ; preds = %9, %5
%19 = sub nsw i32 %8, %4
%20 = icmp sgt i32 %19, %2
br i1 %20, label %21, label %31
21: ; preds = %18
%22 = sext i32 %2 to i64
%23 = getelementptr i64, i64* %3, i64 %22
%24 = bitcast i64* %23 to i8*
%25 = xor i32 %4, -1
%26 = add i32 %8, %25
%27 = sub i32 %26, %2
%28 = zext i32 %27 to i64
%29 = shl nuw nsw i64 %28, 3
%30 = add nuw nsw i64 %29, 8
br label %31
31: ; preds = %21, %18
%32 = icmp sgt i32 %8, %4
br i1 %32, label %35, label %33
33: ; preds = %31
%34 = sext i32 %8 to i64
br label %86
35: ; preds = %31
%36 = sext i32 %4 to i64
%37 = sext i32 %8 to i64
%38 = sub nsw i64 %37, %36
%39 = xor i64 %36, -1
%40 = and i64 %38, 1
%41 = sub nsw i64 0, %37
%42 = icmp eq i64 %39, %41
br i1 %42, label %71, label %43
43: ; preds = %35
%44 = and i64 %38, -2
br label %45
45: ; preds = %45, %43
%46 = phi i64 [ %36, %43 ], [ %68, %45 ]
%47 = phi i64 [ 0, %43 ], [ %67, %45 ]
%48 = phi i64 [ 0, %43 ], [ %69, %45 ]
%49 = getelementptr inbounds i64, i64* %1, i64 %46
%50 = load i64, i64* %49
%51 = sub nsw i64 %46, %36
%52 = getelementptr inbounds i64, i64* %3, i64 %51
%53 = load i64, i64* %52
%54 = add i64 %50, %47
%55 = add i64 %54, %53
%56 = and i64 %55, 4294967295
store i64 %56, i64* %49
%57 = lshr i64 %55, 32
%58 = add nsw i64 %46, 1
%59 = getelementptr inbounds i64, i64* %1, i64 %58
%60 = load i64, i64* %59
%61 = sub nsw i64 %58, %36
%62 = getelementptr inbounds i64, i64* %3, i64 %61
%63 = load i64, i64* %62
%64 = add i64 %60, %57
%65 = add i64 %64, %63
%66 = and i64 %65, 4294967295
store i64 %66, i64* %59
%67 = lshr i64 %65, 32
%68 = add nsw i64 %46, 2
%69 = add i64 %48, 2
%70 = icmp eq i64 %69, %44
br i1 %70, label %71, label %45
71: ; preds = %45, %35
%72 = phi i64 [ undef, %35 ], [ %67, %45 ]
%73 = phi i64 [ %36, %35 ], [ %68, %45 ]
%74 = phi i64 [ 0, %35 ], [ %67, %45 ]
%75 = icmp eq i64 %40, 0
br i1 %75, label %86, label %76
76: ; preds = %71
%77 = getelementptr inbounds i64, i64* %1, i64 %73
%78 = load i64, i64* %77
%79 = sub nsw i64 %73, %36
%80 = getelementptr inbounds i64, i64* %3, i64 %79
%81 = load i64, i64* %80
%82 = add i64 %78, %74
%83 = add i64 %82, %81
%84 = and i64 %83, 4294967295
store i64 %84, i64* %77
%85 = lshr i64 %83, 32
br label %86
86: ; preds = %76, %71, %33
%87 = phi i64 [ %34, %33 ], [ %37, %71 ], [ %37, %76 ]
%88 = phi i64 [ 0, %33 ], [ %72, %71 ], [ %85, %76 ]
%89 = getelementptr inbounds i64, i64* %1, i64 %87
store i64 %88, i64* %89
%90 = trunc i64 %88 to i32
%91 = add i32 %8, %90
ret i32 %91
}