Intel® Fortran Compiler 18.0 Developer Guide and Reference
Run-Time Subroutine: Sends a message to the standard error stream, preceded by a specified string, for the last detected error.
USE IFCORE
CALL PERROR (string)
string |
(Input) Character*(*). Message to precede the standard error message. |
The string sent is the same as that given by GERROR.
USE IFCORE
character*24 errtext
errtext = 'In my opinion, '
. . .
! any error message generated by errtext is
! preceded by 'In my opinion, '
Call PERROR (errtext)