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

--- Comment #11 from Neil Carlson <neil.n.carlson at gmail dot com> ---
One more missed file, an include file included by
literal_character_constant_1_x.F.  Here's the patch:

diff --git a/literal_character_constant_1.inc
b/literal_character_constant_1.inc
index ba24966..8beea79 100644
--- a/literal_character_constant_1.inc
+++ b/literal_character_constant_1.inc
@@ -9,12 +9,12 @@ c A tab is between 8 and 9.
       write(fil,'(a)') c
 #ifdef LL_NONE
       if(fil.ne. "12345678     9")
-     &  call abort
+     &  call stop 1
 #else
       if(fil.ne.
      &"1234567                                                      8  9"
      &)
-     &  call abort
+     &  call stop 2
 #endif
       end

Reply via email to