diff gcc/testsuite/c-c++-common/cilk-plus/AN/rank_mismatch3.c @ 111:04ced10e8804

gcc 7
author kono
date Fri, 27 Oct 2017 22:46:09 +0900
parents
children
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/gcc/testsuite/c-c++-common/cilk-plus/AN/rank_mismatch3.c	Fri Oct 27 22:46:09 2017 +0900
@@ -0,0 +1,19 @@
+/* { dg-options "-fcilkplus" } */
+
+int funct (int x, int y);
+void funct_void (int x, int y, int z);
+int main(void)
+{
+  int y, array[100], array2[100], array3[100][100], array4[100];
+
+  array[:] = ((array2[:] + array[:]) * array4[:]) + array3[:][:]; /* { dg-error "rank mismatch between" } */
+  array[:] = funct (array2[:], array3[:][:]); /* { dg-error "rank mismatch between" } */
+  array[:] = array3[:][:]; /* { dg-error "rank mismatch between" } */
+  array3[:][:] = array[:]; /* { dg-error "rank mismatch between" } */
+  array3[:][:] = array[5]; /* This is OK!  */
+  funct_void (array2[:], array3[:][:], array[:]); /* { dg-error "rank mismatch between" } */
+  funct_void (array2[:], array3[:][:], array[:]); /* { dg-error "rank mismatch between" } */
+  funct_void (array3[:][:], array2[:], array[:]); /* { dg-error "rank mismatch between" }  */
+  funct_void (array2[:], array[:], array3[:][0:10:1]); /* { dg-error "rank mismatch between" } */
+  return 0;
+}