Fcalva/cyclone
1
0
Fork 0
mirror of https://github.com/justinethier/cyclone.git synced 2025-07-12 23:37:38 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Added notes for unquote-splicing

Browse source
This commit is contained in:
Justin Ethier 2015-05-28 21:00:22 -04:00
parent 82519fdd05
commit 0259ee0429
1 changed files with 9 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
parser.scm
View file

@ -229,6 +229,15 @@
;; need a way of peeking at the next char here, either ;; need a way of peeking at the next char here, either
;; via peek-char, or perhaps better by having a larger buffer ;; via peek-char, or perhaps better by having a larger buffer
;; of input chars. ;; 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 ;; Read the next expression and wrap it in a quote
(let ((sub (parse fp '() '() #f #f #f 0 ptbl))) (let ((sub (parse fp '() '() #f #f #f 0 ptbl)))