From 5c908fc0157b9e3637a83dc532ab1bea4fd8b184 Mon Sep 17 00:00:00 2001 From: urbanjost Date: Sun, 5 Sep 2021 12:50:44 -0400 Subject: Expand tabs in source file parsing (#521) --- src/fpm_source_parsing.f90 | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src/fpm_source_parsing.f90') diff --git a/src/fpm_source_parsing.f90 b/src/fpm_source_parsing.f90 index 41137fb..17a99bc 100644 --- a/src/fpm_source_parsing.f90 +++ b/src/fpm_source_parsing.f90 @@ -22,7 +22,7 @@ use fpm_model, only: srcfile_t, & FPM_UNIT_SUBMODULE, FPM_UNIT_SUBPROGRAM, & FPM_UNIT_CSOURCE, FPM_UNIT_CHEADER, FPM_SCOPE_UNKNOWN, & FPM_SCOPE_LIB, FPM_SCOPE_DEP, FPM_SCOPE_APP, FPM_SCOPE_TEST -use fpm_filesystem, only: read_lines +use fpm_filesystem, only: read_lines, read_lines_expanded implicit none private @@ -84,7 +84,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') - file_lines = read_lines(fh) + file_lines = read_lines_expanded(fh) close(fh) ! for efficiency in parsing make a lowercase left-adjusted copy of the file -- cgit v1.2.3