aboutsummaryrefslogtreecommitdiffstats
path: root/src/parse.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'src/parse.cpp')
-rw-r--r--src/parse.cpp3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/parse.cpp b/src/parse.cpp
index 2d3ea02..4f2c723 100644
--- a/src/parse.cpp
+++ b/src/parse.cpp
@@ -116,6 +116,7 @@ read_special(Cursor& cur, istream& in)
eat_char(cur, in, 't');
return new ALiteral<bool>(T_BOOL, true, cur);
case 'f':
+ eat_char(cur, in, 'f');
return new ALiteral<bool>(T_BOOL, false, cur);
default:
throw Error(cur, (format("unknown special lexeme `%1%'") % in.peek()).str());
@@ -159,7 +160,7 @@ read_symbol(PEnv& penv, Cursor& cur, istream& in)
/// Read an expression from @a in
const AST*
-PEnv::parse(Cursor& cur, istream& in)
+PEnv::parse(Cursor& cur, istream& in) throw(Error)
{
while (!cin.eof()) {
skip_space(cur, in);