diff options
| author | Emilio Jesus Gallego Arias | 2020-11-05 23:04:51 +0100 |
|---|---|---|
| committer | Emilio Jesus Gallego Arias | 2020-11-05 23:04:51 +0100 |
| commit | 16144a42a605c58fc9f9c3b287286d25bfb7b5f3 (patch) | |
| tree | 09386bda4a0a7bcbf61ac7dfca96cd6d5bca6cd6 /pretyping | |
| parent | aa634c706845ada48590ffe6b7fe4d4f1c225b9b (diff) | |
| parent | 65210210e26283f0ca247178ae7524a80d8648ff (diff) | |
Merge PR #12099: More parsing/printing notation/abbreviation consistency for mixed terms and pattern
Reviewed-by: ejgallego
Diffstat (limited to 'pretyping')
| -rw-r--r-- | pretyping/glob_ops.ml | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/pretyping/glob_ops.ml b/pretyping/glob_ops.ml index bdf3495479..f42c754ef5 100644 --- a/pretyping/glob_ops.ml +++ b/pretyping/glob_ops.ml @@ -523,6 +523,7 @@ let rec cases_pattern_of_glob_constr env na c = | Anonymous -> PatVar (Name id) end | GHole (_,_,_) -> PatVar na + | GRef (GlobRef.VarRef id,_) -> PatVar (Name id) | GRef (GlobRef.ConstructRef cstr,_) -> PatCstr (cstr,[],na) | GApp (c, l) -> begin match DAst.get c with |