diff options
Diffstat (limited to 'parsing/pcoq.ml')
| -rw-r--r-- | parsing/pcoq.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/parsing/pcoq.ml b/parsing/pcoq.ml index 4b42c59d54..d1a6e0eda2 100644 --- a/parsing/pcoq.ml +++ b/parsing/pcoq.ml @@ -165,7 +165,7 @@ struct | Tok.IDENT ident when not (List.mem_f String.equal ident idents) -> Some (n + 1) | _ -> None - let lk_int tok n strm = match stream_nth n strm with + let lk_nat tok n strm = match stream_nth n strm with | Tok.NUMERAL { NumTok.int = _; frac = ""; exp = "" } -> Some (n + 1) | _ -> None |