From 0259ee0429d48b6eacb1c9eb9c48c003e7d8ab6e Mon Sep 17 00:00:00 2001 From: Justin Ethier Date: Thu, 28 May 2015 21:00:22 -0400 Subject: [PATCH] Added notes for unquote-splicing --- parser.scm | 9 +++++++++ 1 file changed, 9 insertions(+) diff --git a/parser.scm b/parser.scm index da6c9225..fd7d8d29 100644 --- a/parser.scm +++ b/parser.scm @@ -229,6 +229,15 @@ ;; need a way of peeking at the next char here, either ;; via peek-char, or perhaps better by having a larger buffer ;; of input chars. + ;; TODO: + ; buffer must be empty now since it is only 1 char, so + ; call read-char. then: + ; - @ - unquote-splicing processing + ; - eof - error + ; - otherwise, add char back to buffer and do unquote processing + ; + ; can test this below for unquote by doing the read-char and adding + ; back to the buffer ;; Read the next expression and wrap it in a quote (let ((sub (parse fp '() '() #f #f #f 0 ptbl)))