aboutsummaryrefslogtreecommitdiffstats
path: root/cparser/Elab.ml
diff options
context:
space:
mode:
Diffstat (limited to 'cparser/Elab.ml')
-rw-r--r--cparser/Elab.ml2
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