diff options
Diffstat (limited to 'cparser/Elab.ml')
-rw-r--r-- | cparser/Elab.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/cparser/Elab.ml b/cparser/Elab.ml index 7b2c14e9..845fc210 100644 --- a/cparser/Elab.ml +++ b/cparser/Elab.ml @@ -1184,7 +1184,7 @@ module I = struct let mem f id = try ignore(f env (id,name)); true - with _ -> false in + with Env.Error _ -> false in match ty with | TStruct (id,_) -> mem Env.find_struct_member id |