X-Git-Url: https://git.libre-soc.org/?a=blobdiff_plain;f=libgfortran%2Flibgfortran.h;h=8c539e0898b7b965b728dcb63e99b6fb662698c3;hb=324276ff9b1aa5128e5cb9f5d43182d1ebab0752;hp=c0db96f02a8aa8fca5c5a6a115f283caf1d12972;hpb=c37b0163fe5307ab508489926114de9cf7e240c1;p=gcc.git diff --git a/libgfortran/libgfortran.h b/libgfortran/libgfortran.h index c0db96f02a8..8c539e0898b 100644 --- a/libgfortran/libgfortran.h +++ b/libgfortran/libgfortran.h @@ -1,5 +1,5 @@ /* Common declarations for all of libgfortran. - Copyright (C) 2002-2019 Free Software Foundation, Inc. + Copyright (C) 2002-2020 Free Software Foundation, Inc. Contributed by Paul Brook , and Andy Vaught @@ -728,6 +728,10 @@ internal_proto(gfc_xtoa); extern _Noreturn void os_error (const char *); iexport_proto(os_error); +extern _Noreturn void os_error_at (const char *, const char *, ...) + __attribute__ ((format (gfc_printf, 2, 3))); +iexport_proto(os_error_at); + extern void show_locus (st_parameter_common *); internal_proto(show_locus);