fix read_lines in list_files

Author: zoziha

src/fpm_filesystem.F90

@@ -513,7 +513,7 @@ recursive subroutine list_files(dir, files, recurse)
         call fpm_stop(2,'*list_files*:directory listing failed')
     end if
 
-    open (newunit=fh, file=temp_file, status='old')
+    open (newunit=fh, file=temp_file, status='old',access='stream',form='unformatted')
     files = read_lines(fh)
     close(fh,status="delete")
 

src/fpm_source_parsing.f90

@@ -82,7 +82,7 @@ function parse_f_source(f_filename,error) result(f_source)
 
     f_source%file_name = f_filename
 
-    open(newunit=fh,file=f_filename,status='old',access="stream",form="unformatted")
+    open(newunit=fh,file=f_filename,status='old',access='stream',form='unformatted')
     file_lines = read_lines_expanded(fh)
     close(fh)
 
@@ -427,7 +427,7 @@ function parse_c_source(c_filename,error) result(c_source)
     allocate(c_source%modules_provided(0))
     allocate(c_source%parent_modules(0))
 
-    open(newunit=fh,file=c_filename,status='old',access="stream",form="unformatted")
+    open(newunit=fh,file=c_filename,status='old',access='stream',form='unformatted')
     file_lines = read_lines(fh)
     close(fh)