diff options
Diffstat (limited to 'cparser/Diagnostics.ml')
| -rw-r--r-- | cparser/Diagnostics.ml | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/cparser/Diagnostics.ml b/cparser/Diagnostics.ml index 0987068e..172affab 100644 --- a/cparser/Diagnostics.ml +++ b/cparser/Diagnostics.ml @@ -97,6 +97,7 @@ type warning_type = | Static_in_inline | Flexible_array_extensions | Tentative_incomplete_static + | Reduced_alignment (* List of active warnings *) let active_warnings: warning_type list ref = ref [ @@ -157,6 +158,7 @@ let string_of_warning = function | Static_in_inline -> "static-in-inline" | Flexible_array_extensions -> "flexible-array-extensions" | Tentative_incomplete_static -> "tentative-incomplete-static" + | Reduced_alignment -> "reduced-alignment" (* Activate the given warning *) let activate_warning w () = @@ -209,6 +211,7 @@ let wall () = Static_in_inline; Flexible_array_extensions; Tentative_incomplete_static; + Reduced_alignment; ] let wnothing () = @@ -245,6 +248,7 @@ let werror () = Static_in_inline; Flexible_array_extensions; Tentative_incomplete_static; + Reduced_alignment; ] (* Generate the warning key for the message *) @@ -428,6 +432,7 @@ let warning_options = error_option Static_in_inline @ error_option Flexible_array_extensions @ error_option Tentative_incomplete_static @ + error_option Reduced_alignment @ [Exact ("-Wfatal-errors"), Set error_fatal; Exact ("-fdiagnostics-color"), Ignore; (* Either output supports it or no color *) Exact ("-fno-diagnostics-color"), Unset color_diagnostics; |