Now the truth can be told: the br language that we’ve used throughout this book is a not-very-special dialect of Racket. It’s just the foundational Racket language—which is called #lang racket/base—with some extra Racket libraries automatically imported, and some br-specific libraries intended to defer a few complications until later in your Racket career. (Namely: now.)
There’s nothing wrong with using #lang br in modules or projects. But as a developer, it’s a more virtuous habit to use #lang racket/base instead. Why?
As a rule of thumb, it’s better practice to start with the foundational language—that is, racket/base—and use require to import what you need. This makes your project (a little) faster to start up, and reduces dependencies.
Both #lang br and this book will continue to be revised and enlarged. #lang racket/base, by contrast, is guaranteed to remain the foundational configuration of Racket.
racket/base is ubiquitous throughout other Racket projects, so recognizing common racket/base idioms is essential for being able to read other people’s code.
A few options for those switching from br to racket/base:
Rather than using #lang br, you can import just the parts you like. The br language is built from smaller modules like br/list, br/define, and br/syntax. These are all compatible with racket/base. See the documentation for what’s included in each.
The br code is available under the MIT license. Rather than depend on the br package, you’re welcome to copy the code—individual functions, or whole modules—into your own projects, or adapt it.
None of the code is especially complicated, though some of it uses techniques not covered in this book. (If you make improvements, I welcome pull requests at the beautiful-racket repo).
You can also just learn to rewrite your code without the br idioms and patterns. You can peek inside the br source code to see what’s going on, but these are the highlights.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18
(define-macro (mac1 X bar Y) #'(list X "second" Y)) (define-macro-cases mac2 [(_ X bar Y) #'(list X "second" Y)]) (define-syntax (mac3 caller-stx) (syntax-case caller-stx (bar) [(foo X bar Y) #'(list X "second" Y)] [else (raise-syntax-error 'foo3 (format "no matching case for calling pattern in: ~a" (syntax->datum caller-stx)))])) (mac1 "first" bar "third") ; '("first" "second" "third") (mac2 "first" bar "third") ; '("first" "second" "third") (mac3 "first" bar "third") ; '("first" "second" "third")
Under the hood, define-macro is just a shorthand version of the one-case instance of define-macro-cases, which is a shorthand version of the full define-syntax + syntax-case macro.
define-syntax is Racket’s basic tool for introducing a . define-syntax can only be used to bind an identifier (like mac3, in the example above) to a function that takes one syntax object as an argument, and returns another syntax object.
Racket has a number of tools that create syntax transformers, or help process the input of a macro. syntax-case is in the latter category: it’s similar to cond or case, in that it takes a syntax object as input and tries to match it to a series of clauses with a syntax pattern on the left. When a match is found, the right side of the clause is evaluated. The (bar) argument in syntax case is a list of identifiers that will be matched literally.
Key differences between define-macro or define-macro-cases and define-syntax with syntax-case:
In define-macro and define-macro-cases, the caller-stx value is available, but hidden by default. In define-syntax, it’s explicit. + In your own define-syntax macros, you don’t have to name the input argument caller-stx—we’re using that name here to show the correspondence between the forms. More often, it’s just called stx.
In define-macro and define-macro-cases, if no else clause is included, one is automatically generated with a friendly error message.
In define-macro and define-macro-cases, in the have to be written in UPPERCASE, and everything else is treated as a literal match. In syntax-case, this presumption is reversed: every identifier in a syntax pattern is treated as a pattern variable, and only the identifiers in the literals list at the top are treated as literals. + You can still use UPPERCASE to label pattern variables, but in syntax-case it’s an option, not a requirement.
1 2 3 4 5 6 7 8 9
In with-pattern, as with define-macro and define-macro-cases, pattern variables in the syntax patterns have to be written in UPPERCASE. Everything else is treated as a literal match. In with-syntax, this presumption is reversed: every identifier in a syntax pattern is treated as a pattern variable. There is no way to match an identifier literally.
prefix-id and suffix-id are convenient ways of using format-id (which in turn is just a convenient way of using datum->syntax). The major difference is that prefix-id and suffix-id automatically generate identifiers that live in the same as the base identifier. Whereas with datum->syntax and format-id, you always have to provide an explicit lexical-context argument:
1 2 3 4 5 6 7 8 9 10 11 12 13 14
(require racket/syntax) (define-macro (make-bars) (define id #'foo) (with-pattern ([BAR1 (datum->syntax id 'bar1)] [BAR2 (format-id id "~a" 'bar2)] [BAR23 (suffix-id #'BAR2 "3")]) #'(begin (define BAR1 'BAR1) (define BAR2 'BAR2) (define BAR23 'BAR23) (list BAR1 BAR2 BAR23)))) (make-bars) ; '(bar1 bar2 bar23)
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
1 2 3 4 5 6 7 8 9 10 11
#lang br/quicklang is a variant of the #lang br language for modules that automatically exports #%top, #%app, #%datum, and #%top-interaction. As above, if you’re embarking on your own language, you should build on racket/base, because br/quicklang does nothing that you couldn’t do yourself in two lines of code.