From patchwork Mon Sep 8 10:49:40 2014 Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit X-Patchwork-Submitter: Alan Lawrence X-Patchwork-Id: 386858 Return-Path: X-Original-To: incoming@patchwork.ozlabs.org Delivered-To: patchwork-incoming@bilbo.ozlabs.org Received: from sourceware.org (server1.sourceware.org [209.132.180.131]) (using TLSv1.2 with cipher ECDHE-RSA-AES256-GCM-SHA384 (256/256 bits)) (No client certificate requested) by ozlabs.org (Postfix) with ESMTPS id 5E3AC1400B2 for ; Mon, 8 Sep 2014 20:49:55 +1000 (EST) DomainKey-Signature: a=rsa-sha1; c=nofws; d=gcc.gnu.org; h=list-id :list-unsubscribe:list-archive:list-post:list-help:sender :message-id:date:from:mime-version:to:subject:content-type; q= dns; s=default; b=LIfJzRDW5rpn+R3jTwL/vGgF2fWW071m6tunCpXuK8y27O MnaGseqDZBI/z239o4PwDp0HbA1a76C0qFc9rBUSXjoBajvau6txkVTCHsL31nUS /wlJxOizzc8/Wp7V/xr+wZ2a4dInAF2vcMrsVKgl9zlyMU9Nd2zic+iqQxmjI= DKIM-Signature: v=1; a=rsa-sha1; c=relaxed; d=gcc.gnu.org; h=list-id :list-unsubscribe:list-archive:list-post:list-help:sender :message-id:date:from:mime-version:to:subject:content-type; s= default; bh=Ol57Rs6rjZgZlV85EA8Jx7REiL8=; b=rv2eCKQJX/gufUQ8Q3qz ERoL14mMfXpQnwQG54sDcavHnE2JglfHfwg76XdamRTs9wMhof27YpbddTX8VclK AFhAxRQ6UeycSqIDmT/xbtoCDUXnQUgzHWHmo9B1KZOBf2UFXMVdQwigvqfSG0VK 1Ne3yXGru+cnWtbj3oGKzWA= Received: (qmail 12722 invoked by alias); 8 Sep 2014 10:49:47 -0000 Mailing-List: contact gcc-patches-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Id: List-Unsubscribe: List-Archive: List-Post: List-Help: Sender: gcc-patches-owner@gcc.gnu.org Delivered-To: mailing list gcc-patches@gcc.gnu.org Received: (qmail 12707 invoked by uid 89); 8 Sep 2014 10:49:47 -0000 Authentication-Results: sourceware.org; auth=none X-Virus-Found: No X-Spam-SWARE-Status: No, score=-1.9 required=5.0 tests=AWL, BAYES_00, SPF_PASS autolearn=ham version=3.3.2 X-HELO: service87.mimecast.com Received: from service87.mimecast.com (HELO service87.mimecast.com) (91.220.42.44) by sourceware.org (qpsmtpd/0.93/v0.84-503-g423c35a) with ESMTP; Mon, 08 Sep 2014 10:49:45 +0000 Received: from cam-owa1.Emea.Arm.com (fw-tnat.cambridge.arm.com [217.140.96.21]) by service87.mimecast.com; Mon, 08 Sep 2014 11:49:42 +0100 Received: from [10.1.209.51] ([10.1.255.212]) by cam-owa1.Emea.Arm.com with Microsoft SMTPSVC(6.0.3790.3959); Mon, 8 Sep 2014 11:49:40 +0100 Message-ID: <540D89C4.6070501@arm.com> Date: Mon, 08 Sep 2014 11:49:40 +0100 From: Alan Lawrence User-Agent: Thunderbird 2.0.0.24 (X11/20101213) MIME-Version: 1.0 To: "gcc-patches@gcc.gnu.org" Subject: [PATCH][AArch64 Testsuite] Add a test of the vldN_lane intrinsic X-MC-Unique: 114090811494201001 X-IsSubscribed: yes At present there is no test coverage of the vld2_lane, vld2q_lane, vld3_lane, vld3q_lane, vld4_lane, vld4q_lane intrinsics. So this adds a test using the vld1 and vst1 intrinsics. Passing on aarch64-none-elf. Failing on aarch64_be-none-elf; I believe because the intrinsic is [modifying the] wrong [lane] and the test is correct: e.g. passing index 6 in an 8-element vector, the vectors returned by vldN_lane differ in element 1 not element 6. I believe this is part of https://gcc.gnu.org/bugzilla/show_bug.cgi?id=59810. gcc/testsuite/ChangeLog: * gcc.target/aarch64/vldN_lane_1.c: New test. diff --git a/gcc/testsuite/gcc.target/aarch64/vldN_lane_1.c b/gcc/testsuite/gcc.target/aarch64/vldN_lane_1.c new file mode 100644 index 0000000000000000000000000000000000000000..e450b7b2b961db56acf5ef5b88e0dc185e81e754 --- /dev/null +++ b/gcc/testsuite/gcc.target/aarch64/vldN_lane_1.c @@ -0,0 +1,97 @@ +/* { dg-do run } */ +/* { dg-options "-O3 -fno-inline" } */ + +#include + +extern void abort (void); + +#define VARIANTS(VARIANT, STRUCT) \ +VARIANT (uint8, , 8, _u8, 6, STRUCT) \ +VARIANT (uint16, , 4, _u16, 3, STRUCT) \ +VARIANT (uint32, , 2, _u32, 1, STRUCT) \ +VARIANT (uint64, , 1, _u64, 0, STRUCT) \ +VARIANT (int8, , 8, _s8, 5, STRUCT) \ +VARIANT (int16, , 4, _s16, 2, STRUCT) \ +VARIANT (int32, , 2, _s32, 0, STRUCT) \ +VARIANT (int64, , 1, _s64, 0, STRUCT) \ +VARIANT (poly8, , 8, _p8, 7, STRUCT) \ +VARIANT (poly16, , 4, _p16, 1, STRUCT) \ +VARIANT (float32, , 2, _f32, 1, STRUCT) \ +VARIANT (float64, , 1, _f64, 0, STRUCT) \ +VARIANT (uint8, q, 16, _u8, 14, STRUCT) \ +VARIANT (uint16, q, 8, _u16, 4, STRUCT) \ +VARIANT (uint32, q, 4, _u32, 3, STRUCT) \ +VARIANT (uint64, q, 2, _u64, 0, STRUCT) \ +VARIANT (int8, q, 16, _s8, 13, STRUCT) \ +VARIANT (int16, q, 8, _s16, 6, STRUCT) \ +VARIANT (int32, q, 4, _s32, 2, STRUCT) \ +VARIANT (int64, q, 2, _s64, 1, STRUCT) \ +VARIANT (poly8, q, 16, _p8, 12, STRUCT) \ +VARIANT (poly16, q, 8, _p16, 5, STRUCT) \ +VARIANT (float32, q, 4, _f32, 1, STRUCT)\ +VARIANT (float64, q, 2, _f64, 0, STRUCT) + +#define TESTMETH(BASE, Q, ELTS, SUFFIX, LANE, STRUCT) \ +int \ +test_vld##STRUCT##Q##_lane##SUFFIX (const BASE##_t *data, \ + const BASE##_t *overwrite) \ +{ \ + BASE##x##ELTS##x##STRUCT##_t vectors; \ + BASE##_t temp[ELTS]; \ + int i,j; \ + for (i = 0; i < STRUCT; i++, data += ELTS) \ + vectors.val[i] = vld1##Q##SUFFIX (data); \ + vectors = vld##STRUCT##Q##_lane##SUFFIX (overwrite, vectors, LANE); \ + while (--i >= 0) \ + { \ + vst1##Q##SUFFIX (temp, vectors.val[i]); \ + data -= ELTS; /* Point at value loaded before vldN_lane. */ \ + for (j = 0; j < ELTS; j++) \ + if (temp[j] != (j == LANE ? overwrite[i] : data[j])) \ + return 1; \ + } \ + return 0; \ +} + + +/* Tests of vld2_dup and vld2q_dup. */ +VARIANTS (TESTMETH, 2) +/* Tests of vld3_dup and vld3q_dup. */ +VARIANTS (TESTMETH, 3) +/* Tests of vld4_dup and vld4q_dup. */ +VARIANTS (TESTMETH, 4) + +#define CHECK(BASE, Q, ELTS, SUFFIX, LANE, STRUCT) \ + if (test_vld##STRUCT##Q##_lane##SUFFIX ((const BASE##_t *)orig_data, \ + BASE##_data) != 0) \ + abort (); + +int +main (int argc, char **argv) +{ + /* Original data for all vector formats. */ + uint64_t orig_data[8] = {0x1234567890abcdefULL, 0x13579bdf02468aceULL, + 0x012389ab4567cdefULL, 0xfeeddadacafe0431ULL, + 0x1032547698badcfeULL, 0xbadbadbadbad0badULL, + 0x0102030405060708ULL, 0x0f0e0d0c0b0a0908ULL}; + + /* Data with which vldN_lane will overwrite some of previous. */ + uint8_t uint8_data[4] = { 7, 11, 13, 17 }; + uint16_t uint16_data[4] = { 257, 263, 269, 271 }; + uint32_t uint32_data[4] = { 65537, 65539, 65543, 65551 }; + uint64_t uint64_data[4] = { 0xdeadbeefcafebabeULL, 0x0123456789abcdefULL, + 0xfedcba9876543210LL, 0xdeadbabecafebeefLL }; + int8_t int8_data[4] = { -1, 3, -5, 7 }; + int16_t int16_data[4] = { 257, -259, 261, -263 }; + int32_t int32_data[4] = { 123456789, -987654321, -135792468, 975318642 }; + int64_t *int64_data = (int64_t *)uint64_data; + poly8_t poly8_data[4] = { 0, 7, 13, 18, }; + poly16_t poly16_data[4] = { 11111, 2222, 333, 44 }; + float32_t float32_data[4] = { 3.14159, 2.718, 1.414, 100.0 }; + float64_t float64_data[4] = { 1.010010001, 12345.6789, -9876.54321, 1.618 }; + + VARIANTS (CHECK, 2); + VARIANTS (CHECK, 3); + VARIANTS (CHECK, 4); + return 0; +}