From 8c36afbcf6be723bf17f06f1c05aa9a2495b5736 Mon Sep 17 00:00:00 2001 From: "init current directory[i]" Date: Thu, 8 Oct 2020 19:33:44 -0400 Subject: push with work-around for gfortran 8 issue --- fpm/src/fpm_command_line.f90 | 1 + 1 file changed, 1 insertion(+) diff --git a/fpm/src/fpm_command_line.f90 b/fpm/src/fpm_command_line.f90 index d8c9598..502db99 100644 --- a/fpm/src/fpm_command_line.f90 +++ b/fpm/src/fpm_command_line.f90 @@ -198,6 +198,7 @@ contains help_text=[character(len=widest) :: help_text, help_help] help_text=[character(len=widest) :: help_text, version_text] case default + ! note help_intrinsics is returning a fixed-length array to avoid compiler issues help_text=[character(len=widest) :: help_text, help_intrinsics( lower( unnamed(i) ) ) ] if(size(help_text).eq.0)then help_text=[character(len=widest) :: help_text, & -- cgit v1.2.3