diff options
Diffstat (limited to '')
-rw-r--r-- | sca-cpp/trunk/modules/scheme/io.hpp | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/sca-cpp/trunk/modules/scheme/io.hpp b/sca-cpp/trunk/modules/scheme/io.hpp index 5e5397cfeb..6928739d17 100644 --- a/sca-cpp/trunk/modules/scheme/io.hpp +++ b/sca-cpp/trunk/modules/scheme/io.hpp @@ -154,7 +154,12 @@ const list<char> readIdentifierHelper(const list<char>& listSoFar, istream& in) } const value readIdentifier(const char chr, istream& in) { - return c_str(listToString(readIdentifierHelper(mklist(chr), in))); + const value val = c_str(listToString(readIdentifierHelper(mklist(chr), in))); + if (val == "false") + return value((bool)false); + if (val == "true") + return value((bool)true); + return val; } const list<char> readStringHelper(const list<char>& listSoFar, istream& in) { |