aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/parse.cpp3
-rw-r--r--src/resp.hpp2
2 files changed, 3 insertions, 2 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);
diff --git a/src/resp.hpp b/src/resp.hpp
index 2ae556c..4217f6d 100644
--- a/src/resp.hpp
+++ b/src/resp.hpp
@@ -507,7 +507,7 @@ struct PEnv : private map<const string, const char*> {
}
}
- const AST* parse(Cursor& cur, std::istream& in);
+ const AST* parse(Cursor& cur, std::istream& in) throw(Error);
const AST* expand(const AST* exp);
typedef std::set<std::string> Primitives;