boot2

Playing with the boostrap
git clone https://git.ryansepassi.com/git/boot2.git
Log | Files | Refs | README

28-quasi.scm (210B)

      1 ;; Step 12d: quasiquote / unquote / unquote-splicing.
      2 (define x 5)
      3 (if (= (car (cdr `(1 ,x 3))) 5)
      4   (if (= (length `(1 ,@(list 2 3) 4)) 4)
      5     (if (= (car (cdr (cdr `(1 ,@(list 2 3) 4)))) 3)
      6       42 0) 0) 0)