diff --git a/collects/help/help.ss b/collects/help/help.rkt similarity index 100% rename from collects/help/help.ss rename to collects/help/help.rkt diff --git a/collects/help/search.ss b/collects/help/search.rkt similarity index 100% rename from collects/help/search.ss rename to collects/help/search.rkt diff --git a/collects/scribble/base-render.ss b/collects/scribble/base-render.rkt similarity index 100% rename from collects/scribble/base-render.ss rename to collects/scribble/base-render.rkt diff --git a/collects/scribble/base.ss b/collects/scribble/base.rkt similarity index 100% rename from collects/scribble/base.ss rename to collects/scribble/base.rkt diff --git a/collects/scribble/base/lang.ss b/collects/scribble/base/lang.rkt similarity index 100% rename from collects/scribble/base/lang.ss rename to collects/scribble/base/lang.rkt diff --git a/collects/scribble/base/lang/reader.ss b/collects/scribble/base/lang/reader.rkt similarity index 100% rename from collects/scribble/base/lang/reader.ss rename to collects/scribble/base/lang/reader.rkt diff --git a/collects/scribble/basic.ss b/collects/scribble/basic.rkt similarity index 100% rename from collects/scribble/basic.ss rename to collects/scribble/basic.rkt diff --git a/collects/scribble/bnf.ss b/collects/scribble/bnf.rkt similarity index 100% rename from collects/scribble/bnf.ss rename to collects/scribble/bnf.rkt diff --git a/collects/scribble/comment-reader.ss b/collects/scribble/comment-reader.rkt similarity index 100% rename from collects/scribble/comment-reader.ss rename to collects/scribble/comment-reader.rkt diff --git a/collects/scribble/config.ss b/collects/scribble/config.rkt similarity index 100% rename from collects/scribble/config.ss rename to collects/scribble/config.rkt diff --git a/collects/scribble/core.ss b/collects/scribble/core.rkt similarity index 100% rename from collects/scribble/core.ss rename to collects/scribble/core.rkt diff --git a/collects/scribble/decode-struct.ss b/collects/scribble/decode-struct.rkt similarity index 100% rename from collects/scribble/decode-struct.ss rename to collects/scribble/decode-struct.rkt diff --git a/collects/scribble/decode.ss b/collects/scribble/decode.rkt similarity index 100% rename from collects/scribble/decode.ss rename to collects/scribble/decode.rkt diff --git a/collects/scribble/doc/lang/reader.ss b/collects/scribble/doc/lang/reader.rkt similarity index 100% rename from collects/scribble/doc/lang/reader.ss rename to collects/scribble/doc/lang/reader.rkt diff --git a/collects/scribble/doc/main.ss b/collects/scribble/doc/main.rkt similarity index 100% rename from collects/scribble/doc/main.ss rename to collects/scribble/doc/main.rkt diff --git a/collects/scribble/doc/reader.ss b/collects/scribble/doc/reader.rkt similarity index 100% rename from collects/scribble/doc/reader.ss rename to collects/scribble/doc/reader.rkt diff --git a/collects/scribble/doclang.ss b/collects/scribble/doclang.rkt similarity index 100% rename from collects/scribble/doclang.ss rename to collects/scribble/doclang.rkt diff --git a/collects/scribble/eval.ss b/collects/scribble/eval.rkt similarity index 100% rename from collects/scribble/eval.ss rename to collects/scribble/eval.rkt diff --git a/collects/scribble/extract.ss b/collects/scribble/extract.rkt similarity index 100% rename from collects/scribble/extract.ss rename to collects/scribble/extract.rkt diff --git a/collects/scribble/html-properties.ss b/collects/scribble/html-properties.rkt similarity index 100% rename from collects/scribble/html-properties.ss rename to collects/scribble/html-properties.rkt diff --git a/collects/scribble/html-render.ss b/collects/scribble/html-render.rkt similarity index 100% rename from collects/scribble/html-render.ss rename to collects/scribble/html-render.rkt diff --git a/collects/scribble/info.ss b/collects/scribble/info.rkt similarity index 100% rename from collects/scribble/info.ss rename to collects/scribble/info.rkt diff --git a/collects/scribble/jfp.ss b/collects/scribble/jfp.rkt similarity index 100% rename from collects/scribble/jfp.ss rename to collects/scribble/jfp.rkt diff --git a/collects/scribble/jfp/lang.ss b/collects/scribble/jfp/lang.rkt similarity index 100% rename from collects/scribble/jfp/lang.ss rename to collects/scribble/jfp/lang.rkt diff --git a/collects/scribble/jfp/lang/reader.ss b/collects/scribble/jfp/lang/reader.rkt similarity index 100% rename from collects/scribble/jfp/lang/reader.ss rename to collects/scribble/jfp/lang/reader.rkt diff --git a/collects/scribble/latex-properties.ss b/collects/scribble/latex-properties.rkt similarity index 100% rename from collects/scribble/latex-properties.ss rename to collects/scribble/latex-properties.rkt diff --git a/collects/scribble/latex-render.ss b/collects/scribble/latex-render.rkt similarity index 100% rename from collects/scribble/latex-render.ss rename to collects/scribble/latex-render.rkt diff --git a/collects/scribble/lp-include.ss b/collects/scribble/lp-include.rkt similarity index 100% rename from collects/scribble/lp-include.ss rename to collects/scribble/lp-include.rkt diff --git a/collects/scribble/lp.ss b/collects/scribble/lp.rkt similarity index 100% rename from collects/scribble/lp.ss rename to collects/scribble/lp.rkt diff --git a/collects/scribble/lp/lang/lang.ss b/collects/scribble/lp/lang/lang.rkt similarity index 100% rename from collects/scribble/lp/lang/lang.ss rename to collects/scribble/lp/lang/lang.rkt diff --git a/collects/scribble/lp/lang/reader.ss b/collects/scribble/lp/lang/reader.rkt similarity index 100% rename from collects/scribble/lp/lang/reader.ss rename to collects/scribble/lp/lang/reader.rkt diff --git a/collects/scribble/manual-struct.ss b/collects/scribble/manual-struct.rkt similarity index 100% rename from collects/scribble/manual-struct.ss rename to collects/scribble/manual-struct.rkt diff --git a/collects/scribble/manual.ss b/collects/scribble/manual.rkt similarity index 100% rename from collects/scribble/manual.ss rename to collects/scribble/manual.rkt diff --git a/collects/scribble/manual/lang.ss b/collects/scribble/manual/lang.rkt similarity index 100% rename from collects/scribble/manual/lang.ss rename to collects/scribble/manual/lang.rkt diff --git a/collects/scribble/manual/lang/reader.ss b/collects/scribble/manual/lang/reader.rkt similarity index 100% rename from collects/scribble/manual/lang/reader.ss rename to collects/scribble/manual/lang/reader.rkt diff --git a/collects/scribble/pdf-render.ss b/collects/scribble/pdf-render.rkt similarity index 100% rename from collects/scribble/pdf-render.ss rename to collects/scribble/pdf-render.rkt diff --git a/collects/scribble/private/defaults.ss b/collects/scribble/private/defaults.rkt similarity index 100% rename from collects/scribble/private/defaults.ss rename to collects/scribble/private/defaults.rkt diff --git a/collects/scribble/private/indirect-renderer.ss b/collects/scribble/private/indirect-renderer.rkt similarity index 100% rename from collects/scribble/private/indirect-renderer.ss rename to collects/scribble/private/indirect-renderer.rkt diff --git a/collects/scribble/private/lp.ss b/collects/scribble/private/lp.rkt similarity index 100% rename from collects/scribble/private/lp.ss rename to collects/scribble/private/lp.rkt diff --git a/collects/scribble/private/manual-bib.ss b/collects/scribble/private/manual-bib.rkt similarity index 100% rename from collects/scribble/private/manual-bib.ss rename to collects/scribble/private/manual-bib.rkt diff --git a/collects/scribble/private/manual-bind.ss b/collects/scribble/private/manual-bind.rkt similarity index 100% rename from collects/scribble/private/manual-bind.ss rename to collects/scribble/private/manual-bind.rkt diff --git a/collects/scribble/private/manual-class.ss b/collects/scribble/private/manual-class.rkt similarity index 100% rename from collects/scribble/private/manual-class.ss rename to collects/scribble/private/manual-class.rkt diff --git a/collects/scribble/private/manual-ex.ss b/collects/scribble/private/manual-ex.rkt similarity index 100% rename from collects/scribble/private/manual-ex.ss rename to collects/scribble/private/manual-ex.rkt diff --git a/collects/scribble/private/manual-form.ss b/collects/scribble/private/manual-form.rkt similarity index 93% rename from collects/scribble/private/manual-form.ss rename to collects/scribble/private/manual-form.rkt index 31d023de..f0ab889a 100644 --- a/collects/scribble/private/manual-form.ss +++ b/collects/scribble/private/manual-form.rkt @@ -20,7 +20,7 @@ (provide defform defform* defform/subs defform*/subs defform/none - defidform + defidform defidform/inline specform specform/subs specsubform specsubform/subs specspecsubform specspecsubform/subs specsubform/inline @@ -173,6 +173,12 @@ (syntax/loc stx (fm #:literals () spec desc ...))])) +(define-syntax (defidform/inline stx) + (syntax-case stx () + [(_ id) + (identifier? #'id) + #'(defform-site (quote-syntax id))])) + (define-syntax (defidform stx) (syntax-case stx () [(_ spec-id desc ...) @@ -307,6 +313,29 @@ (define (meta-symbol? s) (memq s '(... ...+ ?))) +(define (defform-site kw-id) + (let ([target-maker (id-to-form-target-maker kw-id #t)] + [content (list (definition-site (syntax-e kw-id) + kw-id #t))]) + (if target-maker + (target-maker + content + (lambda (tag) + (make-toc-target-element + #f + (if kw-id + (list (make-index-element + #f content tag + (list (symbol->string (syntax-e kw-id))) + content + (with-exporting-libraries + (lambda (libs) + (make-form-index-desc (syntax-e kw-id) + libs))))) + content) + tag))) + (car content)))) + (define (*defforms kw-id forms form-procs subs sub-procs contract-procs content-thunk) (parameterize ([current-meta-list '(... ...+)]) (make-box-splice @@ -325,27 +354,7 @@ (list (to-element `(,x . ,(cdr form))))))) (and kw-id (eq? form (car forms)) - (let ([target-maker (id-to-form-target-maker kw-id #t)] - [content (list (definition-site (syntax-e kw-id) - kw-id #t))]) - (if target-maker - (target-maker - content - (lambda (tag) - (make-toc-target-element - #f - (if kw-id - (list (make-index-element - #f content tag - (list (symbol->string (syntax-e kw-id))) - content - (with-exporting-libraries - (lambda (libs) - (make-form-index-desc (syntax-e kw-id) - libs))))) - content) - tag))) - (car content))))))))) + (defform-site kw-id))))))) forms form-procs) (if (null? sub-procs) null diff --git a/collects/scribble/private/manual-method.ss b/collects/scribble/private/manual-method.rkt similarity index 100% rename from collects/scribble/private/manual-method.ss rename to collects/scribble/private/manual-method.rkt diff --git a/collects/scribble/private/manual-mod.ss b/collects/scribble/private/manual-mod.rkt similarity index 100% rename from collects/scribble/private/manual-mod.ss rename to collects/scribble/private/manual-mod.rkt diff --git a/collects/scribble/private/manual-proc.ss b/collects/scribble/private/manual-proc.rkt similarity index 100% rename from collects/scribble/private/manual-proc.ss rename to collects/scribble/private/manual-proc.rkt diff --git a/collects/scribble/private/manual-scheme.ss b/collects/scribble/private/manual-scheme.rkt similarity index 100% rename from collects/scribble/private/manual-scheme.ss rename to collects/scribble/private/manual-scheme.rkt diff --git a/collects/scribble/private/manual-sprop.ss b/collects/scribble/private/manual-sprop.rkt similarity index 100% rename from collects/scribble/private/manual-sprop.ss rename to collects/scribble/private/manual-sprop.rkt diff --git a/collects/scribble/private/manual-style.ss b/collects/scribble/private/manual-style.rkt similarity index 100% rename from collects/scribble/private/manual-style.ss rename to collects/scribble/private/manual-style.rkt diff --git a/collects/scribble/private/manual-tech.ss b/collects/scribble/private/manual-tech.rkt similarity index 100% rename from collects/scribble/private/manual-tech.ss rename to collects/scribble/private/manual-tech.rkt diff --git a/collects/scribble/private/manual-unit.ss b/collects/scribble/private/manual-unit.rkt similarity index 100% rename from collects/scribble/private/manual-unit.ss rename to collects/scribble/private/manual-unit.rkt diff --git a/collects/scribble/private/manual-utils.ss b/collects/scribble/private/manual-utils.rkt similarity index 100% rename from collects/scribble/private/manual-utils.ss rename to collects/scribble/private/manual-utils.rkt diff --git a/collects/scribble/private/manual-vars.ss b/collects/scribble/private/manual-vars.rkt similarity index 100% rename from collects/scribble/private/manual-vars.ss rename to collects/scribble/private/manual-vars.rkt diff --git a/collects/scribble/private/on-demand.ss b/collects/scribble/private/on-demand.rkt similarity index 100% rename from collects/scribble/private/on-demand.ss rename to collects/scribble/private/on-demand.rkt diff --git a/collects/scribble/private/provide-structs.ss b/collects/scribble/private/provide-structs.rkt similarity index 100% rename from collects/scribble/private/provide-structs.ss rename to collects/scribble/private/provide-structs.rkt diff --git a/collects/scribble/private/qsloc.ss b/collects/scribble/private/qsloc.rkt similarity index 100% rename from collects/scribble/private/qsloc.ss rename to collects/scribble/private/qsloc.rkt diff --git a/collects/scribble/private/render-utils.ss b/collects/scribble/private/render-utils.rkt similarity index 100% rename from collects/scribble/private/render-utils.ss rename to collects/scribble/private/render-utils.rkt diff --git a/collects/scribble/private/run-pdflatex.ss b/collects/scribble/private/run-pdflatex.rkt similarity index 100% rename from collects/scribble/private/run-pdflatex.ss rename to collects/scribble/private/run-pdflatex.rkt diff --git a/collects/scribble/provide-doc-transform.ss b/collects/scribble/provide-doc-transform.rkt similarity index 100% rename from collects/scribble/provide-doc-transform.ss rename to collects/scribble/provide-doc-transform.rkt diff --git a/collects/scribble/racket.ss b/collects/scribble/racket.rkt similarity index 92% rename from collects/scribble/racket.ss rename to collects/scribble/racket.rkt index 1ab7e03b..470ced8d 100644 --- a/collects/scribble/racket.ss +++ b/collects/scribble/racket.rkt @@ -611,43 +611,64 @@ ((loop init-line! (if qq? quote-depth +inf.0) qq?) (unbox (syntax-e c))))] [(hash? (syntax-e c)) (advance c init-line!) - (let ([equal-table? (not (hash-eq? (syntax-e c)))] + (let ([equal-table? (hash-equal? (syntax-e c))] + [eqv-table? (hash-eq? (syntax-e c))] [quote-depth (to-quoted "`" qq? quote-depth out color? inc-src-col)]) (out (if equal-table? "#hash" - "#hasheq") + (if eqv-table? + "#hasheqv" + "#hasheq")) value-color) - (let ([delta (+ 5 (if equal-table? 2 0))] + (let ([delta (+ 5 (if equal-table? 0 (if eqv-table? 3 2)))] [orig-col src-col]) (set! src-col (+ src-col delta)) (hash-set! next-col-map src-col dest-col) ((loop init-line! (if qq? quote-depth +inf.0) qq?) - (let* ([l (sort (hash-map (syntax-e c) cons) - (lambda (a b) - (< (or (syntax-position (cdr a)) -inf.0) - (or (syntax-position (cdr b)) -inf.0))))] - [l2 (for/list ([p (in-list l)]) - (let* ([tentative (syntax-ize (car p) 0)] - [width (syntax-span tentative)]) - (datum->syntax - #f - (make-forced-pair - (syntax-ize (car p) - (max 0 (- (syntax-column (cdr p)) - width - 3)) - (syntax-line (cdr p))) - (cdr p)) - (vector 'here - (syntax-line (cdr p)) - (max 0 (- (syntax-column (cdr p)) width 4)) - (max 1 (- (syntax-position (cdr p)) width 4)) - (+ (syntax-span (cdr p)) width 5)))))]) - (datum->syntax #f l2 (vector (syntax-source c) - (syntax-line c) - (+ (syntax-column c) delta) - (+ (syntax-position c) delta) - (max 1 (- (syntax-span c) delta)))))) + (let*-values ([(l) (sort (hash-map (syntax-e c) cons) + (lambda (a b) + (< (or (syntax-position (cdr a)) -inf.0) + (or (syntax-position (cdr b)) -inf.0))))] + [(col0) (+ (syntax-column c) delta 2)] + [(l2 pos line) (for/fold ([l2 null][col col0][line (syntax-line c)]) + ([p (in-list l)]) + (let* ([tentative (syntax-ize (car p) 0)] + [width (syntax-span tentative)] + [col (if (= line (syntax-line (cdr p))) + col + col0)]) + (let ([key + (let ([e (syntax-ize (car p) + (max 0 (- (syntax-column (cdr p)) + width + 3)) + (syntax-line (cdr p)))]) + (if ((syntax-column e) . <= . col) + e + (datum->syntax #f + (syntax-e e) + (vector (syntax-source e) + (syntax-line e) + col + (syntax-position e) + (+ (syntax-span e) (- (syntax-column e) col))))))]) + (let ([elem + (datum->syntax + #f + (make-forced-pair key (cdr p)) + (vector 'here + (syntax-line (cdr p)) + (max 0 (- (syntax-column key) 1)) + (max 1 (- (syntax-position key) 1)) + (+ (syntax-span (cdr p)) (syntax-span key) 5)))]) + (values (cons elem l2) + (+ (syntax-column elem) (syntax-span elem) 2) + (syntax-line elem))))))]) + (datum->syntax #f (reverse l2) (vector (syntax-source c) + (syntax-line c) + (+ (syntax-column c) delta) + (+ (syntax-position c) delta) + (max 1 (- (syntax-span c) delta)))))) (set! src-col (+ orig-col (syntax-span c)))))] [(graph-reference? (syntax-e c)) (advance c init-line!) diff --git a/collects/scribble/render-struct.ss b/collects/scribble/render-struct.rkt similarity index 100% rename from collects/scribble/render-struct.ss rename to collects/scribble/render-struct.rkt diff --git a/collects/scribble/run.ss b/collects/scribble/run.rkt similarity index 100% rename from collects/scribble/run.ss rename to collects/scribble/run.rkt diff --git a/collects/scribble/scheme.ss b/collects/scribble/scheme.rkt similarity index 100% rename from collects/scribble/scheme.ss rename to collects/scribble/scheme.rkt diff --git a/collects/scribble/search.ss b/collects/scribble/search.rkt similarity index 100% rename from collects/scribble/search.ss rename to collects/scribble/search.rkt diff --git a/collects/scribble/sigplan.ss b/collects/scribble/sigplan.rkt similarity index 100% rename from collects/scribble/sigplan.ss rename to collects/scribble/sigplan.rkt diff --git a/collects/scribble/sigplan/lang.ss b/collects/scribble/sigplan/lang.rkt similarity index 100% rename from collects/scribble/sigplan/lang.ss rename to collects/scribble/sigplan/lang.rkt diff --git a/collects/scribble/sigplan/lang/reader.ss b/collects/scribble/sigplan/lang/reader.rkt similarity index 100% rename from collects/scribble/sigplan/lang/reader.ss rename to collects/scribble/sigplan/lang/reader.rkt diff --git a/collects/scribble/srcdoc.ss b/collects/scribble/srcdoc.rkt similarity index 100% rename from collects/scribble/srcdoc.ss rename to collects/scribble/srcdoc.rkt diff --git a/collects/scribble/struct.ss b/collects/scribble/struct.rkt similarity index 100% rename from collects/scribble/struct.ss rename to collects/scribble/struct.rkt diff --git a/collects/scribble/text-render.ss b/collects/scribble/text-render.rkt similarity index 100% rename from collects/scribble/text-render.ss rename to collects/scribble/text-render.rkt diff --git a/collects/scribble/text.ss b/collects/scribble/text.rkt similarity index 100% rename from collects/scribble/text.ss rename to collects/scribble/text.rkt diff --git a/collects/scribble/text/lang/reader.ss b/collects/scribble/text/lang/reader.rkt similarity index 100% rename from collects/scribble/text/lang/reader.ss rename to collects/scribble/text/lang/reader.rkt diff --git a/collects/scribble/text/output.ss b/collects/scribble/text/output.rkt similarity index 100% rename from collects/scribble/text/output.ss rename to collects/scribble/text/output.rkt diff --git a/collects/scribble/text/syntax-utils.ss b/collects/scribble/text/syntax-utils.rkt similarity index 100% rename from collects/scribble/text/syntax-utils.ss rename to collects/scribble/text/syntax-utils.rkt diff --git a/collects/scribble/text/textlang.ss b/collects/scribble/text/textlang.rkt similarity index 100% rename from collects/scribble/text/textlang.ss rename to collects/scribble/text/textlang.rkt diff --git a/collects/scribble/urls.ss b/collects/scribble/urls.rkt similarity index 100% rename from collects/scribble/urls.ss rename to collects/scribble/urls.rkt diff --git a/collects/scribble/xref.ss b/collects/scribble/xref.rkt similarity index 100% rename from collects/scribble/xref.ss rename to collects/scribble/xref.rkt diff --git a/collects/scribblings/scribble/info.ss b/collects/scribblings/scribble/info.rkt similarity index 100% rename from collects/scribblings/scribble/info.ss rename to collects/scribblings/scribble/info.rkt diff --git a/collects/scribblings/scribble/lp-ex-doc.scrbl b/collects/scribblings/scribble/lp-ex-doc.scrbl index 2d3bd6ae..c23d6e8e 100644 --- a/collects/scribblings/scribble/lp-ex-doc.scrbl +++ b/collects/scribblings/scribble/lp-ex-doc.scrbl @@ -1,4 +1,4 @@ #lang scribble/doc @(require scribble/lp-include) -@lp-include["lp-ex.ss"] +@lp-include["lp-ex.rkt"] diff --git a/collects/scribblings/scribble/lp-ex.ss b/collects/scribblings/scribble/lp-ex.rkt similarity index 100% rename from collects/scribblings/scribble/lp-ex.ss rename to collects/scribblings/scribble/lp-ex.rkt diff --git a/collects/scribblings/scribble/lp.scrbl b/collects/scribblings/scribble/lp.scrbl index 051aa335..2814d6ad 100644 --- a/collects/scribblings/scribble/lp.scrbl +++ b/collects/scribblings/scribble/lp.scrbl @@ -26,7 +26,7 @@ program, and the rest of the module is discarded. When using and are treated like an ordinary Scribble document, where @scheme[chunk]s are typeset in a manner similar to @scheme[codeblock]. -@(define-runtime-path lp-ex "lp-ex.ss") +@(define-runtime-path lp-ex "lp-ex.rkt") For example, consider this program: diff --git a/collects/scribblings/scribble/manual.scrbl b/collects/scribblings/scribble/manual.scrbl index 3aac8d62..a0552269 100644 --- a/collects/scribblings/scribble/manual.scrbl +++ b/collects/scribblings/scribble/manual.scrbl @@ -549,6 +549,13 @@ Like @scheme[defform], but without registering a definition.} Like @scheme[defform], but with a plain @scheme[id] as the form.} +@defform[(defidform/inline id)]{ + +Like @scheme[defidform], but @racket[id] is typeset as an inline +element. Use this form sparingly, because the typeset form does not +stand out to the reader as a specification of @racket[id].} + + @defform[(specform maybe-literals datum maybe-contracts pre-flow ...)]{ diff --git a/collects/scribblings/scribble/utils.ss b/collects/scribblings/scribble/utils.rkt similarity index 100% rename from collects/scribblings/scribble/utils.ss rename to collects/scribblings/scribble/utils.rkt diff --git a/collects/scriblib/autobib.ss b/collects/scriblib/autobib.rkt similarity index 100% rename from collects/scriblib/autobib.ss rename to collects/scriblib/autobib.rkt diff --git a/collects/scriblib/figure.ss b/collects/scriblib/figure.rkt similarity index 100% rename from collects/scriblib/figure.ss rename to collects/scriblib/figure.rkt diff --git a/collects/scriblib/gui-eval.ss b/collects/scriblib/gui-eval.rkt similarity index 100% rename from collects/scriblib/gui-eval.ss rename to collects/scriblib/gui-eval.rkt diff --git a/collects/scriblib/private/counter.ss b/collects/scriblib/private/counter.rkt similarity index 100% rename from collects/scriblib/private/counter.ss rename to collects/scriblib/private/counter.rkt diff --git a/collects/scriblib/private/gui-eval-exn.ss b/collects/scriblib/private/gui-eval-exn.rkt similarity index 100% rename from collects/scriblib/private/gui-eval-exn.ss rename to collects/scriblib/private/gui-eval-exn.rkt diff --git a/collects/scriblib/scribblings/info.ss b/collects/scriblib/scribblings/info.rkt similarity index 100% rename from collects/scriblib/scribblings/info.ss rename to collects/scriblib/scribblings/info.rkt diff --git a/collects/tests/scribble/collect.ss b/collects/tests/scribble/collect.rkt similarity index 100% rename from collects/tests/scribble/collect.ss rename to collects/tests/scribble/collect.rkt diff --git a/collects/tests/scribble/main.ss b/collects/tests/scribble/main.rkt similarity index 100% rename from collects/tests/scribble/main.ss rename to collects/tests/scribble/main.rkt diff --git a/collects/tests/scribble/preprocessor.ss b/collects/tests/scribble/preprocessor.rkt similarity index 100% rename from collects/tests/scribble/preprocessor.ss rename to collects/tests/scribble/preprocessor.rkt diff --git a/collects/tests/scribble/reader.ss b/collects/tests/scribble/reader.rkt similarity index 100% rename from collects/tests/scribble/reader.ss rename to collects/tests/scribble/reader.rkt