Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

unit was mistakenly bound to int

  • Loading branch information...
commit cdece89f7295cd5427151409fad9bb27f74c22df 1 parent 8d48f87
@VictorNicollet authored
Showing with 1 addition and 1 deletion.
  1. +1 −1  p4/pp.ml
View
2  p4/pp.ml
@@ -829,7 +829,7 @@ EXTEND Gram
| LIDENT "bool" -> (_loc,`bool)
| LIDENT "float" -> (_loc,`float)
| LIDENT "int" -> (_loc,`int)
- | LIDENT "unit" -> (_loc,`int)
+ | LIDENT "unit" -> (_loc,`unit)
| t = typexpr ; LIDENT "option" -> (_loc, `option t)
| t = typexpr ; LIDENT "list" -> (_loc, `list t)
Please sign in to comment.
Something went wrong with that request. Please try again.