diff --git a/collects/scribblings/scribble/basic.scrbl b/collects/scribblings/scribble/basic.scrbl index 13fc3bed..1d3ebf5f 100644 --- a/collects/scribblings/scribble/basic.scrbl +++ b/collects/scribblings/scribble/basic.scrbl @@ -3,21 +3,24 @@ "utils.ss" (for-syntax scheme/base)) -@define-syntax[def-section-like - (syntax-rules () - [(_ id result/c x ...) (defproc (id [#:tag tag (or/c false/c string?) #f] - [pre-content any/c] (... ...+)) - result/c - x ...)])] +@(define-syntax def-section-like + (syntax-rules () + [(_ id result/c x ...) + (defproc (id [#:tag tag (or/c false/c string?) #f] + [pre-content any/c] (... ...+)) + result/c + x ...)])) -@define-syntax[def-elem-proc - (syntax-rules () - [(_ id x ...) (defproc (id [pre-content any/c] (... ...)) - element? - x ...)])] -@define-syntax[def-style-proc - (syntax-rules () - [(_ id) @def-elem-proc[id]{Like @scheme[elem], but with style @scheme['id]}])] +@(define-syntax def-elem-proc + (syntax-rules () + [(_ id x ...) + (defproc (id [pre-content any/c] (... ...)) + element? + x ...)])) +@(define-syntax def-style-proc + (syntax-rules () + [(_ id) + @def-elem-proc[id]{Like @scheme[elem], but with style @scheme['id]}])) @title[#:tag "basic"]{Basic Document Forms} diff --git a/collects/scribblings/scribble/reader.scrbl b/collects/scribblings/scribble/reader.scrbl index 477c7c12..060bba2a 100644 --- a/collects/scribblings/scribble/reader.scrbl +++ b/collects/scribblings/scribble/reader.scrbl @@ -733,12 +733,12 @@ provides direct Scribble reader functionality for advanced needs.} @; The `with-scribble-read' trick below shadows `read' and @; `read-syntax' with for-label bindings from the Scribble reader -@define-syntax[with-scribble-read - (syntax-rules () - [(_) - (... - (begin - (require (for-label scribble/reader)) +@(define-syntax with-scribble-read + (syntax-rules () + [(_) + (... + (begin + (require (for-label scribble/reader)) @; *** Start reader-import section *** @defproc[(read [in input-port? (current-input-port)]) any]{} @@ -815,6 +815,6 @@ resulting readtable using @scheme[current-readtable]. It also enables line counting for the current input-port via @scheme[port-count-lines!].} @; *** End reader-import section *** -))])] +))])) @with-scribble-read[]