We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent beb5459 commit 5cfb7e6Copy full SHA for 5cfb7e6
src/domains/access.ml
@@ -195,7 +195,10 @@ let add_struct side (e:exp) (w:bool) (conf:int) (ty:acc_typ) (lv: (varinfo * off
195
match unrollType ty with
196
| TComp (ci,_) ->
197
let one_field fld =
198
- List.map (fun x -> `Field (fld,x)) (dist_fields fld.ftype)
+ if is_ignorable_type fld.ftype then
199
+ []
200
+ else
201
+ List.map (fun x -> `Field (fld,x)) (dist_fields fld.ftype)
202
in
203
List.concat_map one_field ci.cfields
204
| TArray (t,_,_) ->
0 commit comments