------- Comment #21 from dir at lanl dot gov 2005-12-22 14:18 ------- The second example in comment 3 should fail as it does - since it does try read beyond the end of file. As far as I can tell, the FX patch does not fix any of the test cases on the Macintosh and I think that it actually is incorrect. It should actually read -
new = file_position (u->s) - m - 2*sizeof (gfc_offset); as "2*sizeof (gfc_offset)" is the size of the green words before and after the data and m is the size of the data. (m+2*sizeof (gfc_offset)) is the total size of the binary record that is being skipped backwards over. -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=25139
