diff options
Diffstat (limited to 'cparser/Elab.ml')
-rw-r--r-- | cparser/Elab.ml | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/cparser/Elab.ml b/cparser/Elab.ml index 713ea04e..38ef7617 100644 --- a/cparser/Elab.ml +++ b/cparser/Elab.ml @@ -827,8 +827,10 @@ and elab_struct_or_union_info keep_ty kind loc env members attrs = if List.exists ((=) n) acc then error loc "duplicate member '%s'" n; n::acc - end else - acc) [] m); + end else begin + if Cutil.is_composite_type env fld.fld_typ then + warning loc Celeven_extension "anonymous structs/unions are a C11 extension"; + acc end) [] m); (* Check for incomplete types *) let rec check_incomplete = function | [] -> () |