[Bug libfortran/25305] [4.0 regression]: libfortran failed fma3d in SPEC CPU 2K

[hjl at lucon dot org]

------- Comment #8 from hjl at lucon dot org  2005-12-08 07:32 -------
Revert

@@ -293,7 +292,7 @@ write_block (int length)
 {
   char *dest;

-  if (!is_internal_unit() && current_unit->bytes_left < length)
+  if (current_unit->bytes_left < length)
     {
       generate_error (ERROR_EOR, NULL);
       return NULL;

which wasn't even mentioned in ChangeLog, fixed this regression.


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=25305