------- Additional Comments From schnetter at aei dot mpg dot de 2005-06-05
19:29 -------
This segmentation fault seems to be caused by the combination of the
declaration
character :: msg(100)
and the statement
write (msg, '("Error in call to GESV, info=",i2)') info
Note that the declaration declares an array of 100 strings, each one character
long. (This is not what I intended.)
-- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=21902
