diff options
| author | Bernhard Schommer <bernhardschommer@gmail.com> | 2016-08-31 16:36:39 +0200 |
|---|---|---|
| committer | Bernhard Schommer <bernhardschommer@gmail.com> | 2016-08-31 16:36:39 +0200 |
| commit | 8763a45b8a5c6d51d53795573179ba66e479f288 (patch) | |
| tree | a110a9e65ab1361ac605b127c9479397e5df918c /cparser/Cerrors.ml | |
| parent | c7ea6ababa7e57a3b9c529cfc0617072eaed0701 (diff) | |
| download | compcert-8763a45b8a5c6d51d53795573179ba66e479f288.tar.gz compcert-8763a45b8a5c6d51d53795573179ba66e479f288.zip | |
Added conformance warning.
This warning should be triggered if a feature is used that is not
part of the code CompCert C language.
Bug 18004
Diffstat (limited to 'cparser/Cerrors.ml')
| -rw-r--r-- | cparser/Cerrors.ml | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/cparser/Cerrors.ml b/cparser/Cerrors.ml index 046ca9b0..e1848ffa 100644 --- a/cparser/Cerrors.ml +++ b/cparser/Cerrors.ml @@ -67,6 +67,7 @@ type warning_type = | Return_type | Literal_range | Unknown_pragmas + | CompCert_conformance let active_warnings: warning_type list ref = ref [ Unknown_attribute; @@ -106,6 +107,7 @@ let string_of_warning = function | Return_type -> "return-type" | Literal_range -> "literal-range" | Unknown_pragmas -> "unknown-pragmas" + | CompCert_conformance -> "compcert-conformance" let activate_warning w () = if not (List.mem w !active_warnings) then |