Processing of warning and error preprocessor directives This module implements the core logic for handling messages (either as warning or errors).
| subroutine, public handle_error | ( | character(*), intent(in) | line, |
| type(macro), dimension(:), intent(inout), allocatable | macros, | ||
| character(*), intent(in) | token ) |
Process a error directive. It causes the preprocessor to report a fatal error that stops the preprocessor. The string forming the rest of the line following ‘::error’ is printed in the standard error.
| [in] | line | Full source line containing the define |
| [in,out] | macros | Current macro table (updated in-place) |
| [in] | token | Usually 'DEFINE' – keyword matched in uppercase |
Remarks
Definition at line 48 of file diagnostics.f90.
| subroutine, public handle_warning | ( | character(*), intent(in) | line, |
| type(macro), dimension(:), intent(inout), allocatable | macros, | ||
| character(*), intent(in) | token ) |
Process a warning directive. It causes the preprocessor to report a warning that does not stop the preprocessor. The string forming the rest of the line following ‘::warning’ is printed in the standard output.
| [in] | line | Full source line containing the undef |
| [in,out] | macros | Current macro table (updated in-place) |
| [in] | token | Usually 'UNDEF' – keyword matched in uppercase |
Remarks
Definition at line 68 of file diagnostics.f90.