| ! RUN: %flang_fc1 -flang-experimental-hlfir -triple powerpc64le-unknown-unknown -emit-llvm %s -o - | FileCheck --check-prefixes="LLVMIR","LLVMIR-LE" %s |
| ! RUN: %flang_fc1 -flang-experimental-hlfir -triple powerpc64-unknown-unknown -emit-llvm %s -o - | FileCheck --check-prefixes="LLVMIR","LLVMIR-BE" %s |
| ! REQUIRES: target=powerpc{{.*}} |
| |
| !---------------- |
| ! vec_splat |
| !---------------- |
| |
| ! CHECK-LABEL: vec_splat_testi8i8 |
| subroutine vec_splat_testi8i8(x) |
| vector(integer(1)) :: x, y |
| y = vec_splat(x, 0_1) |
| |
| ! LLVMIR: %[[x:.*]] = load <16 x i8>, ptr %{{[0-9]}}, align 16 |
| ! LLVMIR-LE: %[[ele:.*]] = extractelement <16 x i8> %[[x]], i8 0 |
| ! LLVMIR-BE: %[[ele:.*]] = extractelement <16 x i8> %[[x]], i8 15 |
| ! LLVMIR: %[[ins:.*]] = insertelement <16 x i8> undef, i8 %[[ele]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <16 x i8> %[[ins]], <16 x i8> undef, <16 x i32> zeroinitializer |
| ! LLVMIR: store <16 x i8> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_testi8i8 |
| |
| ! CHECK-LABEL: vec_splat_testi8i16 |
| subroutine vec_splat_testi8i16(x) |
| vector(integer(1)) :: x, y |
| y = vec_splat(x, 0_2) |
| |
| ! LLVMIR: %[[x:.*]] = load <16 x i8>, ptr %{{[0-9]}}, align 16 |
| ! LLVMIR-LE: %[[ele:.*]] = extractelement <16 x i8> %[[x]], i16 0 |
| ! LLVMIR-BE: %[[ele:.*]] = extractelement <16 x i8> %[[x]], i16 15 |
| ! LLVMIR: %[[ins:.*]] = insertelement <16 x i8> undef, i8 %[[ele]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <16 x i8> %[[ins]], <16 x i8> undef, <16 x i32> zeroinitializer |
| ! LLVMIR: store <16 x i8> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_testi8i16 |
| |
| ! CHECK-LABEL: vec_splat_testi8i32 |
| subroutine vec_splat_testi8i32(x) |
| vector(integer(1)) :: x, y |
| y = vec_splat(x, 0_4) |
| |
| ! LLVMIR: %[[x:.*]] = load <16 x i8>, ptr %{{[0-9]}}, align 16 |
| ! LLVMIR-LE: %[[ele:.*]] = extractelement <16 x i8> %[[x]], i32 0 |
| ! LLVMIR-BE: %[[ele:.*]] = extractelement <16 x i8> %[[x]], i32 15 |
| ! LLVMIR: %[[ins:.*]] = insertelement <16 x i8> undef, i8 %[[ele]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <16 x i8> %[[ins]], <16 x i8> undef, <16 x i32> zeroinitializer |
| ! LLVMIR: store <16 x i8> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_testi8i32 |
| |
| ! CHECK-LABEL: vec_splat_testi8i64 |
| subroutine vec_splat_testi8i64(x) |
| vector(integer(1)) :: x, y |
| y = vec_splat(x, 0_8) |
| |
| ! LLVMIR: %[[x:.*]] = load <16 x i8>, ptr %{{[0-9]}}, align 16 |
| ! LLVMIR-LE: %[[ele:.*]] = extractelement <16 x i8> %[[x]], i64 0 |
| ! LLVMIR-BE: %[[ele:.*]] = extractelement <16 x i8> %[[x]], i64 15 |
| ! LLVMIR: %[[ins:.*]] = insertelement <16 x i8> undef, i8 %[[ele]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <16 x i8> %[[ins]], <16 x i8> undef, <16 x i32> zeroinitializer |
| ! LLVMIR: store <16 x i8> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_testi8i64 |
| |
| ! CHECK-LABEL: vec_splat_testi16i8 |
| subroutine vec_splat_testi16i8(x) |
| vector(integer(2)) :: x, y |
| y = vec_splat(x, 0_1) |
| |
| ! LLVMIR: %[[x:.*]] = load <8 x i16>, ptr %{{[0-9]}}, align 16 |
| ! LLVMIR-LE: %[[ele:.*]] = extractelement <8 x i16> %[[x]], i8 0 |
| ! LLVMIR-BE: %[[ele:.*]] = extractelement <8 x i16> %[[x]], i8 7 |
| ! LLVMIR: %[[ins:.*]] = insertelement <8 x i16> undef, i16 %[[ele]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <8 x i16> %[[ins]], <8 x i16> undef, <8 x i32> zeroinitializer |
| ! LLVMIR: store <8 x i16> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_testi16i8 |
| |
| ! CHECK-LABEL: vec_splat_testi16i16 |
| subroutine vec_splat_testi16i16(x) |
| vector(integer(2)) :: x, y |
| y = vec_splat(x, 0_2) |
| |
| ! LLVMIR: %[[x:.*]] = load <8 x i16>, ptr %{{[0-9]}}, align 16 |
| ! LLVMIR-LE: %[[ele:.*]] = extractelement <8 x i16> %[[x]], i16 0 |
| ! LLVMIR-BE: %[[ele:.*]] = extractelement <8 x i16> %[[x]], i16 7 |
| ! LLVMIR: %[[ins:.*]] = insertelement <8 x i16> undef, i16 %[[ele]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <8 x i16> %[[ins]], <8 x i16> undef, <8 x i32> zeroinitializer |
| ! LLVMIR: store <8 x i16> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_testi16i16 |
| |
| ! CHECK-LABEL: vec_splat_testi16i32 |
| subroutine vec_splat_testi16i32(x) |
| vector(integer(2)) :: x, y |
| y = vec_splat(x, 0_4) |
| |
| ! LLVMIR: %[[x:.*]] = load <8 x i16>, ptr %{{[0-9]}}, align 16 |
| ! LLVMIR-LE: %[[ele:.*]] = extractelement <8 x i16> %[[x]], i32 0 |
| ! LLVMIR-BE: %[[ele:.*]] = extractelement <8 x i16> %[[x]], i32 7 |
| ! LLVMIR: %[[ins:.*]] = insertelement <8 x i16> undef, i16 %[[ele]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <8 x i16> %[[ins]], <8 x i16> undef, <8 x i32> zeroinitializer |
| ! LLVMIR: store <8 x i16> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_testi16i32 |
| |
| ! CHECK-LABEL: vec_splat_testi16i64 |
| subroutine vec_splat_testi16i64(x) |
| vector(integer(2)) :: x, y |
| y = vec_splat(x, 0_8) |
| |
| ! LLVMIR: %[[x:.*]] = load <8 x i16>, ptr %{{[0-9]}}, align 16 |
| ! LLVMIR-LE: %[[ele:.*]] = extractelement <8 x i16> %[[x]], i64 0 |
| ! LLVMIR-BE: %[[ele:.*]] = extractelement <8 x i16> %[[x]], i64 7 |
| ! LLVMIR: %[[ins:.*]] = insertelement <8 x i16> undef, i16 %[[ele]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <8 x i16> %[[ins]], <8 x i16> undef, <8 x i32> zeroinitializer |
| ! LLVMIR: store <8 x i16> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_testi16i64 |
| |
| ! CHECK-LABEL: vec_splat_testi32i8 |
| subroutine vec_splat_testi32i8(x) |
| vector(integer(4)) :: x, y |
| y = vec_splat(x, 0_1) |
| |
| ! LLVMIR: %[[x:.*]] = load <4 x i32>, ptr %{{[0-9]}}, align 16 |
| ! LLVMIR-LE: %[[ele:.*]] = extractelement <4 x i32> %[[x]], i8 0 |
| ! LLVMIR-BE: %[[ele:.*]] = extractelement <4 x i32> %[[x]], i8 3 |
| ! LLVMIR: %[[ins:.*]] = insertelement <4 x i32> undef, i32 %[[ele]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <4 x i32> %[[ins]], <4 x i32> undef, <4 x i32> zeroinitializer |
| ! LLVMIR: store <4 x i32> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_testi32i8 |
| |
| ! CHECK-LABEL: vec_splat_testi32i16 |
| subroutine vec_splat_testi32i16(x) |
| vector(integer(4)) :: x, y |
| y = vec_splat(x, 0_2) |
| |
| ! LLVMIR: %[[x:.*]] = load <4 x i32>, ptr %{{[0-9]}}, align 16 |
| ! LLVMIR-LE: %[[ele:.*]] = extractelement <4 x i32> %[[x]], i16 0 |
| ! LLVMIR-BE: %[[ele:.*]] = extractelement <4 x i32> %[[x]], i16 3 |
| ! LLVMIR: %[[ins:.*]] = insertelement <4 x i32> undef, i32 %[[ele]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <4 x i32> %[[ins]], <4 x i32> undef, <4 x i32> zeroinitializer |
| ! LLVMIR: store <4 x i32> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_testi32i16 |
| |
| ! CHECK-LABEL: vec_splat_testi32i32 |
| subroutine vec_splat_testi32i32(x) |
| vector(integer(4)) :: x, y |
| y = vec_splat(x, 0_4) |
| |
| ! LLVMIR: %[[x:.*]] = load <4 x i32>, ptr %{{[0-9]}}, align 16 |
| ! LLVMIR-LE: %[[ele:.*]] = extractelement <4 x i32> %[[x]], i32 0 |
| ! LLVMIR-BE: %[[ele:.*]] = extractelement <4 x i32> %[[x]], i32 3 |
| ! LLVMIR: %[[ins:.*]] = insertelement <4 x i32> undef, i32 %[[ele]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <4 x i32> %[[ins]], <4 x i32> undef, <4 x i32> zeroinitializer |
| ! LLVMIR: store <4 x i32> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_testi32i32 |
| |
| ! CHECK-LABEL: vec_splat_testi32i64 |
| subroutine vec_splat_testi32i64(x) |
| vector(integer(4)) :: x, y |
| y = vec_splat(x, 0_8) |
| |
| ! LLVMIR: %[[x:.*]] = load <4 x i32>, ptr %{{[0-9]}}, align 16 |
| ! LLVMIR-LE: %[[ele:.*]] = extractelement <4 x i32> %[[x]], i64 0 |
| ! LLVMIR-BE: %[[ele:.*]] = extractelement <4 x i32> %[[x]], i64 3 |
| ! LLVMIR: %[[ins:.*]] = insertelement <4 x i32> undef, i32 %[[ele]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <4 x i32> %[[ins]], <4 x i32> undef, <4 x i32> zeroinitializer |
| ! LLVMIR: store <4 x i32> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_testi32i64 |
| |
| ! CHECK-LABEL: vec_splat_testi64i8 |
| subroutine vec_splat_testi64i8(x) |
| vector(integer(8)) :: x, y |
| y = vec_splat(x, 0_1) |
| |
| ! LLVMIR: %[[x:.*]] = load <2 x i64>, ptr %{{[0-9]}}, align 16 |
| ! LLVMIR-LE: %[[ele:.*]] = extractelement <2 x i64> %[[x]], i8 0 |
| ! LLVMIR-BE: %[[ele:.*]] = extractelement <2 x i64> %[[x]], i8 1 |
| ! LLVMIR: %[[ins:.*]] = insertelement <2 x i64> undef, i64 %[[ele]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <2 x i64> %[[ins]], <2 x i64> undef, <2 x i32> zeroinitializer |
| ! LLVMIR: store <2 x i64> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_testi64i8 |
| |
| ! CHECK-LABEL: vec_splat_testi64i16 |
| subroutine vec_splat_testi64i16(x) |
| vector(integer(8)) :: x, y |
| y = vec_splat(x, 0_2) |
| |
| ! LLVMIR: %[[x:.*]] = load <2 x i64>, ptr %{{[0-9]}}, align 16 |
| ! LLVMIR-LE: %[[ele:.*]] = extractelement <2 x i64> %[[x]], i16 0 |
| ! LLVMIR-BE: %[[ele:.*]] = extractelement <2 x i64> %[[x]], i16 1 |
| ! LLVMIR: %[[ins:.*]] = insertelement <2 x i64> undef, i64 %[[ele]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <2 x i64> %[[ins]], <2 x i64> undef, <2 x i32> zeroinitializer |
| ! LLVMIR: store <2 x i64> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_testi64i16 |
| |
| ! CHECK-LABEL: vec_splat_testi64i32 |
| subroutine vec_splat_testi64i32(x) |
| vector(integer(8)) :: x, y |
| y = vec_splat(x, 0_4) |
| |
| ! LLVMIR: %[[x:.*]] = load <2 x i64>, ptr %{{[0-9]}}, align 16 |
| ! LLVMIR-LE: %[[ele:.*]] = extractelement <2 x i64> %[[x]], i32 0 |
| ! LLVMIR-BE: %[[ele:.*]] = extractelement <2 x i64> %[[x]], i32 1 |
| ! LLVMIR: %[[ins:.*]] = insertelement <2 x i64> undef, i64 %[[ele]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <2 x i64> %[[ins]], <2 x i64> undef, <2 x i32> zeroinitializer |
| ! LLVMIR: store <2 x i64> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_testi64i32 |
| |
| ! CHECK-LABEL: vec_splat_testi64i64 |
| subroutine vec_splat_testi64i64(x) |
| vector(integer(8)) :: x, y |
| y = vec_splat(x, 0_8) |
| |
| ! LLVMIR: %[[x:.*]] = load <2 x i64>, ptr %{{[0-9]}}, align 16 |
| ! LLVMIR-LE: %[[ele:.*]] = extractelement <2 x i64> %[[x]], i64 0 |
| ! LLVMIR-BE: %[[ele:.*]] = extractelement <2 x i64> %[[x]], i64 1 |
| ! LLVMIR: %[[ins:.*]] = insertelement <2 x i64> undef, i64 %[[ele]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <2 x i64> %[[ins]], <2 x i64> undef, <2 x i32> zeroinitializer |
| ! LLVMIR: store <2 x i64> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_testi64i64 |
| |
| ! CHECK-LABEL: vec_splat_testf32i8 |
| subroutine vec_splat_testf32i8(x) |
| vector(real(4)) :: x, y |
| y = vec_splat(x, 0_1) |
| |
| ! LLVMIR: %[[x:.*]] = load <4 x float>, ptr %{{[0-9]}}, align 16 |
| ! LLVMIR-LE: %[[ele:.*]] = extractelement <4 x float> %[[x]], i8 0 |
| ! LLVMIR-BE: %[[ele:.*]] = extractelement <4 x float> %[[x]], i8 3 |
| ! LLVMIR: %[[ins:.*]] = insertelement <4 x float> undef, float %[[ele]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <4 x float> %[[ins]], <4 x float> undef, <4 x i32> zeroinitializer |
| ! LLVMIR: store <4 x float> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_testf32i8 |
| |
| ! CHECK-LABEL: vec_splat_testf32i16 |
| subroutine vec_splat_testf32i16(x) |
| vector(real(4)) :: x, y |
| y = vec_splat(x, 0_2) |
| |
| ! LLVMIR: %[[x:.*]] = load <4 x float>, ptr %{{[0-9]}}, align 16 |
| ! LLVMIR-LE: %[[ele:.*]] = extractelement <4 x float> %[[x]], i16 0 |
| ! LLVMIR-BE: %[[ele:.*]] = extractelement <4 x float> %[[x]], i16 3 |
| ! LLVMIR: %[[ins:.*]] = insertelement <4 x float> undef, float %[[ele]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <4 x float> %[[ins]], <4 x float> undef, <4 x i32> zeroinitializer |
| ! LLVMIR: store <4 x float> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_testf32i16 |
| |
| ! CHECK-LABEL: vec_splat_testf32i32 |
| subroutine vec_splat_testf32i32(x) |
| vector(real(4)) :: x, y |
| y = vec_splat(x, 0_4) |
| |
| ! LLVMIR: %[[x:.*]] = load <4 x float>, ptr %{{[0-9]}}, align 16 |
| ! LLVMIR-LE: %[[ele:.*]] = extractelement <4 x float> %[[x]], i32 0 |
| ! LLVMIR-BE: %[[ele:.*]] = extractelement <4 x float> %[[x]], i32 3 |
| ! LLVMIR: %[[ins:.*]] = insertelement <4 x float> undef, float %[[ele]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <4 x float> %[[ins]], <4 x float> undef, <4 x i32> zeroinitializer |
| ! LLVMIR: store <4 x float> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_testf32i32 |
| |
| ! CHECK-LABEL: vec_splat_testf32i64 |
| subroutine vec_splat_testf32i64(x) |
| vector(real(4)) :: x, y |
| y = vec_splat(x, 0_8) |
| |
| ! LLVMIR: %[[x:.*]] = load <4 x float>, ptr %{{[0-9]}}, align 16 |
| ! LLVMIR-LE: %[[ele:.*]] = extractelement <4 x float> %[[x]], i64 0 |
| ! LLVMIR-BE: %[[ele:.*]] = extractelement <4 x float> %[[x]], i64 3 |
| ! LLVMIR: %[[ins:.*]] = insertelement <4 x float> undef, float %[[ele]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <4 x float> %[[ins]], <4 x float> undef, <4 x i32> zeroinitializer |
| ! LLVMIR: store <4 x float> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_testf32i64 |
| |
| ! CHECK-LABEL: vec_splat_testf64i8 |
| subroutine vec_splat_testf64i8(x) |
| vector(real(8)) :: x, y |
| y = vec_splat(x, 0_1) |
| |
| ! LLVMIR: %[[x:.*]] = load <2 x double>, ptr %{{[0-9]}}, align 16 |
| ! LLVMIR-LE: %[[ele:.*]] = extractelement <2 x double> %[[x]], i8 0 |
| ! LLVMIR-BE: %[[ele:.*]] = extractelement <2 x double> %[[x]], i8 1 |
| ! LLVMIR: %[[ins:.*]] = insertelement <2 x double> undef, double %[[ele]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <2 x double> %[[ins]], <2 x double> undef, <2 x i32> zeroinitializer |
| ! LLVMIR: store <2 x double> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_testf64i8 |
| |
| ! CHECK-LABEL: vec_splat_testf64i16 |
| subroutine vec_splat_testf64i16(x) |
| vector(real(8)) :: x, y |
| y = vec_splat(x, 0_2) |
| |
| ! LLVMIR: %[[x:.*]] = load <2 x double>, ptr %{{[0-9]}}, align 16 |
| ! LLVMIR-LE: %[[ele:.*]] = extractelement <2 x double> %[[x]], i16 0 |
| ! LLVMIR-BE: %[[ele:.*]] = extractelement <2 x double> %[[x]], i16 1 |
| ! LLVMIR: %[[ins:.*]] = insertelement <2 x double> undef, double %[[ele]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <2 x double> %[[ins]], <2 x double> undef, <2 x i32> zeroinitializer |
| ! LLVMIR: store <2 x double> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_testf64i16 |
| |
| ! CHECK-LABEL: vec_splat_testf64i32 |
| subroutine vec_splat_testf64i32(x) |
| vector(real(8)) :: x, y |
| y = vec_splat(x, 0_4) |
| |
| ! LLVMIR: %[[x:.*]] = load <2 x double>, ptr %{{[0-9]}}, align 16 |
| ! LLVMIR-LE: %[[ele:.*]] = extractelement <2 x double> %[[x]], i32 0 |
| ! LLVMIR-BE: %[[ele:.*]] = extractelement <2 x double> %[[x]], i32 1 |
| ! LLVMIR: %[[ins:.*]] = insertelement <2 x double> undef, double %[[ele]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <2 x double> %[[ins]], <2 x double> undef, <2 x i32> zeroinitializer |
| ! LLVMIR: store <2 x double> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_testf64i32 |
| |
| ! CHECK-LABEL: vec_splat_testf64i64 |
| subroutine vec_splat_testf64i64(x) |
| vector(real(8)) :: x, y |
| y = vec_splat(x, 0_8) |
| |
| ! LLVMIR: %[[x:.*]] = load <2 x double>, ptr %{{[0-9]}}, align 16 |
| ! LLVMIR-LE: %[[ele:.*]] = extractelement <2 x double> %[[x]], i64 0 |
| ! LLVMIR-BE: %[[ele:.*]] = extractelement <2 x double> %[[x]], i64 1 |
| ! LLVMIR: %[[ins:.*]] = insertelement <2 x double> undef, double %[[ele]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <2 x double> %[[ins]], <2 x double> undef, <2 x i32> zeroinitializer |
| ! LLVMIR: store <2 x double> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_testf64i64 |
| |
| ! CHECK-LABEL: vec_splat_testu8i8 |
| subroutine vec_splat_testu8i8(x) |
| vector(unsigned(1)) :: x, y |
| y = vec_splat(x, 0_1) |
| |
| ! LLVMIR: %[[x:.*]] = load <16 x i8>, ptr %{{[0-9]}}, align 16 |
| ! LLVMIR-LE: %[[ele:.*]] = extractelement <16 x i8> %[[x]], i8 0 |
| ! LLVMIR-BE: %[[ele:.*]] = extractelement <16 x i8> %[[x]], i8 15 |
| ! LLVMIR: %[[ins:.*]] = insertelement <16 x i8> undef, i8 %[[ele]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <16 x i8> %[[ins]], <16 x i8> undef, <16 x i32> zeroinitializer |
| ! LLVMIR: store <16 x i8> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_testu8i8 |
| |
| ! CHECK-LABEL: vec_splat_testu8i16 |
| subroutine vec_splat_testu8i16(x) |
| vector(unsigned(1)) :: x, y |
| y = vec_splat(x, 0_2) |
| |
| ! LLVMIR: %[[x:.*]] = load <16 x i8>, ptr %{{[0-9]}}, align 16 |
| ! LLVMIR-LE: %[[ele:.*]] = extractelement <16 x i8> %[[x]], i16 0 |
| ! LLVMIR-BE: %[[ele:.*]] = extractelement <16 x i8> %[[x]], i16 15 |
| ! LLVMIR: %[[ins:.*]] = insertelement <16 x i8> undef, i8 %[[ele]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <16 x i8> %[[ins]], <16 x i8> undef, <16 x i32> zeroinitializer |
| ! LLVMIR: store <16 x i8> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_testu8i16 |
| |
| ! CHECK-LABEL: vec_splat_testu8i32 |
| subroutine vec_splat_testu8i32(x) |
| vector(unsigned(1)) :: x, y |
| y = vec_splat(x, 0_4) |
| |
| ! LLVMIR: %[[x:.*]] = load <16 x i8>, ptr %{{[0-9]}}, align 16 |
| ! LLVMIR-LE: %[[ele:.*]] = extractelement <16 x i8> %[[x]], i32 0 |
| ! LLVMIR-BE: %[[ele:.*]] = extractelement <16 x i8> %[[x]], i32 15 |
| ! LLVMIR: %[[ins:.*]] = insertelement <16 x i8> undef, i8 %[[ele]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <16 x i8> %[[ins]], <16 x i8> undef, <16 x i32> zeroinitializer |
| ! LLVMIR: store <16 x i8> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_testu8i32 |
| |
| ! CHECK-LABEL: vec_splat_testu8i64 |
| subroutine vec_splat_testu8i64(x) |
| vector(unsigned(1)) :: x, y |
| y = vec_splat(x, 0_8) |
| |
| ! LLVMIR: %[[x:.*]] = load <16 x i8>, ptr %{{[0-9]}}, align 16 |
| ! LLVMIR-LE: %[[ele:.*]] = extractelement <16 x i8> %[[x]], i64 0 |
| ! LLVMIR-BE: %[[ele:.*]] = extractelement <16 x i8> %[[x]], i64 15 |
| ! LLVMIR: %[[ins:.*]] = insertelement <16 x i8> undef, i8 %[[ele]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <16 x i8> %[[ins]], <16 x i8> undef, <16 x i32> zeroinitializer |
| ! LLVMIR: store <16 x i8> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_testu8i64 |
| |
| ! CHECK-LABEL: vec_splat_testu16i8 |
| subroutine vec_splat_testu16i8(x) |
| vector(unsigned(2)) :: x, y |
| y = vec_splat(x, 0_1) |
| |
| ! LLVMIR: %[[x:.*]] = load <8 x i16>, ptr %{{[0-9]}}, align 16 |
| ! LLVMIR-LE: %[[ele:.*]] = extractelement <8 x i16> %[[x]], i8 0 |
| ! LLVMIR-BE: %[[ele:.*]] = extractelement <8 x i16> %[[x]], i8 7 |
| ! LLVMIR: %[[ins:.*]] = insertelement <8 x i16> undef, i16 %[[ele]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <8 x i16> %[[ins]], <8 x i16> undef, <8 x i32> zeroinitializer |
| ! LLVMIR: store <8 x i16> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_testu16i8 |
| |
| ! CHECK-LABEL: vec_splat_testu16i16 |
| subroutine vec_splat_testu16i16(x) |
| vector(unsigned(2)) :: x, y |
| y = vec_splat(x, 0_2) |
| |
| ! LLVMIR: %[[x:.*]] = load <8 x i16>, ptr %{{[0-9]}}, align 16 |
| ! LLVMIR-LE: %[[ele:.*]] = extractelement <8 x i16> %[[x]], i16 0 |
| ! LLVMIR-BE: %[[ele:.*]] = extractelement <8 x i16> %[[x]], i16 7 |
| ! LLVMIR: %[[ins:.*]] = insertelement <8 x i16> undef, i16 %[[ele]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <8 x i16> %[[ins]], <8 x i16> undef, <8 x i32> zeroinitializer |
| ! LLVMIR: store <8 x i16> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_testu16i16 |
| |
| ! CHECK-LABEL: vec_splat_testu16i32 |
| subroutine vec_splat_testu16i32(x) |
| vector(unsigned(2)) :: x, y |
| y = vec_splat(x, 0_4) |
| |
| ! LLVMIR: %[[x:.*]] = load <8 x i16>, ptr %{{[0-9]}}, align 16 |
| ! LLVMIR-LE: %[[ele:.*]] = extractelement <8 x i16> %[[x]], i32 0 |
| ! LLVMIR-BE: %[[ele:.*]] = extractelement <8 x i16> %[[x]], i32 7 |
| ! LLVMIR: %[[ins:.*]] = insertelement <8 x i16> undef, i16 %[[ele]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <8 x i16> %[[ins]], <8 x i16> undef, <8 x i32> zeroinitializer |
| ! LLVMIR: store <8 x i16> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_testu16i32 |
| |
| ! CHECK-LABEL: vec_splat_testu16i64 |
| subroutine vec_splat_testu16i64(x) |
| vector(unsigned(2)) :: x, y |
| y = vec_splat(x, 0_8) |
| |
| ! LLVMIR: %[[x:.*]] = load <8 x i16>, ptr %{{[0-9]}}, align 16 |
| ! LLVMIR-LE: %[[ele:.*]] = extractelement <8 x i16> %[[x]], i64 0 |
| ! LLVMIR-BE: %[[ele:.*]] = extractelement <8 x i16> %[[x]], i64 7 |
| ! LLVMIR: %[[ins:.*]] = insertelement <8 x i16> undef, i16 %[[ele]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <8 x i16> %[[ins]], <8 x i16> undef, <8 x i32> zeroinitializer |
| ! LLVMIR: store <8 x i16> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_testu16i64 |
| |
| ! CHECK-LABEL: vec_splat_testu32i8 |
| subroutine vec_splat_testu32i8(x) |
| vector(unsigned(4)) :: x, y |
| y = vec_splat(x, 0_1) |
| |
| ! LLVMIR: %[[x:.*]] = load <4 x i32>, ptr %{{[0-9]}}, align 16 |
| ! LLVMIR-LE: %[[ele:.*]] = extractelement <4 x i32> %[[x]], i8 0 |
| ! LLVMIR-BE: %[[ele:.*]] = extractelement <4 x i32> %[[x]], i8 3 |
| ! LLVMIR: %[[ins:.*]] = insertelement <4 x i32> undef, i32 %[[ele]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <4 x i32> %[[ins]], <4 x i32> undef, <4 x i32> zeroinitializer |
| ! LLVMIR: store <4 x i32> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_testu32i8 |
| |
| ! CHECK-LABEL: vec_splat_testu32i16 |
| subroutine vec_splat_testu32i16(x) |
| vector(unsigned(4)) :: x, y |
| y = vec_splat(x, 0_2) |
| |
| ! LLVMIR: %[[x:.*]] = load <4 x i32>, ptr %{{[0-9]}}, align 16 |
| ! LLVMIR-LE: %[[ele:.*]] = extractelement <4 x i32> %[[x]], i16 0 |
| ! LLVMIR-BE: %[[ele:.*]] = extractelement <4 x i32> %[[x]], i16 3 |
| ! LLVMIR: %[[ins:.*]] = insertelement <4 x i32> undef, i32 %[[ele]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <4 x i32> %[[ins]], <4 x i32> undef, <4 x i32> zeroinitializer |
| ! LLVMIR: store <4 x i32> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_testu32i16 |
| |
| ! CHECK-LABEL: vec_splat_testu32i32 |
| subroutine vec_splat_testu32i32(x) |
| vector(unsigned(4)) :: x, y |
| y = vec_splat(x, 0_4) |
| |
| ! LLVMIR: %[[x:.*]] = load <4 x i32>, ptr %{{[0-9]}}, align 16 |
| ! LLVMIR-LE: %[[ele:.*]] = extractelement <4 x i32> %[[x]], i32 0 |
| ! LLVMIR-BE: %[[ele:.*]] = extractelement <4 x i32> %[[x]], i32 3 |
| ! LLVMIR: %[[ins:.*]] = insertelement <4 x i32> undef, i32 %[[ele]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <4 x i32> %[[ins]], <4 x i32> undef, <4 x i32> zeroinitializer |
| ! LLVMIR: store <4 x i32> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_testu32i32 |
| |
| ! CHECK-LABEL: vec_splat_testu32i64 |
| subroutine vec_splat_testu32i64(x) |
| vector(unsigned(4)) :: x, y |
| y = vec_splat(x, 0_8) |
| |
| ! LLVMIR: %[[x:.*]] = load <4 x i32>, ptr %{{[0-9]}}, align 16 |
| ! LLVMIR-LE: %[[ele:.*]] = extractelement <4 x i32> %[[x]], i64 0 |
| ! LLVMIR-BE: %[[ele:.*]] = extractelement <4 x i32> %[[x]], i64 3 |
| ! LLVMIR: %[[ins:.*]] = insertelement <4 x i32> undef, i32 %[[ele]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <4 x i32> %[[ins]], <4 x i32> undef, <4 x i32> zeroinitializer |
| ! LLVMIR: store <4 x i32> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_testu32i64 |
| |
| ! CHECK-LABEL: vec_splat_testu64i8 |
| subroutine vec_splat_testu64i8(x) |
| vector(unsigned(8)) :: x, y |
| y = vec_splat(x, 0_1) |
| |
| ! LLVMIR: %[[x:.*]] = load <2 x i64>, ptr %{{[0-9]}}, align 16 |
| ! LLVMIR-LE: %[[ele:.*]] = extractelement <2 x i64> %[[x]], i8 0 |
| ! LLVMIR-BE: %[[ele:.*]] = extractelement <2 x i64> %[[x]], i8 1 |
| ! LLVMIR: %[[ins:.*]] = insertelement <2 x i64> undef, i64 %[[ele]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <2 x i64> %[[ins]], <2 x i64> undef, <2 x i32> zeroinitializer |
| ! LLVMIR: store <2 x i64> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_testu64i8 |
| |
| ! CHECK-LABEL: vec_splat_testu64i16 |
| subroutine vec_splat_testu64i16(x) |
| vector(unsigned(8)) :: x, y |
| y = vec_splat(x, 0_2) |
| |
| ! LLVMIR: %[[x:.*]] = load <2 x i64>, ptr %{{[0-9]}}, align 16 |
| ! LLVMIR-LE: %[[ele:.*]] = extractelement <2 x i64> %[[x]], i16 0 |
| ! LLVMIR-BE: %[[ele:.*]] = extractelement <2 x i64> %[[x]], i16 1 |
| ! LLVMIR: %[[ins:.*]] = insertelement <2 x i64> undef, i64 %[[ele]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <2 x i64> %[[ins]], <2 x i64> undef, <2 x i32> zeroinitializer |
| ! LLVMIR: store <2 x i64> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_testu64i16 |
| |
| ! CHECK-LABEL: vec_splat_testu64i32 |
| subroutine vec_splat_testu64i32(x) |
| vector(unsigned(8)) :: x, y |
| y = vec_splat(x, 0_4) |
| |
| ! LLVMIR: %[[x:.*]] = load <2 x i64>, ptr %{{[0-9]}}, align 16 |
| ! LLVMIR-LE: %[[ele:.*]] = extractelement <2 x i64> %[[x]], i32 0 |
| ! LLVMIR-BE: %[[ele:.*]] = extractelement <2 x i64> %[[x]], i32 1 |
| ! LLVMIR: %[[ins:.*]] = insertelement <2 x i64> undef, i64 %[[ele]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <2 x i64> %[[ins]], <2 x i64> undef, <2 x i32> zeroinitializer |
| ! LLVMIR: store <2 x i64> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_testu64i32 |
| |
| ! CHECK-LABEL: vec_splat_testu64i64 |
| subroutine vec_splat_testu64i64(x) |
| vector(unsigned(8)) :: x, y |
| y = vec_splat(x, 0_8) |
| |
| ! LLVMIR: %[[x:.*]] = load <2 x i64>, ptr %{{[0-9]}}, align 16 |
| ! LLVMIR-LE: %[[ele:.*]] = extractelement <2 x i64> %[[x]], i64 0 |
| ! LLVMIR-BE: %[[ele:.*]] = extractelement <2 x i64> %[[x]], i64 1 |
| ! LLVMIR: %[[ins:.*]] = insertelement <2 x i64> undef, i64 %[[ele]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <2 x i64> %[[ins]], <2 x i64> undef, <2 x i32> zeroinitializer |
| ! LLVMIR: store <2 x i64> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_testu64i64 |
| |
| !---------------- |
| ! vec_splats |
| !---------------- |
| |
| ! CHECK-LABEL: vec_splats_testi8 |
| subroutine vec_splats_testi8(x) |
| integer(1) :: x |
| vector(integer(1)) :: y |
| y = vec_splats(x) |
| |
| ! LLVMIR: %[[x:.*]] = load i8, ptr %{{[0-9]}}, align 1 |
| ! LLVMIR: %[[ins:.*]] = insertelement <16 x i8> undef, i8 %[[x]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <16 x i8> %[[ins]], <16 x i8> undef, <16 x i32> zeroinitializer |
| ! LLVMIR: store <16 x i8> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splats_testi8 |
| |
| ! CHECK-LABEL: vec_splats_testi16 |
| subroutine vec_splats_testi16(x) |
| integer(2) :: x |
| vector(integer(2)) :: y |
| y = vec_splats(x) |
| |
| ! LLVMIR: %[[x:.*]] = load i16, ptr %{{[0-9]}}, align 2 |
| ! LLVMIR: %[[ins:.*]] = insertelement <8 x i16> undef, i16 %[[x]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <8 x i16> %[[ins]], <8 x i16> undef, <8 x i32> zeroinitializer |
| ! LLVMIR: store <8 x i16> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splats_testi16 |
| |
| ! CHECK-LABEL: vec_splats_testi32 |
| subroutine vec_splats_testi32(x) |
| integer(4) :: x |
| vector(integer(4)) :: y |
| y = vec_splats(x) |
| |
| ! LLVMIR: %[[x:.*]] = load i32, ptr %{{[0-9]}}, align 4 |
| ! LLVMIR: %[[ins:.*]] = insertelement <4 x i32> undef, i32 %[[x]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <4 x i32> %[[ins]], <4 x i32> undef, <4 x i32> zeroinitializer |
| ! LLVMIR: store <4 x i32> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splats_testi32 |
| |
| ! CHECK-LABEL: vec_splats_testi64 |
| subroutine vec_splats_testi64(x) |
| integer(8) :: x |
| vector(integer(8)) :: y |
| y = vec_splats(x) |
| |
| ! LLVMIR: %[[x:.*]] = load i64, ptr %{{[0-9]}}, align 8 |
| ! LLVMIR: %[[ins:.*]] = insertelement <2 x i64> undef, i64 %[[x]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <2 x i64> %[[ins]], <2 x i64> undef, <2 x i32> zeroinitializer |
| ! LLVMIR: store <2 x i64> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splats_testi64 |
| |
| ! CHECK-LABEL: vec_splats_testf32 |
| subroutine vec_splats_testf32(x) |
| real(4) :: x |
| vector(real(4)) :: y |
| y = vec_splats(x) |
| |
| ! LLVMIR: %[[x:.*]] = load float, ptr %{{[0-9]}}, align 4 |
| ! LLVMIR: %[[ins:.*]] = insertelement <4 x float> undef, float %[[x]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <4 x float> %[[ins]], <4 x float> undef, <4 x i32> zeroinitializer |
| ! LLVMIR: store <4 x float> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splats_testf32 |
| |
| ! CHECK-LABEL: vec_splats_testf64 |
| subroutine vec_splats_testf64(x) |
| real(8) :: x |
| vector(real(8)) :: y |
| y = vec_splats(x) |
| |
| ! LLVMIR: %[[x:.*]] = load double, ptr %{{[0-9]}}, align 8 |
| ! LLVMIR: %[[ins:.*]] = insertelement <2 x double> undef, double %[[x]], i32 0 |
| ! LLVMIR: %[[y:.*]] = shufflevector <2 x double> %[[ins]], <2 x double> undef, <2 x i32> zeroinitializer |
| ! LLVMIR: store <2 x double> %[[y]], ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splats_testf64 |
| |
| ! CHECK-LABEL: vec_splat_s32testi8 |
| subroutine vec_splat_s32testi8() |
| vector(integer(4)) :: y |
| y = vec_splat_s32(7_1) |
| |
| ! LLVMIR: store <4 x i32> <i32 7, i32 7, i32 7, i32 7>, ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_s32testi8 |
| |
| ! CHECK-LABEL: vec_splat_s32testi16 |
| subroutine vec_splat_s32testi16() |
| vector(integer(4)) :: y |
| y = vec_splat_s32(7_2) |
| |
| ! LLVMIR: store <4 x i32> <i32 7, i32 7, i32 7, i32 7>, ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_s32testi16 |
| |
| ! CHECK-LABEL: vec_splat_s32testi32 |
| subroutine vec_splat_s32testi32() |
| vector(integer(4)) :: y |
| y = vec_splat_s32(7_4) |
| |
| ! LLVMIR: store <4 x i32> <i32 7, i32 7, i32 7, i32 7>, ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_s32testi32 |
| |
| ! CHECK-LABEL: vec_splat_s32testi64 |
| subroutine vec_splat_s32testi64() |
| vector(integer(4)) :: y |
| y = vec_splat_s32(7_8) |
| |
| ! LLVMIR: store <4 x i32> <i32 7, i32 7, i32 7, i32 7>, ptr %{{[0-9]}}, align 16 |
| end subroutine vec_splat_s32testi64 |