#define NULL ((void *)0)
typedef unsigned long size_t; // Customize by platform.
typedef long intptr_t;
typedef unsigned long uintptr_t;
typedef long scalar_t__; // Either arithmetic or pointer type.
/* By default, we understand bool (as a convenience). */
typedef int bool;
#define false 0
#define true 1

/* Forward declarations */

/* Type definitions */

/* Variables and functions */
int /*<<< orphan*/ acc_device_default;
int /*<<< orphan*/ acc_init(int /*<<< orphan*/);
int /*<<< orphan*/ free(int *);
scalar_t__ malloc(int);
int /*<<< orphan*/ printf(char *, ...);
int main() {
  int i;
  int error;
  int NI;
  int *input;
  float sum;
  NI = 2048;
  acc_init(acc_device_default);
  input = (int *)malloc(NI * sizeof(int));
  for (i = 0; i < NI; i++) {
    input[i] = i % 10;
  }
  sum = 0;
#pragma acc parallel num_workers(1) copyin(input [0:NI])
  {
#pragma acc loop gang vector reduction(+ : sum)
    for (i = 0; i < NI; i++) {
      sum += input[i];
    }
  }
  error = 0;
  int known_sum = 0;
  for (i = 0; i < NI; i++)
    known_sum += input[i];
  if (known_sum != sum)
    error++;
  free(input);
  printf("Test for same line gang vector reduction\n");
  if (error == 0)
    printf("SUCCESSFUL!\n");
  else
    printf("Reduction + FAILED! error=%d\n", error);
}


