https://bugzilla.novell.com/show_bug.cgi?id=891349 https://bugzilla.novell.com/show_bug.cgi?id=891349#c1 --- Comment #1 from Dr. Shamsundar <shamsundar@uh.edu> 2014-08-11 18:12:52 UTC --- Postscript: Here is a short Fortran program that exposes this bug. program test_free_bug implicit none real, dimension (:), allocatable :: w integer :: dim, err, locw, mskadr dim = 100 print *, "Linear dimension of the matrix", dim allocate(w(dim), stat=err) if (err /= 0) print *, "w: allocation request denied" locw = LOC(w) write(*,'(A,Z16.16)')'Address of w after allocation = 0X',locw mskadr=IAND(locw,Z'FC000000') if(mskadr.eq.0)stop 'masked adrs =zero, will crash free() on Linux libc.so.6' if (allocated(w)) deallocate(w, stat=err) if (err /= 0) print *, "w: deallocation request denied" end program test_free_bug -- Configure bugmail: https://bugzilla.novell.com/userprefs.cgi?tab=email ------- You are receiving this mail because: ------- You are on the CC list for the bug.