November 17th, 2017

Flammable

We all live in a yellow subroutine

Обнаружил душевный пост на Intel Fortran форуме: у чувака character*8374016 на одной машине прокатывал, а на другой падал в кОру :)
Разные - хоть и близкие - модели Xeon'ов, однако.
Но восьмимегабайтовая строковая константа - это прикольно. Особенно с инициализацией в сабрутине. Хоть и не вполне понятно.
То есть аллоцировать это дело шоб не падало через character(length) :: buf или allocate(character(length)) оно, конечно, можно, но потом же надо деаллоцировать. Поскольку garbage collection в фортран компайлерах, кажись, нет.
Или есть?