[Bug fortran/51267] loop optimization error using LOC function

[sgk at troutmask dot apl.washington.edu]

http://gcc.gnu.org/bugzilla/show_bug.cgi?id=51267

--- Comment #6 from Steve Kargl <sgk at troutmask dot apl.washington.edu> 
2011-11-23 17:56:17 UTC ---
On Wed, Nov 23, 2011 at 09:33:37AM +0000, priv123 at hotmail dot fr wrote:
> http://gcc.gnu.org/bugzilla/show_bug.cgi?id=51267
> 
> > -fno-tree-ds seems to do the trick: from the C manual
> 
> with -fno-tree-dse it works as I expect. Thanks.
> 

This does not "fix" the problem.  (Note, I initialized
tab=42 and ius=1; otherwise, you reference an undefined
variables.)

troutmask:sgk[209] gfc4x -o z bug46_stat.f && ./z
tab(1)=-1
tab(2)=-1
tab(3)=-1
tab(4)=-1
tab(5)=-1
tab(6)=-1
 T

troutmask:sgk[210] gfc4x -o z bug46_stat.f -O -fno-tree-dse && ./z
tab(1)=-1
tab(2)=42
tab(3)=42
tab(4)=-1
tab(5)=42
tab(6)=42
 F

trutmask:sgk[212] gfc4x -o z bug46_stat.f -ftree-dse && ./z
tab(1)=-1
tab(2)=-1
tab(3)=-1
tab(4)=-1
tab(5)=-1
tab(6)=-1
 T