File tree Expand file tree Collapse file tree 2 files changed +2
-2
lines changed
flang/include/flang/Runtime Expand file tree Collapse file tree 2 files changed +2
-2
lines changed Original file line number Diff line number Diff line change @@ -240,7 +240,7 @@ static RT_NOINLINE_ATTR void PrintBacktrace() {
240
240
241
241
RT_OPTNONE_ATTR void FORTRAN_PROCEDURE_NAME (backtrace)() { PrintBacktrace (); }
242
242
243
- [[noreturn]] void RTNAME (ReportFatalUserError)(
243
+ [[noreturn]] RT_API_ATTRS void RTNAME (ReportFatalUserError)(
244
244
const char *message, const char *source, int line) {
245
245
Fortran::runtime::Terminator{source, line}.Crash (message);
246
246
}
Original file line number Diff line number Diff line change @@ -35,7 +35,7 @@ void FORTRAN_PROCEDURE_NAME(backtrace)(NO_ARGUMENTS);
35
35
36
36
// Crash with an error message when the program dynamically violates a Fortran
37
37
// constraint.
38
- NORETURN void RTNAME (ReportFatalUserError)(
38
+ NORETURN RT_API_ATTRS void RTNAME (ReportFatalUserError)(
39
39
const char *message, const char *source, int line);
40
40
41
41
FORTRAN_EXTERN_C_END
You can’t perform that action at this time.
0 commit comments