RosettaCodeData/Task/Execute-a-system-command/Fortran/execute-a-system-command-1.f

5 lines
101 B
FortranFixed
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
program SystemTest
integer :: i
call execute_command_line ("ls", exitstat=i)
end program SystemTest