Retrieve the entire command line that was used to invoke the program.
Fortran 2003 and later
Subroutine
CALL GET_COMMAND([COMMAND, LENGTH, STATUS])
COMMAND | (Optional) shall be of type CHARACTER and of default kind. |
LENGTH | (Optional) Shall be of type INTEGER and of default kind. |
STATUS | (Optional) Shall be of type INTEGER and of default kind. |
If COMMAND is present, stores the entire command line that was used to invoke the program in COMMAND. If LENGTH is present, it is assigned the length of the command line. If STATUS is present, it is assigned 0 upon success of the command, -1 if COMMAND is too short to store the command line, or a positive value in case of an error.
PROGRAM test_get_command CHARACTER(len=255) :: cmd CALL get_command(cmd) WRITE (*,*) TRIM(cmd) END PROGRAM
© Free Software Foundation
Licensed under the GNU Free Documentation License, Version 1.3.
https://gcc.gnu.org/onlinedocs/gcc-7.2.0/gfortran/GET_005fCOMMAND.html