diff options
Diffstat (limited to 'kernel/environ.ml')
| -rw-r--r-- | kernel/environ.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/kernel/environ.ml b/kernel/environ.ml index 6bec01ecd3..f888609353 100644 --- a/kernel/environ.ml +++ b/kernel/environ.ml @@ -255,7 +255,7 @@ let hdchar env c = | IsCoFix (i,(_,ln,_)) -> let id = match List.nth ln i with Name id -> id | _ -> assert false in lowercase_first_char id - | IsMeta _|IsXtra _|IsEvar _|IsMutCase (_, _, _, _) -> "y" + | IsMeta _|IsEvar _|IsMutCase (_, _, _, _) -> "y" in hdrec 0 c |