@@ -323,15 +323,16 @@ subroutine get_command_line_settings(cmd_settings)
323
323
324
324
! If there are additional command-line arguments, remove the additional
325
325
! double quotes which have been added by M_CLI2
326
- call remove_characters_in_set(remaining,set= ' "' )
326
+ val_runner_args= sget(' runner-args' )
327
+ call remove_characters_in_set(val_runner_args,set= ' "' )
327
328
328
329
c_compiler = sget(' c-compiler' )
329
330
cxx_compiler = sget(' cxx-compiler' )
330
331
archiver = sget(' archiver' )
331
332
allocate (fpm_run_settings :: cmd_settings)
332
333
val_runner= sget(' runner' )
333
334
if (specified(' runner' ) .and. val_runner==' ' )val_runner= ' echo'
334
- val_runner_args = sget( ' runner-args ' )
335
+
335
336
cmd_settings= fpm_run_settings(&
336
337
& args= remaining,&
337
338
& profile= val_profile,&
@@ -577,15 +578,16 @@ subroutine get_command_line_settings(cmd_settings)
577
578
578
579
! If there are additional command-line arguments, remove the additional
579
580
! double quotes which have been added by M_CLI2
580
- call remove_characters_in_set(remaining,set= ' "' )
581
+ val_runner_args= sget(' runner-args' )
582
+ call remove_characters_in_set(val_runner_args,set= ' "' )
581
583
582
584
c_compiler = sget(' c-compiler' )
583
585
cxx_compiler = sget(' cxx-compiler' )
584
586
archiver = sget(' archiver' )
585
587
allocate (fpm_test_settings :: cmd_settings)
586
588
val_runner= sget(' runner' )
587
589
if (specified(' runner' ) .and. val_runner==' ' )val_runner= ' echo'
588
- val_runner_args = sget( ' runner-args ' )
590
+
589
591
cmd_settings= fpm_test_settings(&
590
592
& args= remaining, &
591
593
& profile= val_profile, &
0 commit comments