Broken example code: #14

https://github.com/mbutterick/beautiful-racket/blob/master/beautiful-racket-lib/br/scribblings/br.scrbl

Unless I'm mistaken in reading the docs for define-macro, these two examples are not meant to include errors:

> (sandwich brie ham please)
eval:30:0: syntax-parse: literal is unbound in phase 0
(phase 0 relative to the enclosing module)
  at: sandwich
  in: (syntax-parse (syntax-case stx () (any (syntax any)))
#:literals (sandwich) #:datum-literals (please) ((sandwich
TOPPING FILLING please) (begin (syntax (format "I love ~a
with ~a." (quote FILLING) (quote TOPPING))))) (else
(raise-syntax-error (quote san...
> (sandwich banana bacon please)=
eval:30:0: syntax-parse: literal is unbound in phase 0
(phase 0 relative to the enclosing module)
  at: sandwich
  in: (syntax-parse (syntax-case stx () (any (syntax any)))
#:literals (sandwich) #:datum-literals (please) ((sandwich
TOPPING FILLING please) (begin (syntax (format "I love ~a
with ~a." (quote FILLING) (quote TOPPING))))) (else
(raise-syntax-error (quote san...

https://github.com/mbutterick/beautiful-racket/blob/master/beautiful-racket-lib/br/scribblings/br.scrbl Unless I'm mistaken in reading the docs for `define-macro`, these two examples are not meant to include errors: ``` > (sandwich brie ham please) eval:30:0: syntax-parse: literal is unbound in phase 0 (phase 0 relative to the enclosing module) at: sandwich in: (syntax-parse (syntax-case stx () (any (syntax any))) #:literals (sandwich) #:datum-literals (please) ((sandwich TOPPING FILLING please) (begin (syntax (format "I love ~a with ~a." (quote FILLING) (quote TOPPING))))) (else (raise-syntax-error (quote san... > (sandwich banana bacon please)= eval:30:0: syntax-parse: literal is unbound in phase 0 (phase 0 relative to the enclosing module) at: sandwich in: (syntax-parse (syntax-case stx () (any (syntax any))) #:literals (sandwich) #:datum-literals (please) ((sandwich TOPPING FILLING please) (begin (syntax (format "I love ~a with ~a." (quote FILLING) (quote TOPPING))))) (else (raise-syntax-error (quote san... ```

Thanks — that was indeed wrong.

Labels Milestones

Broken example code: #14