diff options
author | sayle <sayle@138bc75d-0d04-0410-961f-82ee72b054a4> | 2006-03-04 02:40:45 +0000 |
---|---|---|
committer | sayle <sayle@138bc75d-0d04-0410-961f-82ee72b054a4> | 2006-03-04 02:40:45 +0000 |
commit | 17c67d089524450757f96ed2b5a91feba5c4642d (patch) | |
tree | 9c3b23bb499a01fd8085ed493ec3aa8a73139b9a /gcc/fortran/dependency.c | |
parent | f9a71fe5ccc84e5649d422fce5e981d6cf0bbdd7 (diff) | |
download | gcc-17c67d089524450757f96ed2b5a91feba5c4642d.tar.gz |
* dependency.c (gfc_check_element_vs_element): Revert last change.
* gfortran.dg/dependency_9.f90: Remove for the time being.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@111703 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/fortran/dependency.c')
-rw-r--r-- | gcc/fortran/dependency.c | 8 |
1 files changed, 1 insertions, 7 deletions
diff --git a/gcc/fortran/dependency.c b/gcc/fortran/dependency.c index 129caa361ad..187b2077716 100644 --- a/gcc/fortran/dependency.c +++ b/gcc/fortran/dependency.c @@ -739,14 +739,8 @@ gfc_check_element_vs_element (gfc_ref * lref, gfc_ref * rref, int n) i = gfc_dep_compare_expr (r_start, l_start); if (i == 0) return GFC_DEP_EQUAL; - /* Treat two scalar variables as potentially equal. This allows - us to prove that a(i,:) and a(j,:) have no dependency. See - Gerald Roth, "Evaluation of Array Syntax Dependence Analysis", - Proceedings of the International Conference on Parallel and - Distributed Processing Techniques and Applications (PDPTA2001), - Las Vegas, Nevada, June 2001. This used to be GFC_DEP_OVERLAP. */ if (i == -2) - return GFC_DEP_EQUAL; + return GFC_DEP_OVERLAP; return GFC_DEP_NODEP; } |