From 42bdfe78ed03e1ba4355edcac43ad2217631ce05 Mon Sep 17 00:00:00 2001
From: Jeffrey Armstrong <jeff@approximatrix.com>
Date: Sun, 14 Jun 2020 11:02:03 -0400
Subject: end-of-file marker should no longer be printed.

---
 files.f90 | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/files.f90 b/files.f90
index c09e535..b1c24dc 100644
--- a/files.f90
+++ b/files.f90
@@ -203,9 +203,13 @@ contains
             next_line => null()
             walker => walker%next
             
-           call read_line_text(unit_number, walker%text, iostatus)
+            call read_line_text(unit_number, walker%text, iostatus)
             
         end do
+
+        if(is_file_end_marker(walker%text)) then
+            walker%text = " "
+        end if
     
     end function load_unit
 
@@ -239,4 +243,4 @@ contains
     
     end function load_filename
     
-end module file_handling
\ No newline at end of file
+end module file_handling
-- 
cgit v1.2.3