aboutsummaryrefslogtreecommitdiff
path: root/plugins
diff options
context:
space:
mode:
authorcoqbot-app[bot]2021-04-21 14:58:51 +0000
committerGitHub2021-04-21 14:58:51 +0000
commitf9996cdaf0b6aee12c5b71432b1edb90dffb569a (patch)
tree99bacd74ac72db0aed31f18280b08be3db794db2 /plugins
parent3645c06030ed1266fd4160ec7211b4447731bf13 (diff)
parenteeb142f3c69d2467fbadd7dd1470ac1606b2e5bf (diff)
Merge PR #13911: Remove the :> type cast?
Reviewed-by: mattam82 Ack-by: Zimmi48
Diffstat (limited to 'plugins')
-rw-r--r--plugins/funind/glob_termops.ml2
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)