From b2ef02df5312169ffd4b0cfce00de2e01a5ff508 Mon Sep 17 00:00:00 2001 From: Kai Tietz Date: Fri, 12 Mar 2010 14:43:55 +0000 Subject: format.c (parse_format_list): Add to ERROR, WARNING, SILENT enumerators NOTIFICATION_ prefix. 2010-03-12 Kai Tietz PR/42950 * io/format.c (parse_format_list): Add to ERROR, WARNING, SILENT enumerators NOTIFICATION_ prefix. * runtime/error.c (notification_std): Likewise. * libgfortran.h (notification): Likewise. (GFC_LARGEST_BUF): Check for HAVE_GFC_INTEGER_16. From-SVN: r157407 --- libgfortran/libgfortran.h | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'libgfortran/libgfortran.h') diff --git a/libgfortran/libgfortran.h b/libgfortran/libgfortran.h index 8d1fa4dfec1..6e47a25b22c 100644 --- a/libgfortran/libgfortran.h +++ b/libgfortran/libgfortran.h @@ -586,7 +586,7 @@ st_option; that were given (-std=, -pedantic) we should issue an error, a warning or nothing. */ typedef enum -{ SILENT, WARNING, ERROR } +{ NOTIFICATION_SILENT, NOTIFICATION_WARNING, NOTIFICATION_ERROR } notification; /* This is returned by notify_std and several io functions. */ @@ -701,6 +701,8 @@ internal_proto(show_backtrace); #if defined(HAVE_GFC_REAL_16) #define GFC_LARGEST_BUF (sizeof (GFC_REAL_16)) +#elif defined(HAVE_GFC_INTEGER_16) +#define GFC_LARGEST_BUF (sizeof (GFC_INTEGER_LARGEST)) #elif defined(HAVE_GFC_REAL_10) #define GFC_LARGEST_BUF (sizeof (GFC_REAL_10)) #else -- cgit v1.2.1