diff options
author | 2016-11-18 20:35:01 +0100 | |
---|---|---|
committer | 2017-02-14 17:28:53 +0100 | |
commit | 3f9e56fcbf479999325a86bbdaeefd6a0be13c65 (patch) | |
tree | f1ef11f826c498a78c9af6ffd9020fbc454dcd5e /engine/termops.ml | |
parent | 8b660087beb2209e52bc4412dc82c6727963c6a5 (diff) |
Equality API using EConstr.
Diffstat (limited to 'engine/termops.ml')
-rw-r--r-- | engine/termops.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/engine/termops.ml b/engine/termops.ml index b7932665a..c2d862f00 100644 --- a/engine/termops.ml +++ b/engine/termops.ml @@ -1074,7 +1074,7 @@ let global_vars_set env sigma constr = let rec filtrec acc c = let acc = match EConstr.kind sigma c with | Var _ | Const _ | Ind _ | Construct _ -> - Id.Set.union (vars_of_global env (EConstr.Unsafe.to_constr c)) acc + Id.Set.union (vars_of_global env (EConstr.to_constr sigma c)) acc | _ -> acc in EConstr.fold sigma filtrec acc c |