@@ -14,21 +14,21 @@ program help_test
14
14
! run a variety of "fpm help" variations and verify expected files are generated
15
15
character (len=* ),parameter :: cmds(* ) = [character (len= 80 ) :: &
16
16
! build manual as pieces using various help commands
17
- ' fpm --help > fpm_scratch_help.txt' ,&
18
- ' fpm help new >> fpm_scratch_help.txt' ,&
19
- ' fpm build --help >> fpm_scratch_help.txt' ,&
20
- ' fpm help run >> fpm_scratch_help.txt' ,&
21
- ' fpm help test >> fpm_scratch_help.txt' ,&
22
- ' fpm help runner >> fpm_scratch_help.txt' ,&
23
- ' fpm help list >> fpm_scratch_help.txt' ,&
24
- ' fpm help help >> fpm_scratch_help.txt' ,&
25
- ' fpm --version >> fpm_scratch_help.txt' ,&
17
+ ' fpm run -- --help > fpm_scratch_help.txt' ,&
18
+ ' fpm run -- help new >> fpm_scratch_help.txt' ,&
19
+ ' fpm run -- build --help >> fpm_scratch_help.txt' ,&
20
+ ' fpm run -- help run >> fpm_scratch_help.txt' ,&
21
+ ' fpm run -- help test >> fpm_scratch_help.txt' ,&
22
+ ' fpm run -- help runner >> fpm_scratch_help.txt' ,&
23
+ ' fpm run -- help list >> fpm_scratch_help.txt' ,&
24
+ ' fpm run -- help help >> fpm_scratch_help.txt' ,&
25
+ ' fpm run -- --version >> fpm_scratch_help.txt' ,&
26
26
! generate manual
27
- ' fpm help manual > fpm_scratch_manual.txt' ]
27
+ ' fpm run -- help manual > fpm_scratch_manual.txt' ]
28
28
29
- ! 'fpm >> fpm_scratch_help.txt',&
30
- ! 'fpm --list >> fpm_scratch_help.txt',&
31
- ! 'fpm list --list >> fpm_scratch_help.txt',&
29
+ ! 'fpm run >> fpm_scratch_help.txt',&
30
+ ! 'fpm run -- --list >> fpm_scratch_help.txt',&
31
+ ! 'fpm run -- list --list >> fpm_scratch_help.txt',&
32
32
character (len=* ),parameter :: names(* )= [character (len= 10 ) :: ' fpm' ,' new' ,' build' ,' run' ,' test' ,' runner' ,' list' ,' help' ]
33
33
34
34
write (* ,' (g0:,1x)' )' TEST help SUBCOMMAND STARTED'
@@ -40,7 +40,7 @@ program help_test
40
40
! check that output has NAME SYNOPSIS DESCRIPTION
41
41
do i= 1 ,size (names)
42
42
write (* ,* )' check ' // names(i)// ' for NAME SYNOPSIS DESCRIPTION'
43
- path= ' fpm help ' // names(i)// ' >fpm_scratch_help.txt'
43
+ path= ' fpm run -- help ' // names(i)// ' >fpm_scratch_help.txt'
44
44
message= ' '
45
45
call execute_command_line(path,exitstat= estat,cmdstat= cstat,cmdmsg= message)
46
46
write (* ,' (*(g0))' )' CMD=' ,path,' EXITSTAT=' ,estat,' CMDSTAT=' ,cstat,' MESSAGE=' ,trim (message)
0 commit comments