Next: GETARG, Previous: FTELL, Up: Intrinsic Procedures
GERROR
— Get last system error messagestrerror(3)
in C.
CALL GERROR(RESULT)
RESULT | Shall of type CHARACTER(*) .
|
PROGRAM test_gerror CHARACTER(len=100) :: msg CALL gerror(msg) WRITE(*,*) msg END PROGRAM