Fix ast type returned from parsing "false" atom.

This commit is contained in:
Brian Brooks 2015-03-28 12:33:55 -04:00
parent b7e290a5ff
commit 6f1aa56dcd

View File

@ -64,7 +64,7 @@ Atom : '(' Expr ')' { $2 }
| NUM { Lit (LInt $1) }
| VAR { Var $1 }
| true { Lit (LBool True) }
| false { Lit (LBool True) }
| false { Lit (LBool False) }
{