diff options
| author | init current directory[i] <urbanjost@comcast.net> | 2020-10-08 19:33:44 -0400 |
|---|---|---|
| committer | init current directory[i] <urbanjost@comcast.net> | 2020-10-08 19:33:44 -0400 |
| commit | 8c36afbcf6be723bf17f06f1c05aa9a2495b5736 (patch) | |
| tree | 7c53930508f8b34edf47c15c8090a72dcc832dd3 | |
| parent | cd95c91c221b032b46687e713e281bd6a9028cd7 (diff) | |
| download | fpm-8c36afbcf6be723bf17f06f1c05aa9a2495b5736.tar.gz fpm-8c36afbcf6be723bf17f06f1c05aa9a2495b5736.zip | |
push with work-around for gfortran 8 issue
| -rw-r--r-- | fpm/src/fpm_command_line.f90 | 1 |
1 files changed, 1 insertions, 0 deletions
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, & |