[Bug fortran/62142] internal compiler error: Segmentation fault (X = X - L*floor(X/L))

[ondrej.certik at gmail dot com]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=62142

--- Comment #1 from Ondřej Čertík <ondrej.certik at gmail dot com> ---
One can actually isolate it even further (the same stacktrace):

program test_segfault
implicit none
real, allocatable :: X(:)
X = floor(X)
end program