1 2 3 4 5 6 7 8 9 10 11 12
/* { dg-do compile } */ /* { dg-options "-fcilkplus" } */ #define NUMBER 100 int A[NUMBER], B[NUMBER][NUMBER]; int foo (int a); int main () { A[:] = foo (B[:][:]); /* { dg-error "rank mismatch between" } */ A[0] = foo (B[:][:]); /* { dg-error "cannot be scalar when" } */ return 0; }