Skip to content
Browse files

unit was mistakenly bound to int

  • Loading branch information...
1 parent 8d48f87 commit cdece89f7295cd5427151409fad9bb27f74c22df @VictorNicollet committed May 20, 2012
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)

0 comments on commit cdece89

Please sign in to comment.
Something went wrong with that request. Please try again.