diff options
Diffstat (limited to 'libgupc/testsuite/libgupc.upc/intrepid/test30.upc')
| -rw-r--r-- | libgupc/testsuite/libgupc.upc/intrepid/test30.upc | 142 |
1 files changed, 142 insertions, 0 deletions
diff --git a/libgupc/testsuite/libgupc.upc/intrepid/test30.upc b/libgupc/testsuite/libgupc.upc/intrepid/test30.upc new file mode 100644 index 00000000000..d9f7f5afd54 --- /dev/null +++ b/libgupc/testsuite/libgupc.upc/intrepid/test30.upc @@ -0,0 +1,142 @@ +/* Copyright (C) 2011-2016 Free Software Foundation, Inc. + This file is part of the UPC runtime library test suite. + Written by Gary Funck <gary@intrepid.com> + and Nenad Vukicevic <nenad@intrepid.com> + +This file is part of GCC. + +GCC is free software; you can redistribute it and/or modify +it under the terms of the GNU General Public License as published by +the Free Software Foundation; either version 3, or (at your option) +any later version. + +GCC is distributed in the hope that it will be useful, +but WITHOUT ANY WARRANTY; without even the implied warranty of +MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +GNU General Public License for more details. + +Under Section 7 of GPL version 3, you are granted additional +permissions described in the GCC Runtime Library Exception, version +3.1, as published by the Free Software Foundation. + +You should have received a copy of the GNU General Public License and +a copy of the GCC Runtime Library Exception along with this program; +see the files COPYING3 and COPYING.RUNTIME respectively. If not, see +<http://www.gnu.org/licenses/>. */ +#include <upc.h> +#include <stdio.h> +#include <stdlib.h> +#include <stdint.h> + +#if defined(__GCC_UPC__) && defined(__UPC_PTS_STRUCT_REP__) + +struct sptr +{ +#if __UPC_VADDR_FIRST__ + __UPC_VADDR_TYPE__ vaddr; + __UPC_THREAD_TYPE__ thread; + __UPC_PHASE_TYPE__ phase; +#else + __UPC_PHASE_TYPE__ phase; + __UPC_THREAD_TYPE__ thread; + __UPC_VADDR_TYPE__ vaddr; +#endif +} +#ifdef __UPC_PTS_ALIGN__ +__attribute__ ((aligned (__UPC_PTS_ALIGN__))) +#endif + ; + +#define EXPECTED_PTS_ALIGN (__alignof (shared int *)) + +struct upc_struct +{ + size_t len; + shared int *addr; +}; + +struct c_struct +{ + size_t len; + struct sptr addr; +}; + +struct upc_struct upc_a[10]; +struct c_struct c_a[10]; + +int pass_fail = 1; + +void +test30 () +{ + if (!MYTHREAD) + { + if (sizeof (struct upc_struct) != sizeof (struct c_struct)) + { + fprintf (stderr, + "Error: struct with PTS has different size (%d)\n" + " than the size of a struct\n" + " with an equivalent representation (%d)\n", + (int) sizeof (struct upc_struct), + (int) sizeof (struct c_struct)); + pass_fail = 0; + } + if (sizeof (upc_a) != sizeof (c_a)) + { + fprintf (stderr, + "Error: array of structs with PTS has different size (%d)\n" + " than the size of an array of structs\n" + " with an equivalent representation (%d)\n", + (int) sizeof (upc_a), (int) sizeof (c_a)); + pass_fail = 0; + } + if (__alignof (upc_a[0].addr) != __alignof (c_a[0].addr)) + { + fprintf (stderr, + "Error: PTS field of struct has different alignment (%d)\n" + " than the similar field of a struct with\n" + " with an equivalent representation (%d)\n", + (int) __alignof (upc_a[0].addr), + (int) __alignof (c_a[0].addr)); + pass_fail = 0; + } + if (__alignof (c_a[0].addr) != EXPECTED_PTS_ALIGN) + { + fprintf (stderr, + "Error: PTS representation field of a struct\n" + " has different alignment (%d)\n" + " than the expected alignment of a PTS (%d)\n", + (int) __alignof (c_a[0].addr), (int) EXPECTED_PTS_ALIGN); + pass_fail = 0; + } + } +} +#endif + +int +main () +{ +#ifdef __GCC_UPC__ + #ifdef __UPC_PTS_STRUCT_REP__ + test30 (); + upc_barrier; + if (!MYTHREAD) + { + printf ("test30: test GUPC struct PTS alignment: %s.\n", + pass_fail ? "passed" : "failed"); + if (!pass_fail) + abort (); + } + #else + if (!MYTHREAD) + printf ("test30: test GUPC struct PTS alignment: passed.\n" + "(This test applies only to GUPC's struct " + "PTS representation)\n"); + #endif +#else + if (!MYTHREAD) + printf ("test30: test GUPC struct PTS alignment: non-applicable\n" + "(This test must be compiled with GUPC)\n"); +#endif + return 0; +} |