diff options
Diffstat (limited to 'captain/config.f90')
-rw-r--r-- | captain/config.f90 | 14 |
1 files changed, 13 insertions, 1 deletions
diff --git a/captain/config.f90 b/captain/config.f90 index 5ab5930..3d23011 100644 --- a/captain/config.f90 +++ b/captain/config.f90 @@ -34,6 +34,12 @@ implicit none character(*), parameter::STATIC_DIRECTORY_VARIABLE = "static-directory" character(1024)::static_dir + character(*), parameter::INSTRUCTIONS_DIRECTORY_VARIABLE = "instructions-directory" + character(1024)::instructions_dir + + character(*), parameter::SCRIPT_DIRECTORY_VARIABLE = "script-directory" + character(1024)::script_dir + contains subroutine get_variable(str, v) @@ -109,7 +115,13 @@ contains else if(cvariable == STATIC_DIRECTORY_VARIABLE) then static_dir = cvalue - + + else if(cvariable == SCRIPT_DIRECTORY_VARIABLE) then + script_dir = cvalue + + else if(cvariable == INSTRUCTIONS_DIRECTORY_VARIABLE) then + instructions_dir = cvalue + end if end subroutine assign_config |