diff options
| author | coqbot-app[bot] | 2021-04-21 14:58:51 +0000 |
|---|---|---|
| committer | GitHub | 2021-04-21 14:58:51 +0000 |
| commit | f9996cdaf0b6aee12c5b71432b1edb90dffb569a (patch) | |
| tree | 99bacd74ac72db0aed31f18280b08be3db794db2 /plugins/funind/glob_termops.ml | |
| parent | 3645c06030ed1266fd4160ec7211b4447731bf13 (diff) | |
| parent | eeb142f3c69d2467fbadd7dd1470ac1606b2e5bf (diff) | |
Merge PR #13911: Remove the :> type cast?
Reviewed-by: mattam82
Ack-by: Zimmi48
Diffstat (limited to 'plugins/funind/glob_termops.ml')
| -rw-r--r-- | plugins/funind/glob_termops.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/plugins/funind/glob_termops.ml b/plugins/funind/glob_termops.ml index 164a446fe3..fb00d2f202 100644 --- a/plugins/funind/glob_termops.ml +++ b/plugins/funind/glob_termops.ml @@ -342,7 +342,7 @@ let is_free_in id = | GRec _ -> user_err Pp.(str "Not handled GRec") | GSort _ -> false | GHole _ -> false | GCast (b, (CastConv t | CastVM t | CastNative t)) -> - is_free_in b || is_free_in t | GCast (b, CastCoerce) -> is_free_in b + is_free_in b || is_free_in t | GInt _ | GFloat _ -> false | GArray (_u, t, def, ty) -> Array.exists is_free_in t || is_free_in def || is_free_in ty) |