RosettaCodeData/Task/Execute-a-system-command/Fortran/execute-a-system-command-1.f
2016-12-05 22:15:40 +01:00

4 lines
101 B
Fortran

program SystemTest
integer :: i
call execute_command_line ("ls", exitstat=i)
end program SystemTest