x86 assembly (clang, -O0):
<main>:
push   %rbp
mov    %rsp,%rbp
sub    $0x20,%rsp
movl   $0x0,-0x4(%rbp)
movl   $0x800,-0x10(%rbp)
mov    0x2e83(%rip),%rax
mov    (%rax),%edi
call   1060 <acc_init@plt>
movslq -0x10(%rbp),%rax
shl    $0x2,%rax
mov    %eax,%edi
call   1050 <malloc@plt>
mov    %rax,-0x18(%rbp)
movl   $0x0,-0x8(%rbp)
mov    -0x8(%rbp),%eax
cmp    -0x10(%rbp),%eax
jge    11ae <main+0x6e>
mov    -0x8(%rbp),%eax
mov    $0xa,%ecx
cltd
idiv   %ecx
mov    -0x18(%rbp),%rax
movslq -0x8(%rbp),%rcx
mov    %edx,(%rax,%rcx,4)
mov    -0x8(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x8(%rbp)
jmp    117e <main+0x3e>
xorps  %xmm0,%xmm0
movss  %xmm0,-0x1c(%rbp)
movl   $0x0,-0x8(%rbp)
mov    -0x8(%rbp),%eax
cmp    -0x10(%rbp),%eax
jge    11ee <main+0xae>
mov    -0x18(%rbp),%rax
movslq -0x8(%rbp),%rcx
cvtsi2ssl (%rax,%rcx,4),%xmm0
addss  -0x1c(%rbp),%xmm0
movss  %xmm0,-0x1c(%rbp)
mov    -0x8(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x8(%rbp)
jmp    11bd <main+0x7d>
movl   $0x0,-0xc(%rbp)
movl   $0x0,-0x20(%rbp)
movl   $0x0,-0x8(%rbp)
mov    -0x8(%rbp),%eax
cmp    -0x10(%rbp),%eax
jge    122e <main+0xee>
mov    -0x18(%rbp),%rax
movslq -0x8(%rbp),%rcx
mov    (%rax,%rcx,4),%eax
add    -0x20(%rbp),%eax
mov    %eax,-0x20(%rbp)
mov    -0x8(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x8(%rbp)
jmp    1203 <main+0xc3>
cvtsi2ssl -0x20(%rbp),%xmm0
ucomiss -0x1c(%rbp),%xmm0
jne    1248 <main+0x108>
jp     1248 <main+0x108>
jmp    1251 <main+0x111>
mov    -0xc(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0xc(%rbp)
mov    -0x18(%rbp),%rdi
call   1030 <free@plt>
lea    0xd9f(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
cmpl   $0x0,-0xc(%rbp)
jne    1285 <main+0x145>
lea    0xdb1(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
jmp    1296 <main+0x156>
mov    -0xc(%rbp),%esi
lea    0xda8(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
mov    -0x4(%rbp),%eax
add    $0x20,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<main>:
sub    $0x28,%rsp
mov    0x2e85(%rip),%rax
mov    (%rax),%edi
call   1070 <acc_init@plt>
mov    $0x2000,%edi
call   1060 <malloc@plt>
movdqa 0xe8c(%rip),%xmm1
xor    %ecx,%ecx
movdqa 0xe91(%rip),%xmm8
movdqa 0xe99(%rip),%xmm2
movdqa 0xea1(%rip),%xmm3
pxor   %xmm4,%xmm4
movdqa 0xea5(%rip),%xmm5
nopl   0x0(%rax,%rax,1)
movdqa %xmm1,%xmm6
paddw  %xmm8,%xmm6
movdqa %xmm1,%xmm7
pmulhuw %xmm2,%xmm7
psrlw  $0x3,%xmm7
pmullw %xmm3,%xmm7
movdqa %xmm1,%xmm0
psubw  %xmm7,%xmm0
movdqa %xmm6,%xmm7
pmulhuw %xmm2,%xmm7
psrlw  $0x3,%xmm7
pmullw %xmm3,%xmm7
psubw  %xmm7,%xmm6
punpcklwd %xmm4,%xmm0
punpcklwd %xmm4,%xmm6
movdqu %xmm0,(%rax,%rcx,4)
movdqu %xmm6,0x10(%rax,%rcx,4)
add    $0x8,%rcx
paddw  %xmm5,%xmm1
cmp    $0x800,%rcx
jne    11a0 <main+0x50>
pxor   %xmm3,%xmm3
mov    $0x3,%ecx
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
xorps  %xmm0,%xmm0
cvtsi2ssl -0xc(%rax,%rcx,4),%xmm0
xorps  %xmm1,%xmm1
cvtsi2ssl -0x8(%rax,%rcx,4),%xmm1
addss  %xmm3,%xmm0
xorps  %xmm2,%xmm2
cvtsi2ssl -0x4(%rax,%rcx,4),%xmm2
addss  %xmm0,%xmm1
xorps  %xmm3,%xmm3
cvtsi2ssl (%rax,%rcx,4),%xmm3
addss  %xmm1,%xmm2
addss  %xmm2,%xmm3
add    $0x4,%rcx
cmp    $0x803,%rcx
jne    1210 <main+0xc0>
movss  %xmm3,0xc(%rsp)
pxor   %xmm0,%xmm0
mov    $0x1c,%ecx
pxor   %xmm1,%xmm1
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
movdqu -0x70(%rax,%rcx,4),%xmm2
paddd  %xmm0,%xmm2
movdqu -0x60(%rax,%rcx,4),%xmm0
paddd  %xmm1,%xmm0
movdqu -0x50(%rax,%rcx,4),%xmm1
movdqu -0x40(%rax,%rcx,4),%xmm3
movdqu -0x30(%rax,%rcx,4),%xmm4
paddd  %xmm1,%xmm4
paddd  %xmm2,%xmm4
movdqu -0x20(%rax,%rcx,4),%xmm2
paddd  %xmm3,%xmm2
paddd  %xmm0,%xmm2
movdqu -0x10(%rax,%rcx,4),%xmm0
paddd  %xmm4,%xmm0
movdqu (%rax,%rcx,4),%xmm1
paddd  %xmm2,%xmm1
add    $0x20,%rcx
cmp    $0x81c,%rcx
jne    1270 <main+0x120>
paddd  %xmm0,%xmm1
pshufd $0xee,%xmm1,%xmm0
paddd  %xmm1,%xmm0
pshufd $0x55,%xmm0,%xmm1
paddd  %xmm0,%xmm1
cvtdq2ps %xmm1,%xmm0
movaps %xmm0,0x10(%rsp)
mov    %rax,%rdi
call   1030 <free@plt>
lea    0xd75(%rip),%rdi
call   1040 <puts@plt>
movss  0xc(%rsp),%xmm0
ucomiss 0x10(%rsp),%xmm0
jne    130d <main+0x1bd>
jnp    1322 <main+0x1d2>
lea    0xd3c(%rip),%rdi
mov    $0x1,%esi
xor    %eax,%eax
call   1050 <printf@plt>
jmp    132e <main+0x1de>
lea    0xd6e(%rip),%rdi
call   1040 <puts@plt>
xor    %eax,%eax
add    $0x28,%rsp
ret

LLVM IR (-O0):
@acc_device_default = global i32 0
@.str = [42 x i8] c"Test for same line gang vector reduction\0A\00"
@.str.1 = [13 x i8] c"SUCCESSFUL!\0A\00"
@.str.2 = [30 x i8] c"Reduction + FAILED! error=%d\0A\00"
define i32 @main() {
%1 = alloca i32
%2 = alloca i32
%3 = alloca i32
%4 = alloca i32
%5 = alloca i32*
%6 = alloca float
%7 = alloca i32
store i32 0, i32* %1
store i32 2048, i32* %4
%8 = load i32, i32* @acc_device_default
%9 = call i32 @acc_init(i32 %8)
%10 = load i32, i32* %4
%11 = sext i32 %10 to i64
%12 = mul i64 %11, 4
%13 = trunc i64 %12 to i32
%14 = call i64 @malloc(i32 %13)
%15 = inttoptr i64 %14 to i32*
store i32* %15, i32** %5
store i32 0, i32* %2
br label %16
16: ; preds = %27, %0
%17 = load i32, i32* %2
%18 = load i32, i32* %4
%19 = icmp slt i32 %17, %18
br i1 %19, label %20, label %30
20: ; preds = %16
%21 = load i32, i32* %2
%22 = srem i32 %21, 10
%23 = load i32*, i32** %5
%24 = load i32, i32* %2
%25 = sext i32 %24 to i64
%26 = getelementptr inbounds i32, i32* %23, i64 %25
store i32 %22, i32* %26
br label %27
27: ; preds = %20
%28 = load i32, i32* %2
%29 = add nsw i32 %28, 1
store i32 %29, i32* %2
br label %16
30: ; preds = %16
store float 0.000000e+00, float* %6
store i32 0, i32* %2
br label %31
31: ; preds = %44, %30
%32 = load i32, i32* %2
%33 = load i32, i32* %4
%34 = icmp slt i32 %32, %33
br i1 %34, label %35, label %47
35: ; preds = %31
%36 = load i32*, i32** %5
%37 = load i32, i32* %2
%38 = sext i32 %37 to i64
%39 = getelementptr inbounds i32, i32* %36, i64 %38
%40 = load i32, i32* %39
%41 = sitofp i32 %40 to float
%42 = load float, float* %6
%43 = fadd float %42, %41
store float %43, float* %6
br label %44
44: ; preds = %35
%45 = load i32, i32* %2
%46 = add nsw i32 %45, 1
store i32 %46, i32* %2
br label %31
47: ; preds = %31
store i32 0, i32* %3
store i32 0, i32* %7
store i32 0, i32* %2
br label %48
48: ; preds = %60, %47
%49 = load i32, i32* %2
%50 = load i32, i32* %4
%51 = icmp slt i32 %49, %50
br i1 %51, label %52, label %63
52: ; preds = %48
%53 = load i32*, i32** %5
%54 = load i32, i32* %2
%55 = sext i32 %54 to i64
%56 = getelementptr inbounds i32, i32* %53, i64 %55
%57 = load i32, i32* %56
%58 = load i32, i32* %7
%59 = add nsw i32 %58, %57
store i32 %59, i32* %7
br label %60
60: ; preds = %52
%61 = load i32, i32* %2
%62 = add nsw i32 %61, 1
store i32 %62, i32* %2
br label %48
63: ; preds = %48
%64 = load i32, i32* %7
%65 = sitofp i32 %64 to float
%66 = load float, float* %6
%67 = fcmp une float %65, %66
br i1 %67, label %68, label %71
68: ; preds = %63
%69 = load i32, i32* %3
%70 = add nsw i32 %69, 1
store i32 %70, i32* %3
br label %71
71: ; preds = %68, %63
%72 = load i32*, i32** %5
%73 = call i32 @free(i32* %72)
%74 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([42 x i8], [42 x i8]* @.str, i64 0, i64 0))
%75 = load i32, i32* %3
%76 = icmp eq i32 %75, 0
br i1 %76, label %77, label %79
77: ; preds = %71
%78 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([13 x i8], [13 x i8]* @.str.1, i64 0, i64 0))
br label %82
79: ; preds = %71
%80 = load i32, i32* %3
%81 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([30 x i8], [30 x i8]* @.str.2, i64 0, i64 0), i32 %80)
br label %82
82: ; preds = %79, %77
%83 = load i32, i32* %1
ret i32 %83
}

LLVM IR (-O2):
@acc_device_default = global i32 0
@.str.2 = [30 x i8] c"Reduction + FAILED! error=%d\0A\00"
@str = [41 x i8] c"Test for same line gang vector reduction\00"
@str.3 = [12 x i8] c"SUCCESSFUL!\00"
define i32 @main() {
%1 = load i32, i32* @acc_device_default
%2 = tail call i32 @acc_init(i32 %1)
%3 = tail call i64 @malloc(i32 8192)
%4 = inttoptr i64 %3 to i32*
br label %5
5: ; preds = %5, %0
%6 = phi i64 [ 0, %0 ], [ %17, %5 ]
%7 = phi <4 x i16> [ <i16 0, i16 1, i16 2, i16 3>, %0 ], [ %18, %5 ]
%8 = add <4 x i16> %7, <i16 4, i16 4, i16 4, i16 4>
%9 = urem <4 x i16> %7, <i16 10, i16 10, i16 10, i16 10>
%10 = urem <4 x i16> %8, <i16 10, i16 10, i16 10, i16 10>
%11 = zext <4 x i16> %9 to <4 x i32>
%12 = zext <4 x i16> %10 to <4 x i32>
%13 = getelementptr inbounds i32, i32* %4, i64 %6
%14 = bitcast i32* %13 to <4 x i32>*
store <4 x i32> %11, <4 x i32>* %14
%15 = getelementptr inbounds i32, i32* %13, i64 4
%16 = bitcast i32* %15 to <4 x i32>*
store <4 x i32> %12, <4 x i32>* %16
%17 = add nuw i64 %6, 8
%18 = add <4 x i16> %7, <i16 8, i16 8, i16 8, i16 8>
%19 = icmp eq i64 %17, 2048
br i1 %19, label %68, label %5
20: ; preds = %68, %20
%21 = phi i64 [ %59, %20 ], [ 0, %68 ]
%22 = phi <4 x i32> [ %57, %20 ], [ zeroinitializer, %68 ]
%23 = phi <4 x i32> [ %58, %20 ], [ zeroinitializer, %68 ]
%24 = getelementptr inbounds i32, i32* %4, i64 %21
%25 = bitcast i32* %24 to <4 x i32>*
%26 = load <4 x i32>, <4 x i32>* %25
%27 = getelementptr inbounds i32, i32* %24, i64 4
%28 = bitcast i32* %27 to <4 x i32>*
%29 = load <4 x i32>, <4 x i32>* %28
%30 = add <4 x i32> %26, %22
%31 = add <4 x i32> %29, %23
%32 = or i64 %21, 8
%33 = getelementptr inbounds i32, i32* %4, i64 %32
%34 = bitcast i32* %33 to <4 x i32>*
%35 = load <4 x i32>, <4 x i32>* %34
%36 = getelementptr inbounds i32, i32* %33, i64 4
%37 = bitcast i32* %36 to <4 x i32>*
%38 = load <4 x i32>, <4 x i32>* %37
%39 = add <4 x i32> %35, %30
%40 = add <4 x i32> %38, %31
%41 = or i64 %21, 16
%42 = getelementptr inbounds i32, i32* %4, i64 %41
%43 = bitcast i32* %42 to <4 x i32>*
%44 = load <4 x i32>, <4 x i32>* %43
%45 = getelementptr inbounds i32, i32* %42, i64 4
%46 = bitcast i32* %45 to <4 x i32>*
%47 = load <4 x i32>, <4 x i32>* %46
%48 = add <4 x i32> %44, %39
%49 = add <4 x i32> %47, %40
%50 = or i64 %21, 24
%51 = getelementptr inbounds i32, i32* %4, i64 %50
%52 = bitcast i32* %51 to <4 x i32>*
%53 = load <4 x i32>, <4 x i32>* %52
%54 = getelementptr inbounds i32, i32* %51, i64 4
%55 = bitcast i32* %54 to <4 x i32>*
%56 = load <4 x i32>, <4 x i32>* %55
%57 = add <4 x i32> %53, %48
%58 = add <4 x i32> %56, %49
%59 = add nuw nsw i64 %21, 32
%60 = icmp eq i64 %59, 2048
br i1 %60, label %61, label %20
61: ; preds = %20
%62 = add <4 x i32> %58, %57
%63 = call i32 @llvm.vector.reduce.add.v4i32(<4 x i32> %62)
%64 = sitofp i32 %63 to float
%65 = fcmp une float %89, %64
%66 = tail call i32 @free(i32* %4)
%67 = tail call i32 @puts(i8* dereferenceable(1) getelementptr inbounds ([41 x i8], [41 x i8]* @str, i64 0, i64 0))
br i1 %65, label %94, label %92
68: ; preds = %5, %68
%69 = phi i64 [ %90, %68 ], [ 0, %5 ]
%70 = phi float [ %89, %68 ], [ 0.000000e+00, %5 ]
%71 = getelementptr inbounds i32, i32* %4, i64 %69
%72 = load i32, i32* %71
%73 = sitofp i32 %72 to float
%74 = fadd float %70, %73
%75 = or i64 %69, 1
%76 = getelementptr inbounds i32, i32* %4, i64 %75
%77 = load i32, i32* %76
%78 = sitofp i32 %77 to float
%79 = fadd float %74, %78
%80 = or i64 %69, 2
%81 = getelementptr inbounds i32, i32* %4, i64 %80
%82 = load i32, i32* %81
%83 = sitofp i32 %82 to float
%84 = fadd float %79, %83
%85 = or i64 %69, 3
%86 = getelementptr inbounds i32, i32* %4, i64 %85
%87 = load i32, i32* %86
%88 = sitofp i32 %87 to float
%89 = fadd float %84, %88
%90 = add nuw nsw i64 %69, 4
%91 = icmp eq i64 %90, 2048
br i1 %91, label %20, label %68
92: ; preds = %61
%93 = tail call i32 @puts(i8* dereferenceable(1) getelementptr inbounds ([12 x i8], [12 x i8]* @str.3, i64 0, i64 0))
br label %96
94: ; preds = %61
%95 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([30 x i8], [30 x i8]* @.str.2, i64 0, i64 0), i32 1)
br label %96
96: ; preds = %94, %92
ret i32 0
}