diff --git a/collects/scribblings/framework/canvas.scrbl b/collects/scribblings/framework/canvas.scrbl index 9d59200af8..5735b866f1 100644 --- a/collects/scribblings/framework/canvas.scrbl +++ b/collects/scribblings/framework/canvas.scrbl @@ -10,10 +10,10 @@ @defmixin[canvas:basic-mixin (editor-canvas%) (canvas:basic<%>)]{ } @definterface[canvas:color<%> (canvas:basic<%>)]{ - \index{background color} + @index{background color} Mixins that implement this interface initialize the background color of the canvas to the value of the - \index{'framework:basic-canvas-background} + @index{'framework:basic-canvas-background} @scheme['framework:basic-canvas-background] preference. Adds a callback so that when that preference is modified, the background color changes. diff --git a/collects/scribblings/framework/menu.scrbl b/collects/scribblings/framework/menu.scrbl index 09a653caf1..2f9b84ef6c 100644 --- a/collects/scribblings/framework/menu.scrbl +++ b/collects/scribblings/framework/menu.scrbl @@ -18,7 +18,7 @@ } @definterface[menu:can-restore-underscore<%> (labelled-menu-item<%>)]{ These menus can save and restore the underscores (indicated - via the \& characters in the original labels) in their + via the @litchar{&} characters in the original labels) in their labels. If the preference @scheme['framework:menu-bindings] diff --git a/collects/scribblings/gui/draw-overview.scrbl b/collects/scribblings/gui/draw-overview.scrbl index 4868ffaa1e..f791f21b08 100644 --- a/collects/scribblings/gui/draw-overview.scrbl +++ b/collects/scribblings/gui/draw-overview.scrbl @@ -255,7 +255,7 @@ More complex shapes are typically best implemented with [parent f] [paint-callback (lambda (c dc) - (send dc #,(:: dc<%> set-background) (make-object color\% 220 200 255)) + (send dc #,(:: dc<%> set-background) (make-object color% 220 200 255)) (send dc #,(:: dc<%> clear)) (send dc #,(:: dc<%> set-smoothing) 'smoothed) (send dc #,(:: dc<%> set-origin) 5 5) diff --git a/collects/scribblings/gui/eventspace-funcs.scrbl b/collects/scribblings/gui/eventspace-funcs.scrbl index 496d93e618..195b899c15 100644 --- a/collects/scribblings/gui/eventspace-funcs.scrbl +++ b/collects/scribblings/gui/eventspace-funcs.scrbl @@ -137,7 +137,7 @@ A second (optional) boolean argument indicates whether the callback boolean?] [(yield [v (or/c (one-of/c 'wait) evt?)]) any/c])]{ -@;\index{pause}\index{wait} +@;@index{pause}@index{wait} Yields control to event dispatching. See @secref["eventspaceinfo"] for details. diff --git a/collects/scribblings/gui/font-class.scrbl b/collects/scribblings/gui/font-class.scrbl index 6b28d2016a..2d2bbba26a 100644 --- a/collects/scribblings/gui/font-class.scrbl +++ b/collects/scribblings/gui/font-class.scrbl @@ -11,7 +11,7 @@ A @defterm{font} is an object which determines the appearance of text, @item{size --- The size of the text, either in points (the default) or logical drawing units, depending on the - ``size-in-pixels?''\ property (see below).} + ``size-in-pixels?'' property (see below).} @item{family --- A platform- and device-independent font designation. The families are: diff --git a/collects/scribblings/gui/font-name-directory-intf.scrbl b/collects/scribblings/gui/font-name-directory-intf.scrbl index d47283e2b7..455ef1d8cf 100644 --- a/collects/scribblings/gui/font-name-directory-intf.scrbl +++ b/collects/scribblings/gui/font-name-directory-intf.scrbl @@ -14,7 +14,7 @@ There is one @scheme[font-name-directory<%>] object: PostScript font name, which encapsulates the style and weight. When drawing to a bitmap in X, the rendering information is an X font string, which encapsulates the style and weight, parameterized over - the size (using a ``\%d'' placeholder). + the size (using a ``%d'' placeholder). Programmers rarely need to directly invoke methods of @scheme[the-font-name-directory]. It is used automatically when diff --git a/collects/scribblings/gui/key-event-class.scrbl b/collects/scribblings/gui/key-event-class.scrbl index ef13968802..3923044bf0 100644 --- a/collects/scribblings/gui/key-event-class.scrbl +++ b/collects/scribblings/gui/key-event-class.scrbl @@ -134,7 +134,7 @@ Gets the virtual key code for the key event. The virtual key code is @item{@indexed-scheme['f24]} @item{@indexed-scheme['numlock]} @item{@indexed-scheme['scroll]} -@item{@indexed-scheme['wheel-up] --- \index["wheel on mouse"]{mouse} wheel up one notch} +@item{@indexed-scheme['wheel-up] --- @index["wheel on mouse"]{mouse} wheel up one notch} @item{@indexed-scheme['wheel-down] --- mouse wheel down one notch} @item{@indexed-scheme['release] --- indicates a key-release event} @item{@indexed-scheme['press] --- indicates a key-press event; usually only from @scheme[get-key-release-code]} diff --git a/collects/scribblings/gui/timer-class.scrbl b/collects/scribblings/gui/timer-class.scrbl index d29ca13dbf..c9818ce4e6 100644 --- a/collects/scribblings/gui/timer-class.scrbl +++ b/collects/scribblings/gui/timer-class.scrbl @@ -70,7 +70,7 @@ Starts (or restarts) the timer. If the timer is already running, its The timer's alarm expires after @scheme[msec] milliseconds, at which point @method[timer% notify] is called (on an event boundary). If -@scheme[just-once?]\ is @scheme[#f], the timer expires @italic{every} +@scheme[just-once?] is @scheme[#f], the timer expires @italic{every} @scheme[msec] milliseconds until the timer is explicitly stopped;\footnote{More precisely, the timer expires @scheme[msec] milliseconds after @method[timer% notify] returns each time} diff --git a/collects/scribblings/gui/top-level-window-intf.scrbl b/collects/scribblings/gui/top-level-window-intf.scrbl index 7bdd2882e3..2e0db90e8a 100644 --- a/collects/scribblings/gui/top-level-window-intf.scrbl +++ b/collects/scribblings/gui/top-level-window-intf.scrbl @@ -278,7 +278,7 @@ In a dialog, if @scheme[event] is an Escape key event, the event is @item{ If @scheme[event] is an alphanumeric key event and the current top-level window contains a control with a mnemonic matching the key (which is - installed via a label that contains ``\&''; see + installed via a label that contains @litchar{&}; see @method[window<%> get-label] for more information), then the keyboard focus is moved to the matching control. Furthermore, if the matching control is a @scheme[button%], @scheme[check-box%], or diff --git a/collects/scribblings/gui/win-overview.scrbl b/collects/scribblings/gui/win-overview.scrbl index d754900891..84a55aa032 100644 --- a/collects/scribblings/gui/win-overview.scrbl +++ b/collects/scribblings/gui/win-overview.scrbl @@ -345,7 +345,7 @@ with the following program: @schemeblock[ (code:comment #, @t{Create a dialog}) -(define dialog (instantiate dialog\% ("Example"))) +(define dialog (instantiate dialog% ("Example"))) (code:comment #, @t{Add a text field to the dialog}) (new text-field% [parent dialog] [label "Your name"]) diff --git a/collects/scribblings/gui/window-intf.scrbl b/collects/scribblings/gui/window-intf.scrbl index e7ec29638b..9fb1f82f09 100644 --- a/collects/scribblings/gui/window-intf.scrbl +++ b/collects/scribblings/gui/window-intf.scrbl @@ -110,7 +110,7 @@ Returns the window's cursor, or @scheme[#f] if this window's cursor exact-integer?]{ Returns an exact integer representing a handle to the window in the -current platform's GUI toolbox. Cast this number from a C \cpp{long} +current platform's GUI toolbox. Cast this number from a C @cpp{long} to a platform-specific C type: @itemize{ @@ -153,7 +153,7 @@ Gets a window's label, if any. Control windows generally display their label can be an icon symbol @scheme['app], @scheme['caution], or @scheme['stop]. -The label string may contain ampersands (``\&''), which serve as +The label string may contain ampersands (@litchar{&}), which serve as keyboard navigation annotations for controls under Windows and X. The ampersands are not part of the displayed label of a control; instead, ampersands are removed in the displayed label (under all platforms), diff --git a/collects/scribblings/guide/contracts-general-function.scrbl b/collects/scribblings/guide/contracts-general-function.scrbl index d1d933eb9a..eacbfb922f 100644 --- a/collects/scribblings/guide/contracts-general-function.scrbl +++ b/collects/scribblings/guide/contracts-general-function.scrbl @@ -622,7 +622,7 @@ Here are two uses: @schemeblock[ (code:comment "nat -> nat") (define (f x) - (printf "~s \n" x) + (printf "~s\n" x) (if (= x 0) #f -1)) (n-step f '(2)) diff --git a/collects/scribblings/guide/contracts-simple-function.scrbl b/collects/scribblings/guide/contracts-simple-function.scrbl index 90be204534..0588b08f2c 100644 --- a/collects/scribblings/guide/contracts-simple-function.scrbl +++ b/collects/scribblings/guide/contracts-simple-function.scrbl @@ -219,21 +219,19 @@ scheme (define (has-decimal? str) (define L (string-length str)) (and (>= L 3) - (char=? - #\. - (string-ref result (- L 3))))) + (char=? #\. (string-ref result (- L 3))))) (provide/contract (code:comment "convert a random number to a string") [format-number (-> number? string?)] - + (code:comment "convert an amount into a string with a decimal") (code:comment "point, as in an amount of US currency") - [format-nat (-> natural-number/c + [format-nat (-> natural-number/c (and/c string? has-decimal?))]) ] The contract of the exported function @scheme[format-number] specifies that -the function consumes a number and produces a string. +the function consumes a number and produces a string. The contract of the exported function @scheme[format-nat] is more interesting than the one of @scheme[format-number]. It consumes only @@ -255,14 +253,12 @@ scheme (define (has-decimal? str) (define L (string-length str)) (and (>= L 3) - (char=? - #\. - (string-ref result (- L 3))))) + (char=? #\. (string-ref result (- L 3))))) (define (is-decimal-string? str) (define L (string-length str)) (and (has-decimal? str) - (andmap digit-char? + (andmap digit-char? (string->list (substring result 0 (- L 3)))) (andmap digit-char? (string->list (substring result (- L 2) L))))) diff --git a/collects/scribblings/inside/eval.scrbl b/collects/scribblings/inside/eval.scrbl index 94d520a5b9..a4cf5eaf75 100644 --- a/collects/scribblings/inside/eval.scrbl +++ b/collects/scribblings/inside/eval.scrbl @@ -172,7 +172,7 @@ finalizations.} [Scheme_Object** argv])]{ Creates and returns a new namespace. This values can be cast to -@scheme[Scheme\_Env *]. It can also be installed in +@cpp[Scheme_Env *]. It can also be installed in a parameterization using @cppi{scheme_set_param} with @cppi{MZCONFIG_ENV}. diff --git a/collects/scribblings/inside/exns.scrbl b/collects/scribblings/inside/exns.scrbl index 7c51629578..d79bc57518 100644 --- a/collects/scribblings/inside/exns.scrbl +++ b/collects/scribblings/inside/exns.scrbl @@ -275,7 +275,7 @@ for @cpp{printf}, but with the following format directives: @item{@FormatD{Z} : a potential platform-specific error value and a @cpp{char} string; if the string is non-@cpp{NULL}, then the error - value is ignored, otherwise the error value is used as for \Format{E}.} + value is ignored, otherwise the error value is used as for @FormatD{E}.} @item{@FormatD{%} : a percent sign} diff --git a/collects/scribblings/inside/misc.scrbl b/collects/scribblings/inside/misc.scrbl index 8f05e75a13..bf059ed553 100644 --- a/collects/scribblings/inside/misc.scrbl +++ b/collects/scribblings/inside/misc.scrbl @@ -40,12 +40,12 @@ Returns 1 if the Scheme values are @scheme[equal?].} @function[(long scheme_equal_hash_key [Scheme_Object* obj])]{ -Returns the primary @scheme[equal?]-hash key for \var{obj}.} +Returns the primary @scheme[equal?]-hash key for @var{obj}.} @function[(long scheme_equal_hash_key2 [Scheme_Object* obj])]{ -Returns the secondary @scheme[equal?]-hash key for \var{obj}.} +Returns the secondary @scheme[equal?]-hash key for @var{obj}.} @function[(long scheme_recur_equal_hash_key [Scheme_Object* obj] @@ -55,7 +55,7 @@ Like @cpp{scheme_equal_hash_key}, but accepts an extra value for cycle tracking. This procedure is meant to be called by a hasing procedure installed with @cpp{scheme_set_type_equality}.} -Returns the primary @scheme[equal?]-hash key for \var{obj}.} +Returns the primary @scheme[equal?]-hash key for @var{obj}.} @function[(long scheme_recur_equal_hash_key2 [Scheme_Object* obj] @@ -212,7 +212,7 @@ that will be encountered.} @function[(Scheme_Hash_Table* scheme_make_hash_table_equal)]{ Like @cpp{scheme_make_hash_table}, except that keys are treated as -Scheme values and hashed based on @scheme[equal?]\ instead of +Scheme values and hashed based on @scheme[equal?] instead of @scheme[eq?].} @function[(void scheme_hash_set diff --git a/collects/scribblings/inside/values.scrbl b/collects/scribblings/inside/values.scrbl index 637fb8c89b..b28af3b07d 100644 --- a/collects/scribblings/inside/values.scrbl +++ b/collects/scribblings/inside/values.scrbl @@ -435,7 +435,7 @@ value.} [Scheme_Object* carv] [Scheme_Object* cdrv])]{ -Makes a \scmi{cons} pair.} +Makes a @scheme[cons] pair.} @function[(Scheme_Object* scheme_make_byte_string [char* bytes])]{ diff --git a/collects/scribblings/reference/class.scrbl b/collects/scribblings/reference/class.scrbl index 45192b8f4b..219a62e709 100644 --- a/collects/scribblings/reference/class.scrbl +++ b/collects/scribblings/reference/class.scrbl @@ -854,10 +854,10 @@ Produces an integer hash code consistent with (define-values (fc% key) (fresh-c%))] -(send (new fc%) m) ; {\Is} error: no method @scheme[m] +(send (new fc%) m) (let () (define-member-name p key) - (send (new fc%) p)) ; {\Is} \schemeresult{10} + (send (new fc%) p)) ] diff --git a/collects/scribblings/reference/cont.scrbl b/collects/scribblings/reference/cont.scrbl index 41df0582ed..12046adfde 100644 --- a/collects/scribblings/reference/cont.scrbl +++ b/collects/scribblings/reference/cont.scrbl @@ -6,7 +6,7 @@ See @secref["cont-model"] and @secref["prompt-model"] for general information about continuations. PLT Scheme's support for prompts and composable continuations most closely resembles Dorai Sitaram's -@scheme[\%] and @scheme[fcontrol] operator @cite["Sitaram93"]. +@scheme[%] and @scheme[fcontrol] operator @cite["Sitaram93"]. Scheme installs a @defterm{continuation barrier} around evaluation in the following contexts, preventing full-continuation jumps across the diff --git a/collects/scribblings/reference/networking.scrbl b/collects/scribblings/reference/networking.scrbl index babc6af9f6..8bd79432b4 100644 --- a/collects/scribblings/reference/networking.scrbl +++ b/collects/scribblings/reference/networking.scrbl @@ -190,7 +190,7 @@ If the listener has already been closed, the @exnraise[exn:fail:network]. The listener's port number may not become immediately available for new listeners (with the default @scheme[reuse?] argument of @scheme[tcp-listen]). For further information, see Stevens's -explanation of the @tt{TIME\_WAIT} TCP state.} +explanation of the @tt{TIME_WAIT} TCP state.} @defproc[(tcp-listener? [v any/c]) boolean?]{ diff --git a/collects/scribblings/reference/reader.scrbl b/collects/scribblings/reference/reader.scrbl index 2ac8cb056f..b1019f9503 100644 --- a/collects/scribblings/reference/reader.scrbl +++ b/collects/scribblings/reference/reader.scrbl @@ -174,7 +174,7 @@ parse takes precedence over a symbol parse. @index["case-sensitivity"]{@index["case-insensitive"]{When}} the @scheme[read-case-sensitive] @tech{parameter} is set to @scheme[#f], characters in the sequence that are not quoted by @litchar["|"] or -@litchar["\\"] are first case-normalized. If the reader encounters +@litchar{\} are first case-normalized. If the reader encounters @as-index{@litchar{#ci}}, @litchar{#CI}, @litchar{#Ci}, or @litchar{#cI}, then it recursively reads the following datum in case-insensitive mode. If the reader encounters @@ -335,7 +335,7 @@ included a single delimited @litchar{.}, then only the innermost pair and outtermost pair are wrapped as syntax objects. Whether wrapping a pair or list, if the pair or list was formed with @litchar{[} and @litchar{]}, then a @indexed-scheme['paren-shape] property is attached -to the result with the value @scheme[#\[];if the list or pair was +to the result with the value @scheme[#\[]; if the list or pair was formed with @litchar["{"] and @litchar["}"], then a @scheme['paren-shape] property is attached to the result with the value @scheme[#\{]. @@ -386,14 +386,14 @@ Within a string sequence, the following escape sequences are @itemize{ - @item{@as-index{@litchar["\\a"]}: alarm (ASCII 7)} - @item{@as-index{@litchar["\\b"]}: backspace (ASCII 8)} - @item{@as-index{@litchar["\\t"]}: tab (ASCII 9)} - @item{@as-index{@litchar["\\n"]}: linefeed (ASCII 10)} - @item{@as-index{@litchar["\\v"]}: vertical tab (ASCII 11)} - @item{@as-index{@litchar["\\f"]}: formfeed (ASCII 12)} - @item{@as-index{@litchar["\\r"]}: return (ASCII 13)} - @item{@as-index{@litchar["\\e"]}: escape (ASCII 27)} + @item{@as-index{@litchar{\a}}: alarm (ASCII 7)} + @item{@as-index{@litchar{\b}}: backspace (ASCII 8)} + @item{@as-index{@litchar{\t}}: tab (ASCII 9)} + @item{@as-index{@litchar{\n}}: linefeed (ASCII 10)} + @item{@as-index{@litchar{\v}}: vertical tab (ASCII 11)} + @item{@as-index{@litchar{\f}}: formfeed (ASCII 12)} + @item{@as-index{@litchar{\r}}: return (ASCII 13)} + @item{@as-index{@litchar{\e}}: escape (ASCII 27)} @item{@as-index{@litchar["\\\""]}: double-quotes (without terminating the string)} @item{@as-index{@litchar["\\'"]}: quote (i.e., the backslash has no effect)}