diff --git a/collects/macro-debugger/expand.ss b/collects/macro-debugger/expand.rkt similarity index 100% rename from collects/macro-debugger/expand.ss rename to collects/macro-debugger/expand.rkt diff --git a/collects/macro-debugger/info.ss b/collects/macro-debugger/info.rkt similarity index 100% rename from collects/macro-debugger/info.ss rename to collects/macro-debugger/info.rkt diff --git a/collects/macro-debugger/model/context.ss b/collects/macro-debugger/model/context.rkt similarity index 100% rename from collects/macro-debugger/model/context.ss rename to collects/macro-debugger/model/context.rkt diff --git a/collects/macro-debugger/model/debug.ss b/collects/macro-debugger/model/debug.rkt similarity index 100% rename from collects/macro-debugger/model/debug.ss rename to collects/macro-debugger/model/debug.rkt diff --git a/collects/macro-debugger/model/deriv-c.ss b/collects/macro-debugger/model/deriv-c.rkt similarity index 100% rename from collects/macro-debugger/model/deriv-c.ss rename to collects/macro-debugger/model/deriv-c.rkt diff --git a/collects/macro-debugger/model/deriv-parser.ss b/collects/macro-debugger/model/deriv-parser.rkt similarity index 100% rename from collects/macro-debugger/model/deriv-parser.ss rename to collects/macro-debugger/model/deriv-parser.rkt diff --git a/collects/macro-debugger/model/deriv-tokens.ss b/collects/macro-debugger/model/deriv-tokens.rkt similarity index 100% rename from collects/macro-debugger/model/deriv-tokens.ss rename to collects/macro-debugger/model/deriv-tokens.rkt diff --git a/collects/macro-debugger/model/deriv-util.ss b/collects/macro-debugger/model/deriv-util.rkt similarity index 96% rename from collects/macro-debugger/model/deriv-util.ss rename to collects/macro-debugger/model/deriv-util.rkt index ee8afd2..0a3c2a3 100644 --- a/collects/macro-debugger/model/deriv-util.ss +++ b/collects/macro-debugger/model/deriv-util.rkt @@ -1,7 +1,7 @@ #lang scheme/base (require (for-syntax scheme/base) - (for-syntax scheme/private/struct-info) + (for-syntax racket/private/struct-info) scheme/list scheme/match unstable/struct diff --git a/collects/macro-debugger/model/deriv.ss b/collects/macro-debugger/model/deriv.rkt similarity index 100% rename from collects/macro-debugger/model/deriv.ss rename to collects/macro-debugger/model/deriv.rkt diff --git a/collects/macro-debugger/model/hiding-policies.ss b/collects/macro-debugger/model/hiding-policies.rkt similarity index 100% rename from collects/macro-debugger/model/hiding-policies.ss rename to collects/macro-debugger/model/hiding-policies.rkt diff --git a/collects/macro-debugger/model/reductions-config.ss b/collects/macro-debugger/model/reductions-config.rkt similarity index 100% rename from collects/macro-debugger/model/reductions-config.ss rename to collects/macro-debugger/model/reductions-config.rkt diff --git a/collects/macro-debugger/model/reductions-engine.ss b/collects/macro-debugger/model/reductions-engine.rkt similarity index 100% rename from collects/macro-debugger/model/reductions-engine.ss rename to collects/macro-debugger/model/reductions-engine.rkt diff --git a/collects/macro-debugger/model/reductions.ss b/collects/macro-debugger/model/reductions.rkt similarity index 100% rename from collects/macro-debugger/model/reductions.ss rename to collects/macro-debugger/model/reductions.rkt diff --git a/collects/macro-debugger/model/steps.ss b/collects/macro-debugger/model/steps.rkt similarity index 100% rename from collects/macro-debugger/model/steps.ss rename to collects/macro-debugger/model/steps.rkt diff --git a/collects/macro-debugger/model/stx-util.ss b/collects/macro-debugger/model/stx-util.rkt similarity index 100% rename from collects/macro-debugger/model/stx-util.ss rename to collects/macro-debugger/model/stx-util.rkt diff --git a/collects/macro-debugger/model/trace-raw.ss b/collects/macro-debugger/model/trace-raw.rkt similarity index 100% rename from collects/macro-debugger/model/trace-raw.ss rename to collects/macro-debugger/model/trace-raw.rkt diff --git a/collects/macro-debugger/model/trace.ss b/collects/macro-debugger/model/trace.rkt similarity index 100% rename from collects/macro-debugger/model/trace.ss rename to collects/macro-debugger/model/trace.rkt diff --git a/collects/macro-debugger/model/yacc-ext.ss b/collects/macro-debugger/model/yacc-ext.rkt similarity index 100% rename from collects/macro-debugger/model/yacc-ext.ss rename to collects/macro-debugger/model/yacc-ext.rkt diff --git a/collects/macro-debugger/model/yacc-interrupted.ss b/collects/macro-debugger/model/yacc-interrupted.rkt similarity index 100% rename from collects/macro-debugger/model/yacc-interrupted.ss rename to collects/macro-debugger/model/yacc-interrupted.rkt diff --git a/collects/macro-debugger/stepper-text.ss b/collects/macro-debugger/stepper-text.rkt similarity index 100% rename from collects/macro-debugger/stepper-text.ss rename to collects/macro-debugger/stepper-text.rkt diff --git a/collects/macro-debugger/stepper.ss b/collects/macro-debugger/stepper.rkt similarity index 100% rename from collects/macro-debugger/stepper.ss rename to collects/macro-debugger/stepper.rkt diff --git a/collects/macro-debugger/syntax-browser.ss b/collects/macro-debugger/syntax-browser.rkt similarity index 100% rename from collects/macro-debugger/syntax-browser.ss rename to collects/macro-debugger/syntax-browser.rkt diff --git a/collects/macro-debugger/syntax-browser/controller.ss b/collects/macro-debugger/syntax-browser/controller.rkt similarity index 100% rename from collects/macro-debugger/syntax-browser/controller.ss rename to collects/macro-debugger/syntax-browser/controller.rkt diff --git a/collects/macro-debugger/syntax-browser/display.ss b/collects/macro-debugger/syntax-browser/display.rkt similarity index 100% rename from collects/macro-debugger/syntax-browser/display.ss rename to collects/macro-debugger/syntax-browser/display.rkt diff --git a/collects/macro-debugger/syntax-browser/embed.ss b/collects/macro-debugger/syntax-browser/embed.rkt similarity index 100% rename from collects/macro-debugger/syntax-browser/embed.ss rename to collects/macro-debugger/syntax-browser/embed.rkt diff --git a/collects/macro-debugger/syntax-browser/frame.ss b/collects/macro-debugger/syntax-browser/frame.rkt similarity index 100% rename from collects/macro-debugger/syntax-browser/frame.ss rename to collects/macro-debugger/syntax-browser/frame.rkt diff --git a/collects/macro-debugger/syntax-browser/hrule-snip.ss b/collects/macro-debugger/syntax-browser/hrule-snip.rkt similarity index 100% rename from collects/macro-debugger/syntax-browser/hrule-snip.ss rename to collects/macro-debugger/syntax-browser/hrule-snip.rkt diff --git a/collects/macro-debugger/syntax-browser/image.ss b/collects/macro-debugger/syntax-browser/image.rkt similarity index 100% rename from collects/macro-debugger/syntax-browser/image.ss rename to collects/macro-debugger/syntax-browser/image.rkt diff --git a/collects/macro-debugger/syntax-browser/interfaces.ss b/collects/macro-debugger/syntax-browser/interfaces.rkt similarity index 100% rename from collects/macro-debugger/syntax-browser/interfaces.ss rename to collects/macro-debugger/syntax-browser/interfaces.rkt diff --git a/collects/macro-debugger/syntax-browser/keymap.ss b/collects/macro-debugger/syntax-browser/keymap.rkt similarity index 100% rename from collects/macro-debugger/syntax-browser/keymap.ss rename to collects/macro-debugger/syntax-browser/keymap.rkt diff --git a/collects/macro-debugger/syntax-browser/partition.ss b/collects/macro-debugger/syntax-browser/partition.rkt similarity index 100% rename from collects/macro-debugger/syntax-browser/partition.ss rename to collects/macro-debugger/syntax-browser/partition.rkt diff --git a/collects/macro-debugger/syntax-browser/prefs.ss b/collects/macro-debugger/syntax-browser/prefs.rkt similarity index 100% rename from collects/macro-debugger/syntax-browser/prefs.ss rename to collects/macro-debugger/syntax-browser/prefs.rkt diff --git a/collects/macro-debugger/syntax-browser/pretty-helper.ss b/collects/macro-debugger/syntax-browser/pretty-helper.rkt similarity index 100% rename from collects/macro-debugger/syntax-browser/pretty-helper.ss rename to collects/macro-debugger/syntax-browser/pretty-helper.rkt diff --git a/collects/macro-debugger/syntax-browser/pretty-printer.ss b/collects/macro-debugger/syntax-browser/pretty-printer.rkt similarity index 100% rename from collects/macro-debugger/syntax-browser/pretty-printer.ss rename to collects/macro-debugger/syntax-browser/pretty-printer.rkt diff --git a/collects/macro-debugger/syntax-browser/properties.ss b/collects/macro-debugger/syntax-browser/properties.rkt similarity index 100% rename from collects/macro-debugger/syntax-browser/properties.ss rename to collects/macro-debugger/syntax-browser/properties.rkt diff --git a/collects/macro-debugger/syntax-browser/snip-decorated.ss b/collects/macro-debugger/syntax-browser/snip-decorated.rkt similarity index 100% rename from collects/macro-debugger/syntax-browser/snip-decorated.ss rename to collects/macro-debugger/syntax-browser/snip-decorated.rkt diff --git a/collects/macro-debugger/syntax-browser/snip.ss b/collects/macro-debugger/syntax-browser/snip.rkt similarity index 100% rename from collects/macro-debugger/syntax-browser/snip.ss rename to collects/macro-debugger/syntax-browser/snip.rkt diff --git a/collects/macro-debugger/syntax-browser/text.ss b/collects/macro-debugger/syntax-browser/text.rkt similarity index 100% rename from collects/macro-debugger/syntax-browser/text.ss rename to collects/macro-debugger/syntax-browser/text.rkt diff --git a/collects/macro-debugger/syntax-browser/util.ss b/collects/macro-debugger/syntax-browser/util.rkt similarity index 100% rename from collects/macro-debugger/syntax-browser/util.ss rename to collects/macro-debugger/syntax-browser/util.rkt diff --git a/collects/macro-debugger/syntax-browser/widget.ss b/collects/macro-debugger/syntax-browser/widget.rkt similarity index 100% rename from collects/macro-debugger/syntax-browser/widget.ss rename to collects/macro-debugger/syntax-browser/widget.rkt diff --git a/collects/macro-debugger/util/mpi.ss b/collects/macro-debugger/util/mpi.rkt similarity index 100% rename from collects/macro-debugger/util/mpi.ss rename to collects/macro-debugger/util/mpi.rkt diff --git a/collects/macro-debugger/view/cursor.ss b/collects/macro-debugger/view/cursor.rkt similarity index 100% rename from collects/macro-debugger/view/cursor.ss rename to collects/macro-debugger/view/cursor.rkt diff --git a/collects/macro-debugger/view/debug-format.ss b/collects/macro-debugger/view/debug-format.rkt similarity index 100% rename from collects/macro-debugger/view/debug-format.ss rename to collects/macro-debugger/view/debug-format.rkt diff --git a/collects/macro-debugger/view/debug.ss b/collects/macro-debugger/view/debug.rkt similarity index 100% rename from collects/macro-debugger/view/debug.ss rename to collects/macro-debugger/view/debug.rkt diff --git a/collects/macro-debugger/view/extensions.ss b/collects/macro-debugger/view/extensions.rkt similarity index 100% rename from collects/macro-debugger/view/extensions.ss rename to collects/macro-debugger/view/extensions.rkt diff --git a/collects/macro-debugger/view/frame.ss b/collects/macro-debugger/view/frame.rkt similarity index 100% rename from collects/macro-debugger/view/frame.ss rename to collects/macro-debugger/view/frame.rkt diff --git a/collects/macro-debugger/view/hiding-panel.ss b/collects/macro-debugger/view/hiding-panel.rkt similarity index 100% rename from collects/macro-debugger/view/hiding-panel.ss rename to collects/macro-debugger/view/hiding-panel.rkt diff --git a/collects/macro-debugger/view/interfaces.ss b/collects/macro-debugger/view/interfaces.rkt similarity index 100% rename from collects/macro-debugger/view/interfaces.ss rename to collects/macro-debugger/view/interfaces.rkt diff --git a/collects/macro-debugger/view/prefs.ss b/collects/macro-debugger/view/prefs.rkt similarity index 100% rename from collects/macro-debugger/view/prefs.ss rename to collects/macro-debugger/view/prefs.rkt diff --git a/collects/macro-debugger/view/step-display.ss b/collects/macro-debugger/view/step-display.rkt similarity index 100% rename from collects/macro-debugger/view/step-display.ss rename to collects/macro-debugger/view/step-display.rkt diff --git a/collects/macro-debugger/view/stepper.ss b/collects/macro-debugger/view/stepper.rkt similarity index 100% rename from collects/macro-debugger/view/stepper.ss rename to collects/macro-debugger/view/stepper.rkt diff --git a/collects/macro-debugger/view/term-record.ss b/collects/macro-debugger/view/term-record.rkt similarity index 100% rename from collects/macro-debugger/view/term-record.ss rename to collects/macro-debugger/view/term-record.rkt diff --git a/collects/macro-debugger/view/view.ss b/collects/macro-debugger/view/view.rkt similarity index 100% rename from collects/macro-debugger/view/view.ss rename to collects/macro-debugger/view/view.rkt diff --git a/collects/tests/macro-debugger/all-tests.ss b/collects/tests/macro-debugger/all-tests.rkt similarity index 100% rename from collects/tests/macro-debugger/all-tests.ss rename to collects/tests/macro-debugger/all-tests.rkt diff --git a/collects/tests/macro-debugger/gentest-framework.ss b/collects/tests/macro-debugger/gentest-framework.rkt similarity index 100% rename from collects/tests/macro-debugger/gentest-framework.ss rename to collects/tests/macro-debugger/gentest-framework.rkt diff --git a/collects/tests/macro-debugger/gentests.ss b/collects/tests/macro-debugger/gentests.rkt similarity index 100% rename from collects/tests/macro-debugger/gentests.ss rename to collects/tests/macro-debugger/gentests.rkt diff --git a/collects/tests/macro-debugger/gui-tests.ss b/collects/tests/macro-debugger/gui-tests.rkt similarity index 100% rename from collects/tests/macro-debugger/gui-tests.ss rename to collects/tests/macro-debugger/gui-tests.rkt diff --git a/collects/tests/macro-debugger/test-setup.ss b/collects/tests/macro-debugger/test-setup.rkt similarity index 100% rename from collects/tests/macro-debugger/test-setup.ss rename to collects/tests/macro-debugger/test-setup.rkt diff --git a/collects/tests/macro-debugger/tests/collects.ss b/collects/tests/macro-debugger/tests/collects.rkt similarity index 100% rename from collects/tests/macro-debugger/tests/collects.ss rename to collects/tests/macro-debugger/tests/collects.rkt diff --git a/collects/tests/macro-debugger/tests/hiding.ss b/collects/tests/macro-debugger/tests/hiding.rkt similarity index 100% rename from collects/tests/macro-debugger/tests/hiding.ss rename to collects/tests/macro-debugger/tests/hiding.rkt diff --git a/collects/tests/macro-debugger/tests/policy.ss b/collects/tests/macro-debugger/tests/policy.rkt similarity index 100% rename from collects/tests/macro-debugger/tests/policy.ss rename to collects/tests/macro-debugger/tests/policy.rkt diff --git a/collects/tests/macro-debugger/tests/regression.ss b/collects/tests/macro-debugger/tests/regression.rkt similarity index 100% rename from collects/tests/macro-debugger/tests/regression.ss rename to collects/tests/macro-debugger/tests/regression.rkt diff --git a/collects/tests/macro-debugger/tests/syntax-basic.ss b/collects/tests/macro-debugger/tests/syntax-basic.rkt similarity index 100% rename from collects/tests/macro-debugger/tests/syntax-basic.ss rename to collects/tests/macro-debugger/tests/syntax-basic.rkt diff --git a/collects/tests/macro-debugger/tests/syntax-errors.ss b/collects/tests/macro-debugger/tests/syntax-errors.rkt similarity index 100% rename from collects/tests/macro-debugger/tests/syntax-errors.ss rename to collects/tests/macro-debugger/tests/syntax-errors.rkt diff --git a/collects/tests/macro-debugger/tests/syntax-macros.ss b/collects/tests/macro-debugger/tests/syntax-macros.rkt similarity index 100% rename from collects/tests/macro-debugger/tests/syntax-macros.ss rename to collects/tests/macro-debugger/tests/syntax-macros.rkt diff --git a/collects/tests/macro-debugger/tests/syntax-modules.ss b/collects/tests/macro-debugger/tests/syntax-modules.rkt similarity index 100% rename from collects/tests/macro-debugger/tests/syntax-modules.ss rename to collects/tests/macro-debugger/tests/syntax-modules.rkt diff --git a/collects/unstable/find.ss b/collects/unstable/find.rkt similarity index 98% rename from collects/unstable/find.ss rename to collects/unstable/find.rkt index 3fc197e..86fdbb2 100644 --- a/collects/unstable/find.ss +++ b/collects/unstable/find.rkt @@ -1,5 +1,5 @@ -#lang scheme/base -(require scheme/contract +#lang racket/base +(require racket/contract unstable/struct) (provide/contract diff --git a/collects/unstable/scribblings/find.scrbl b/collects/unstable/scribblings/find.scrbl index 44479a6..a5a3f49 100644 --- a/collects/unstable/scribblings/find.scrbl +++ b/collects/unstable/scribblings/find.scrbl @@ -1,20 +1,20 @@ #lang scribble/manual @(require scribble/eval - "utils.ss" + "utils.rkt" (for-label unstable/find - scheme/contract - scheme/shared - scheme/base)) + racket/contract + racket/shared + racket/base)) @title[#:tag "find"]{Find} @(define the-eval (make-base-eval)) @(the-eval '(require unstable/find)) -@(the-eval '(require scheme/shared)) +@(the-eval '(require racket/shared)) @defmodule[unstable/find] -@unstable[@author+email["Ryan Culpepper" "ryanc@plt-scheme.org"]] +@unstable[@author+email["Ryan Culpepper" "ryanc@racket-lang.org"]] @defproc[(find [pred (-> any/c any/c)] [x any/c] @@ -23,23 +23,23 @@ [#:get-children get-children (or/c #f (-> any/c (or/c #f list?))) #f]) list?]{ -Returns a list of all values satisfying @scheme[pred] contained in -@scheme[x] (possibly including @scheme[x] itself). +Returns a list of all values satisfying @racket[pred] contained in +@racket[x] (possibly including @racket[x] itself). -If @scheme[stop-on-found?] is true, the children of values satisfying -@scheme[pred] are not examined. If @scheme[stop] is a procedure, then -the children of values for which @scheme[stop] returns true are not -examined (but the values themselves are; @scheme[stop] is applied -after @scheme[pred]). Only the current branch of the search is +If @racket[stop-on-found?] is true, the children of values satisfying +@racket[pred] are not examined. If @racket[stop] is a procedure, then +the children of values for which @racket[stop] returns true are not +examined (but the values themselves are; @racket[stop] is applied +after @racket[pred]). Only the current branch of the search is stopped, not the whole search. The search recurs through pairs, vectors, boxes, and the accessible -fields of structures. If @scheme[get-children] is a procedure, it can +fields of structures. If @racket[get-children] is a procedure, it can override the default notion of a value's children by returning a list (if it returns false, the default notion of children is used). -No cycle detection is done, so @scheme[find] on a cyclic graph may -diverge. To do cycle checking yourself, use @scheme[stop] and a +No cycle detection is done, so @racket[find] on a cyclic graph may +diverge. To do cycle checking yourself, use @racket[stop] and a mutable table. @examples[#:eval the-eval @@ -63,8 +63,8 @@ mutable table. [#:default default any/c (lambda () (error ....))]) any/c]{ -Like @scheme[find], but only returns the first match. If no -matches are found, @scheme[default] is applied as a thunk if it is a +Like @racket[find], but only returns the first match. If no +matches are found, @racket[default] is applied as a thunk if it is a procedure or returned otherwise. @examples[#:eval the-eval