[flang] Fix length handling in character kind implicit conversion (#74586)
[llvm-project.git] / polly / test / ScopInfo / multidim_only_ivs_3d_reverse.ll
blob25907f2ee79ccb6b912a7bc38998db4cfae2cd8b
1 ; RUN: opt %loadPolly -polly-print-scops -disable-output < %s | FileCheck %s
2 target datalayout = "e-p:64:64:64-i1:8:8-i8:8:8-i16:16:16-i32:32:32-i64:64:64-f32:32:32-f64:64:64-v64:64:64-v128:128:128-a0:0:64-s0:64:64-f80:128:128-n8:16:32:64-S128"
4 ; This test case checks for array access functions where the order in which the
5 ; loop ivs appear in the array subscript does not follow the order of the
6 ; the loops in which they are defined. This (very common) case caused problems
7 ; in the delinearization pass.
9 ; void foo(long n, long m, long o, double A[n][m][o]) {
11 ;   for (long i = 0; i < n; i++)
12 ;     for (long k = 0; k < o; k++)
13 ;       for (long j = 0; j < m; j++)
14 ;         A[i][j][k] = 1.0;
15 ; }
17 ; CHECK:      Assumed Context:
18 ; CHECK-NEXT: [m, o, n] -> {  :  }
20 ; CHECK:      p0: %m
21 ; CHECK-NEXT: p1: %o
22 ; CHECK-NEXT: p2: %n
23 ; CHECK-NOT:  p3
25 ; CHECK:      Statements {
26 ; CHECK-NEXT:     Stmt_for_j
27 ; CHECK-NEXT:         Domain :=
28 ; CHECK-NEXT:             [m, o, n] -> { Stmt_for_j[i0, i1, i2] : 0 <= i0 < n and 0 <= i1 < o and 0 <= i2 < m };
29 ; CHECK-NEXT:         Schedule :=
30 ; CHECK-NEXT:             [m, o, n] -> { Stmt_for_j[i0, i1, i2] -> [i0, i1, i2] };
31 ; CHECK-NEXT:         MustWriteAccess :=    [Reduction Type: NONE] [Scalar: 0]
32 ; CHECK-NEXT:             [m, o, n] -> { Stmt_for_j[i0, i1, i2] -> MemRef_A[i0, i2, i1] };
33 ; CHECK-NEXT: }
35 define void @foo(i64 %n, i64 %m, i64 %o, ptr %A) {
36 entry:
37   br label %for.i
39 for.i:
40   %i = phi i64 [ 0, %entry ], [ %i.inc, %for.i.inc ]
41   br label %for.k
43 for.k:
44   %k = phi i64 [ 0, %for.i ], [ %k.inc, %for.k.inc ]
45   br label %for.j
47 for.j:
48   %j = phi i64 [ 0, %for.k ], [ %j.inc, %for.j.inc ]
49   %subscript0 = mul i64 %i, %m
50   %subscript1 = add i64 %j, %subscript0
51   %subscript2 = mul i64 %subscript1, %o
52   %subscript = add i64 %subscript2, %k
53   %idx = getelementptr inbounds double, ptr %A, i64 %subscript
54   store double 1.0, ptr %idx
55   br label %for.j.inc
57 for.j.inc:
58   %j.inc = add nsw i64 %j, 1
59   %j.exitcond = icmp eq i64 %j.inc, %m
60   br i1 %j.exitcond, label %for.k.inc, label %for.j
62 for.k.inc:
63   %k.inc = add nsw i64 %k, 1
64   %k.exitcond = icmp eq i64 %k.inc, %o
65   br i1 %k.exitcond, label %for.i.inc, label %for.k
67 for.i.inc:
68   %i.inc = add nsw i64 %i, 1
69   %i.exitcond = icmp eq i64 %i.inc, %n
70   br i1 %i.exitcond, label %end, label %for.i
72 end:
73   ret void