iris

small scheme interpreter
git clone git://git.2f30.org/iris
Log | Files | Refs | LICENSE

commit a26726a18cdf3c3ce6beefa11650dc3847cdedda
parent 0c6362ecb363c22fe03ec2736e06928660ddc1b9
Author: sin <sin@2f30.org>
Date:   Wed, 14 May 2014 11:46:41 +0100

Comments to clarify magic numbers

Diffstat:
Mparser.c | 2++
1 file changed, 2 insertions(+), 0 deletions(-)

diff --git a/parser.c b/parser.c @@ -152,10 +152,12 @@ sexpression(FILE *in) case TIdentifier: return identifier(l); case TBoolean: + /* #t or #f */ return boolean(l[1] == 't' ? true : false); case TNumber: return number(strtol(l, 0, 10)); case TCharacter: + /* #\c */ return character(l[2]); case TString: return string(l);