From 4f3e6ff4fcccd77df18650b986a09a17e2051075 Mon Sep 17 00:00:00 2001 From: Matthew Butterick Date: Tue, 20 Dec 2016 11:51:03 -0800 Subject: [PATCH] doc edit --- beautiful-racket-lib/br/scribblings/br.scrbl | 15 ++++++++++++++- 1 file changed, 14 insertions(+), 1 deletion(-) diff --git a/beautiful-racket-lib/br/scribblings/br.scrbl b/beautiful-racket-lib/br/scribblings/br.scrbl index 9fc5edc..e948d00 100644 --- a/beautiful-racket-lib/br/scribblings/br.scrbl +++ b/beautiful-racket-lib/br/scribblings/br.scrbl @@ -258,7 +258,7 @@ The error is cleared when the argument is capitalized, thus making it a wildcard (good-squarer +10i) ] -You can use the special variable @racket[caller-stx] — available only within the body of @racket[define-macro] — to access the original input argument to the macro. +You can use the special variable @racketfont{caller-stx} — available only within the body of @racket[define-macro] — to access the original input argument to the macro. @;{todo: fix this example. complains that caller-stx is unbound} @examples[#:eval my-eval @@ -481,4 +481,17 @@ Convert @racket[values] to a simple list. (split-at '(a b c d e f) 3) (values->list (split-at '(a b c d e f) 3)) ] +} + + +@defmodule[br/datum] + +@defproc[(datum? [x any/c]) boolean?]{ +Return @racket[#t] if @racket[x] is a @racket[list?] or a @racket[symbol?]. + + @examples[#:eval my-eval +(datum? '(a b c d e f)) +(datum? 'a) +(datum? "a") +] } \ No newline at end of file