components/cloog/patches/007-test-isl-jacobi-shared.c.patch
author Stefan Teleman <stefan.teleman@oracle.com>
Thu, 28 Jan 2016 10:36:09 -0800
changeset 5359 57359db17e2a
permissions -rw-r--r--
21459215 introduce ClooG in Solaris
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
5359
57359db17e2a 21459215 introduce ClooG in Solaris
Stefan Teleman <stefan.teleman@oracle.com>
parents:
diff changeset
     1
# This is a secmantically insignificant patch to the test harness.
57359db17e2a 21459215 introduce ClooG in Solaris
Stefan Teleman <stefan.teleman@oracle.com>
parents:
diff changeset
     2
# However, and without it, for this specific version of CLooG,
57359db17e2a 21459215 introduce ClooG in Solaris
Stefan Teleman <stefan.teleman@oracle.com>
parents:
diff changeset
     3
# this test will fail.
57359db17e2a 21459215 introduce ClooG in Solaris
Stefan Teleman <stefan.teleman@oracle.com>
parents:
diff changeset
     4
# No need to send upstream, they already know about it.
57359db17e2a 21459215 introduce ClooG in Solaris
Stefan Teleman <stefan.teleman@oracle.com>
parents:
diff changeset
     5
# Also see 008-test-reservoir-QR.c.patch in this directory
57359db17e2a 21459215 introduce ClooG in Solaris
Stefan Teleman <stefan.teleman@oracle.com>
parents:
diff changeset
     6
--- test/isl/jacobi-shared.c	2014-12-08 05:05:37.000000000 -0500
57359db17e2a 21459215 introduce ClooG in Solaris
Stefan Teleman <stefan.teleman@oracle.com>
parents:
diff changeset
     7
+++ test/isl/jacobi-shared.c	2015-07-23 14:31:33.978548894 -0400
57359db17e2a 21459215 introduce ClooG in Solaris
Stefan Teleman <stefan.teleman@oracle.com>
parents:
diff changeset
     8
@@ -3,7 +3,7 @@
57359db17e2a 21459215 introduce ClooG in Solaris
Stefan Teleman <stefan.teleman@oracle.com>
parents:
diff changeset
     9
   if ((16*floord(t0-1,16) >= -N+g1+t0+1) && (16*floord(g1+t0-3,16) >= -N+g1+t0+1) && (32*floord(t1-1,32) >= -N+g2+t1+1) && (32*floord(g2+t1-3,32) >= t1-32)) {
57359db17e2a 21459215 introduce ClooG in Solaris
Stefan Teleman <stefan.teleman@oracle.com>
parents:
diff changeset
    10
     for (c0=max(-16*floord(t0-1,16)+t0,-16*floord(g1+t0-3,16)+t0);c0<=min(32,N-g1-1);c0+=16) {
57359db17e2a 21459215 introduce ClooG in Solaris
Stefan Teleman <stefan.teleman@oracle.com>
parents:
diff changeset
    11
       for (c1=-32*floord(t1-1,32)+t1;c1<=min(32,N-g2-1);c1+=32) {
57359db17e2a 21459215 introduce ClooG in Solaris
Stefan Teleman <stefan.teleman@oracle.com>
parents:
diff changeset
    12
-        if (c1 >= 1) {
57359db17e2a 21459215 introduce ClooG in Solaris
Stefan Teleman <stefan.teleman@oracle.com>
parents:
diff changeset
    13
+        if ((c1 >= 1) && (c1 <= 32)) {
57359db17e2a 21459215 introduce ClooG in Solaris
Stefan Teleman <stefan.teleman@oracle.com>
parents:
diff changeset
    14
           S1((c0+g1-1),(c1+g2-1));
57359db17e2a 21459215 introduce ClooG in Solaris
Stefan Teleman <stefan.teleman@oracle.com>
parents:
diff changeset
    15
         }
57359db17e2a 21459215 introduce ClooG in Solaris
Stefan Teleman <stefan.teleman@oracle.com>
parents:
diff changeset
    16
       }