http://gcc.gnu.org/bugzilla/show_bug.cgi?id=58425
Tobias Burnus changed:
What|Removed |Added
Status|UNCONFIRMED |RESOLVED
Resolution|---
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=58425
--- Comment #2 from Tobias Burnus ---
The code works when one adds a line to vortex.F90's manual_finalizer:
do while(associated(current%next))
next => current%next ! start after break in chain
deallocate(current)
current=>ne
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=58425
--- Comment #1 from Dominique d'Humieres ---
Works for me:
[macbook] f90/bug% gfcc ~/test/Rouson/ssdSource/chapter05/hermetic/hermetic.F90
-c -Ofast
[macbook] f90/bug% gfcc ~/test/Rouson/ssdSource/chapter05/hermetic/vortex.F90
-c -Ofast
[macbook]