Skip to content

Commit

Permalink
Update README.org
Browse files Browse the repository at this point in the history
make first ~f~ in §6.1 produce syntax object of form ~(quote (n x ...))~
  • Loading branch information
rogerturner authored and mnieper committed Jul 10, 2023
1 parent 29e8202 commit d872c47
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions README.org
Original file line number Diff line number Diff line change
Expand Up @@ -1364,7 +1364,7 @@ us first define a macro transformer that uses ~syntax-case~:
(lambda (stx)
(syntax-case stx ()
[(_ x ...)
(list #'quote (list (length #'(x ...)) #'(x ...)))])))
(list #'quote (append (list (length #'(x ...))) #'(x ...)))])))
#+END_SRC

We can test this procedure as any other procedure:
Expand All @@ -1375,7 +1375,7 @@ We can test this procedure as any other procedure:

#+RESULTS:
#+begin_example
(#<syntax quote> (3 (#<syntax a> #<syntax b> #<syntax c>)))
(#<syntax quote> (3 #<syntax a> #<syntax b> #<syntax c>))
#+end_example

The output is thus a syntax object of the form ~(quote (n x ...))~
Expand Down

0 comments on commit d872c47

Please sign in to comment.