Recketizing much in `net/*', mass ".ss" -> ".rkt" conversion in .scrbl files.

(Some other minor things here and there.)
This commit is contained in:
Eli Barzilay 2011-06-20 04:00:14 -04:00
parent e008fc3399
commit debd1f9f1e
776 changed files with 1520 additions and 2318 deletions

View File

@ -264,7 +264,7 @@ sequence.
The @racket[code] code will appear on a new line in the file for C
compilation. Multiple @racket[c-include] declarations are concatenated
(with newlines) in order to produces a sequence of declarations.}
(with newlines) in order to produce a sequence of declarations.}
@defform[(c-include path-spec)]{

View File

@ -1,7 +1,5 @@
#lang scribble/doc
@(require scribblings/htdp-langs/common
"std-grammar.ss"
"prim-ops.ss"
@(require scribblings/htdp-langs/common "std-grammar.rkt" "prim-ops.rkt"
(for-label deinprogramm/DMdA-assignments))
@title[#:style 'toc #:tag "DMdA-advanced"]{Die Macht der Abstraktion fortgeschritten}
@ -35,7 +33,7 @@ Abstraktion - fortgeschritten} that goes with the German textbook
@|prim-nonterms|
@prim-ops['(lib "DMdA-advanced.ss" "deinprogramm") #'here]
@prim-ops['(lib "DMdA-advanced.rkt" "deinprogramm") #'here]
@section[#:tag "advanced-quote"]{Quote-Literal}
@ -54,4 +52,4 @@ Signatur für Symbole.
@section[#:tag "advanced-prim-op"]{Primitive Operationen}
@prim-op-defns['(lib "DMdA-advanced.ss" "deinprogramm") #'here '()]
@prim-op-defns['(lib "DMdA-advanced.rkt" "deinprogramm") #'here '()]

View File

@ -1,8 +1,8 @@
#lang scribble/doc
@(require scribblings/htdp-langs/common
"std-grammar.ss"
"prim-ops.ss"
(for-label deinprogramm/DMdA-assignments (only-in deinprogramm/DMdA-beginner define-record-procedures-parametric)))
@(require scribblings/htdp-langs/common "std-grammar.rkt" "prim-ops.rkt"
(for-label deinprogramm/DMdA-assignments
(only-in deinprogramm/DMdA-beginner
define-record-procedures-parametric)))
@title[#:style 'toc #:tag "DMdA-assignments"]{Die Macht der Abstraktion mit Zuweisungen}
@ -28,7 +28,7 @@ Abstraktion mit Zuweisungen} to go with the German textbook
@|prim-nonterms|
@prim-ops['(lib "DMdA-assignments.ss" "deinprogramm") #'here]
@prim-ops['(lib "DMdA-assignments.rkt" "deinprogramm") #'here]
@section{@scheme[define-record-procedures-2]}
@ -105,4 +105,4 @@ gebunden.}
@section[#:tag "assignments-prim-op"]{Primitive Operationen}
@prim-op-defns['(lib "DMdA-assignments.ss" "deinprogramm") #'here '()]
@prim-op-defns['(lib "DMdA-assignments.rkt" "deinprogramm") #'here '()]

View File

@ -1,8 +1,6 @@
#lang scribble/doc
@(require scribblings/htdp-langs/common
scribble/struct
"std-grammar.ss"
"prim-ops.ss"
@(require scribblings/htdp-langs/common scribble/struct
"std-grammar.rkt" "prim-ops.rkt"
(for-label deinprogramm/DMdA-beginner))
@title[#:style 'toc #:tag "DMdA-beginner"]{Die Macht der Abstraktion - Anfänger}
@ -20,7 +18,7 @@ Macht der Abstraktion}.
@|prim-nonterms|
@prim-ops['(lib "DMdA-beginner.ss" "deinprogramm") #'here]
@prim-ops['(lib "DMdA-beginner.rkt" "deinprogramm") #'here]
@; ----------------------------------------------------------------------
@ -441,4 +439,4 @@ Eigenschaft: @scheme[(==> c p)] legt fest, daß die Eigenschaft
@section[#:tag "beginner-prim-ops"]{Primitive Operationen}
@declare-exporting[deinprogramm/DMdA-beginner]
@prim-op-defns['(lib "DMdA-beginner.ss" "deinprogramm") #'here '()]
@prim-op-defns['(lib "DMdA-beginner.rkt" "deinprogramm") #'here '()]

View File

@ -1,7 +1,5 @@
#lang scribble/doc
@(require scribblings/htdp-langs/common
"std-grammar.ss"
"prim-ops.ss"
@(require scribblings/htdp-langs/common "std-grammar.rkt" "prim-ops.rkt"
(for-label deinprogramm/DMdA-vanilla
(only-in deinprogramm/DMdA-beginner define)))
@ -20,7 +18,7 @@ Abstraktion}.
@|prim-nonterms|
@prim-ops['(lib "DMdA-vanilla.ss" "deinprogramm") #'here]
@prim-ops['(lib "DMdA-vanilla.rkt" "deinprogramm") #'here]
@section[#:tag "signatures-vanilla"]{Signaturen}
@ -77,5 +75,4 @@ sich also auf das @scheme[a] aus dem @scheme[let*]-Ausdruck, nicht das
@section[#:tag "vanilla-prim-op"]{Primitive Operationen}
@prim-op-defns['(lib "DMdA-vanilla.ss" "deinprogramm") #'here '()]
@prim-op-defns['(lib "DMdA-vanilla.rkt" "deinprogramm") #'here '()]

View File

@ -1,12 +1,11 @@
#lang scribble/doc
@(require scribble/manual "shared.ss"
(for-label scheme
teachpack/deinprogramm/image))
@(require scribble/manual "shared.rkt"
(for-label scheme teachpack/deinprogramm/image))
@teachpack["image"]{Bilder konstruieren}
Note: This is documentation for the @tt{image.ss} teachpack that goes
Note: This is documentation for the @filepath{image.rkt} teachpack that goes
with the German textbook
@italic{@link["http://www.deinprogramm.de/dmda/"]{Die Macht der
Abstraktion}}.

View File

@ -1,13 +1,13 @@
#lang scribble/doc
@(require scribble/manual "shared.ss"
@(require scribble/manual "shared.rkt"
(for-label scheme
teachpack/deinprogramm/image
teachpack/deinprogramm/line3d))
@teachpack["line3d"]{3D-Liniengraphik}
Note: This is documentation for the @tt{line3d.ss} teachpack that goes
Note: This is documentation for the @filepath{line3d.rkt} teachpack that goes
with the German textbook
@italic{@link["http://www.deinprogramm.de/dmda/"]{Die Macht der
Abstraktion}}.

View File

@ -1,14 +1,11 @@
#lang scribble/doc
@(require scribble/manual
"shared.ss"
scribble/struct
(for-label scheme
teachpack/deinprogramm/sound))
@(require scribble/manual scribble/struct "shared.rkt"
(for-label scheme teachpack/deinprogramm/sound))
@teachpack["sound"]{Abspielen von Audio-Dateien}
Note: This is documentation for the @tt{sound.ss} teachpack that goes
Note: This is documentation for the @filepath{sound.rkt} teachpack that goes
with the German textbook
@italic{@link["http://www.deinprogramm.de/dmda/"]{Die Macht der
Abstraktion}}.

View File

@ -1,15 +1,13 @@
#lang scribble/doc
@(require scribble/manual
"shared.ss"
scribble/struct
@(require scribble/manual scribble/struct "shared.rkt"
(for-label scheme
teachpack/deinprogramm/image
teachpack/deinprogramm/turtle))
@teachpack["turtle"]{Turtle-Grafik}
Note: This is documentation for the @tt{turtle.ss} teachpack that goes
Note: This is documentation for the @filepath{turtle.rkt} teachpack that goes
with the German textbook
@italic{@link["http://www.deinprogramm.de/dmda/"]{Die Macht der
Abstraktion}}.

View File

@ -1,15 +1,13 @@
#lang scribble/doc
@(require scribble/manual
"shared.ss"
scribble/struct
@(require scribble/manual scribble/struct "shared.rkt"
(for-label scheme
teachpack/deinprogramm/image
teachpack/deinprogramm/world))
@teachpack["world"]{Animationen}
Note: This is documentation for the @tt{world.ss} teachpack that goes
Note: This is documentation for the @filepath{world.rkt} teachpack that goes
with the German textbook
@italic{@link["http://www.deinprogramm.de/dmda/"]{Die Macht der
Abstraktion}}.

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@defclass/title[aligned-pasteboard% pasteboard% (alignment-parent<%>)]{

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@definterface/title[alignment-parent<%> ()]{

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@definterface/title[alignment<%> (dllist<%>)]{

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@defclass/title[button-snip% snip% ()]{

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@title[#:tag "containers" #:style 'toc]{Containers}

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@title[#:tag "control-snips" #:style 'toc]{Control Snips}

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@title[#:tag "controls" #:style 'toc]{Controls}

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@definterface/title[dllist<%> ()]{

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@defclass/title[embedded-button% snip-wrapper% (alignment<%>)]{

View File

@ -1,6 +1,5 @@
#lang scribble/doc
@(require "common.ss"
(for-label framework))
@(require "common.rkt" (for-label framework))
@title{@bold{Embedded GUI}: Widgets within @scheme[editor<%>]}

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@defclass/title[embedded-message% snip-wrapper% ()]{

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@defclass/title[embedded-text-button% snip-wrapper% (alignment<%>)]{

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@defclass/title[embedded-toggle-button% snip-wrapper% (alignment<%>)]{

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@defclass/title[hline% snip-wrapper% (alignment<%>)]{
@ -8,4 +8,3 @@ Displays a horizontal line across the region that is inserted into.
@defconstructor[([parent (is-a?/c alignment-parent<%>)])]{
}
}

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@defclass/title[horizontal-alignment% dllist<%> (alignment<%> alignment-parent<%>)]{

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@title[#:tag "snip-related-functions"]{Snip Functions}

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@defclass/title[snip-wrapper% dllist<%> (alignment<%>)]{

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@definterface/title[stretchable-snip<%> ()]{

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@defclass/title[text-button-snip% snip% ()]{

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@defclass/title[toggle-button-snip% snip% ()]{

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@defclass/title[vertical-alignment% dllist<%> (alignment<%> alignment-parent<%>)]{

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@defclass/title[vline% snip-wrapper% (alignment<%>)]{
@ -8,4 +8,3 @@ Displays a vertical line across the region that is inserted into.
@defconstructor[([parent (is-a?/c alignment-parent<%>)])]{
}
}

View File

@ -318,7 +318,7 @@ procedure is suitable for use as a compilation handler via
(-> any/c any/c compiled-expression)]{
Produces a compile handler that is like
@scheme[errortrace-compile-handler], except that the code that the
@scheme[errortrace-compile-handler], except that the code that
it produces is instrumented if the value of
@schemeblock[(namespace-module-registry (current-namespace))]
is the same as when the original thunk is invoked.

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@title{@bold{File}: Racket File Format Libraries}

View File

@ -1,7 +1,5 @@
#lang scribble/doc
@(require "common.ss"
(for-label file/gunzip
file/gzip))
@(require "common.rkt" (for-label file/gunzip file/gzip))
@title[#:tag "gunzip"]{@exec{gzip} Decompression}

View File

@ -1,6 +1,5 @@
#lang scribble/doc
@(require "common.ss"
(for-label file/gzip))
@(require "common.rkt" (for-label file/gzip))
@title[#:tag "gzip"]{@exec{gzip} Compression and File Creation}

View File

@ -1,7 +1,5 @@
#lang scribble/doc
@(require "common.ss"
scribble/eval
(for-label file/md5))
@(require "common.rkt" scribble/eval (for-label file/md5))
@(define md5-eval (make-base-eval))
@interaction-eval[#:eval md5-eval (require file/md5)]

View File

@ -1,6 +1,5 @@
#lang scribble/doc
@(require "common.ss"
(for-label file/resource))
@(require "common.rkt" (for-label file/resource))
@(define-syntax-rule (compat file section indexed-racket what)
@elem{For backward compatibilty, the

View File

@ -1,7 +1,5 @@
#lang scribble/doc
@(require "common.ss"
scribble/eval
(for-label file/sha1))
@(require "common.rkt" scribble/eval (for-label file/sha1))
@(define sha1-eval (make-base-eval))
@interaction-eval[#:eval sha1-eval (require file/sha1)]

View File

@ -1,6 +1,5 @@
#lang scribble/doc
@(require "common.ss"
(for-label file/tar file/gzip))
@(require "common.rkt" (for-label file/tar file/gzip))
@title[#:tag "tar"]{@exec{tar} File Creation}

View File

@ -1,8 +1,5 @@
#lang scribble/doc
@(require "common.ss"
(for-label file/zip
file/gunzip
scheme/file))
@(require "common.rkt" (for-label file/zip file/gunzip scheme/file))
@title[#:tag "zip"]{@exec{zip} File Creation}

View File

@ -407,34 +407,34 @@ To run the following animation/GUI demos, simply set the language
level to FrTime, open the corresponding file, and Execute. See the
demo source code for more information.
@scheme[orbit-mouse.ss] : A collection of balls that move in circles
@scheme[orbit-mouse.rkt] : A collection of balls that move in circles
around the mouse pointer.
@scheme[piston.ss] : Simulation of a piston/cylinder.
@scheme[piston.rkt] : Simulation of a piston/cylinder.
@scheme[rotation.ss] : Balls moving in circles.
@scheme[rotation.rkt] : Balls moving in circles.
@scheme[delay-mouse.ss] : A trail of balls following the mouse.
@scheme[delay-mouse.rkt] : A trail of balls following the mouse.
@scheme[ball-on-string.ss] : A ball chasing the mouse.
@scheme[ball-on-string.rkt] : A ball chasing the mouse.
@scheme[pong.ss] : A simple pong/air-hockey game. The left paddle moves with
@scheme[pong.rkt] : A simple pong/air-hockey game. The left paddle moves with
numeric keypad; the right paddle moves with the mouse. The 'r' key
resets the score.
@scheme[pizza.ss] : A simple "pizza ordering" user interface based on an HtDP
@scheme[pizza.rkt] : A simple "pizza ordering" user interface based on an HtDP
exercise.
@scheme[calculator.ss] : A simple calculator interface, also based on an HtDP
@scheme[calculator.rkt] : A simple calculator interface, also based on an HtDP
exercise except that the result updates continuously as the arguments
and operator change.
The next three animation examples are courtesy of Robb Cutler:
@scheme[analog-clock.ss] : An animated real-time clock. A slider adjusts the radius
of the face. Click and drag to move the face around.
@scheme[analog-clock.rkt] : An animated real-time clock. A slider adjusts the
radius of the face. Click and drag to move the face around.
@scheme[growing-points.ss] : A field of points that grow as the mouse approaches.
@scheme[needles.ss] : A field of needles that point at the mouse.
@scheme[growing-points.rkt] : A field of points that grow as the mouse
approaches.
@scheme[needles.rkt] : A field of needles that point at the mouse.

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@gametitle["Aces" "aces" "Solitaire Card Game"]

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@gametitle["Blackjack" "blackjack" "21 Card Game"]

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@gametitle["Checkers" "checkers" "Board Game"]

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@gametitle["Crazy 8s" "crazy8s" "Card Game"]

View File

@ -1,9 +1,7 @@
#lang scribble/doc
@(require "common.ss"
(for-label scheme/base
scheme/contract
games/show-help
games/show-scribbling))
@(require "common.rkt"
(for-label scheme/base scheme/contract
games/show-help games/show-scribbling))
@title{@bold{Games}: Fun Examples}
@ -24,8 +22,8 @@ installed as sub-collections of the @filepath{games} collection (see
The game-starting console inspects the sub-collections of the
@filepath{games} collection. If a sub-collection has an
@filepath{info.ss} module (see @schememodname[setup/infotab]), the
following fields of the collection's "info.ss" file are used:
@filepath{info.rkt} module (see @schememodname[setup/infotab]), the
following fields of the collection's @filepath{info.rkt} file are used:
@itemize[

View File

@ -1,12 +1,10 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@(define Lambda "\u3BB")
@gametitle["GCalc" "gcalc" "Visual \u3BB-Calculus"]
@gametitle["GCalc" "gcalc" "Visual λ-Calculus"]
@onscreen{GCalc} is a system for visually demonstrating the
@|Lambda|-Calculus (not really a game).
λ-Calculus (not really a game).
See the following for the principles:
@ -60,22 +58,22 @@ undo feature: a right-click on the right cell always splits the main
cube to two halves and throws the right side.
The colored cubes and the six basic operators make this simple domain,
which is extended to form a @|Lambda|-Calculus-like language by adding
which is extended to form a λ-Calculus-like language by adding
abstractions and applications. Right-clicking on a basic cube on the
left panel creates an abstraction which is actually a lambda
expression except that colors are used instead of syntactic variables.
For example, if the main cell contains @onscreen{R|G} (red-green on
the left and right), then right-clicking the green cube on the left
panel leaves us with @onscreen{@|Lambda| G . R|G}, which is visualized
panel leaves us with @onscreen{λ G . R|G}, which is visualized
as @onscreen{R|G} with a green circle. The last two operator cells
are used for application of these abstractions: drag a function to the
top-right to have it applied on the main cube, or to the bottom-left
to have the main cube applied to it. As in the @|Lambda|-Calculus,
to have the main cube applied to it. As in the λ-Calculus,
all abstractions have exactly one variable, use currying for multiple
variables.
So far the result is a domain of colored cubes that can be used in the
same way as the simple @|Lambda|-Calculus. There is one last
same way as the simple λ-Calculus. There is one last
extension that goes one step further: function cubes can themselves be
combined with other functions using the simple operations. This
results in a form of "spatial functions" that behave differently in

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@gametitle["Rummy" "ginrummy" "Card Game"]

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@gametitle["Gobblet" "gobblet" "Strategy Game"]

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@gametitle["Go Fish" "gofish" "Kid's Card Game"]

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@gametitle["Jewel" "jewel" "3-D Skill Game"]

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@gametitle["Lights Out" "lights-out" "Logic Game"]

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@gametitle["Memory" "memory" "Kid's Game"]

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@gametitle["Minesweeper" "mines" "Logic Game"]

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@gametitle["Paint By Numbers" "paint-by-numbers" "Logic Game"]

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@gametitle["Parcheesi" "parcheesi" "Board Game"]

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@gametitle["Pousse" "pousse" "Tic-Tac-Toe-like Game"]

View File

@ -1,8 +1,5 @@
#lang scribble/doc
@(require "common.ss"
racket/class
racket/draw
(only-in slideshow/pict dc)
@(require "common.rkt" racket/class racket/draw (only-in slideshow/pict dc)
"../same/same-lib.rkt")
@(define board-width 6)

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@gametitle["Slidey" "slidey" "Picture Puzzle"]

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@gametitle["Spider" "spider" "Solitaire Card Game"]

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@title[#:style 'toc #:tag "bundled"]{Bundled Games}

View File

@ -1,9 +1,9 @@
#lang scribble/doc
@(require "common.ss"
(for-label "../graphics.ss"
"../graphics-sig.ss"
"../graphics-unit.ss"
"../graphics-posn-less-unit.ss"))
@(require "common.rkt"
(for-label "../graphics.rkt"
"../graphics-sig.rkt"
"../graphics-unit.rkt"
"../graphics-posn-less-unit.rkt"))
@title{@bold{Graphics}: Legacy Library}

View File

@ -1,7 +1,5 @@
#lang scribble/doc
@(require "common.ss"
(for-label "../turtles.ss"
"../turtle-examples.ss"))
@(require "common.rkt" (for-label "../turtles.rkt" "../turtle-examples.rkt"))
@title{Traditional Turtles}

View File

@ -1,7 +1,5 @@
#lang scribble/doc
@(require "common.ss"
(for-label "../value-turtles.ss"))
@(require "common.rkt" (for-label "../value-turtles.rkt"))
@title{Value Turtles}

View File

@ -160,7 +160,7 @@ Similar to @scheme[!list] but also forces (using @scheme[!]) the
elements of the list.}
@;{ This moved into lazy.ss, and all the other forces will move there too.
@;{ This moved into lazy.rkt, and all the other forces will move there too.
@subsection{Multiple values}

View File

@ -1,16 +1,9 @@
#lang scribble/doc
@(require scribble/manual
(for-label scheme/base
scheme/contract
scheme/unit
make
make/make-unit
make/make-sig
make/collection
make/collection-sig
make/collection-unit
dynext/file-sig
compiler/sig))
(for-label scheme/base scheme/contract scheme/unit
make make/make-unit make/make-sig
make/collection make/collection-sig make/collection-unit
dynext/file-sig compiler/sig))
@(define raco-manual @other-manual['(lib "scribblings/raco/raco.scrbl")])
@ -348,11 +341,12 @@ The arguments are as follows:
supply @scheme['("wsock32")].}
@item{@scheme[extra-depends] --- a list of relative paths to treat as
dependencies for compiling `file.c'. Often this list will include
`file.c' with the ".c" suffix replaced by ".ss" or ".scm". For
example, the "openssl" installer supplies '("mzssl.ss") to ensure
that the stub module "mzssl.ss" is never used when the true
extension can be built.}
dependencies for compiling @filepath{file.c}. Often this list will
include @filepath{file.c} with the @filepath{.c} suffix replaced by
@filepath{.rkt}. For example, the "openssl" installer supplies
@scheme['("mzssl.rkt")] to ensure that the stub module
@filepath{mzssl.rkt} is never used when the true extension can be
built.}
@item{@scheme[last-chance-k] --- a procedure of one argument, which
is a thunk. This procedure should invoke the thunk to make the

View File

@ -1,11 +1,7 @@
(require
mzlib/class
mzlib/list
mred
mzlib/etc
"../aligned-editor-container.ss"
"../aligned-pasteboard.ss"
"../snip-lib.ss")
(require mzlib/class mzlib/list mred mzlib/etc
"../aligned-editor-container.rkt"
"../aligned-pasteboard.rkt"
"../snip-lib.rkt")
(define f (new frame% (label "test") (width 200) (height 200)))
(define e (new text%))

View File

@ -1,6 +1,4 @@
(require
"../aligned-pasteboard.ss"
"../aligned-editor-container.ss")
(require "../aligned-pasteboard.rkt" "../aligned-editor-container.rkt")
(define (converges? x) #t)

View File

@ -1,10 +1,4 @@
(require
mzlib/etc
mzlib/list
mzlib/match
"../alignment.ss"
"test-macro.ss")
(require mzlib/etc mzlib/list mzlib/match "../alignment.rkt" "test-macro.rkt")
;;los-equal? ((listof rect?) (listof rect?) . -> . boolean?)
;;tests the equality of the list of structures

View File

@ -1,14 +1,9 @@
(require mzlib/etc mzlib/class "test-macro.rkt" mred
"../pasteboard-lib.rkt"
"../aligned-pasteboard.rkt"
"../aligned-editor-container.rkt")
(require
mzlib/etc
mzlib/class
"test-macro.ss"
mred
"../pasteboard-lib.ss"
"../aligned-pasteboard.ss"
"../aligned-editor-container.ss")
;; (printf "running tests for pasteboard-lib.ss\n")
;; (printf "running tests for pasteboard-lib.rkt\n")
;;pasteboard-root: ((is-a?/c aligned-pasteboard<%>) -> (is-a?/c aligned-pasteboard<%>))
;;gets the top most aligned pasteboard in the tree of pasteboards and containers

View File

@ -1,14 +1,9 @@
(require mzlib/etc mzlib/class mred "test-macro.rkt"
"../snip-lib.rkt"
"../aligned-pasteboard.rkt"
"../aligned-editor-container.rkt")
(require
mzlib/etc
mzlib/class
mred
"../snip-lib.ss"
"../aligned-pasteboard.ss"
"../aligned-editor-container.ss"
"test-macro.ss")
;;(printf "running tests for snip-lib.ss\n")
;;(printf "running tests for snip-lib.rkt\n")
;;snip-width: ((is-a?/c aligned-pasteboard<%>) (is-a?/c snip%) . -> . number?)
;;the width of a snip in the given pasteboard

View File

@ -1,12 +1,7 @@
(require
mzlib/class
mred
mzlib/etc
mzlib/list
"../aligned-pasteboard.ss"
"../aligned-editor-container.ss"
"snip-dumper.ss")
(require mzlib/class mred mzlib/etc mzlib/list
"../aligned-pasteboard.rkt"
"../aligned-editor-container.rkt"
"snip-dumper.rkt")
; ;;
@ -21,7 +16,7 @@
; ;
; ;;;
(printf "running test1.ss\n")
(printf "running test.rktl\n")
(define frame
(instantiate frame% ()

View File

@ -1,11 +1,7 @@
(require
mzlib/class
mred
mzlib/etc
mzlib/list
"../aligned-pasteboard.ss"
"../aligned-editor-container.ss"
"snip-dumper.ss")
(require mzlib/class mred mzlib/etc mzlib/list
"../aligned-pasteboard.rkt"
"../aligned-editor-container.rkt"
"snip-dumper.rkt")
;
;
@ -22,7 +18,7 @@
; ;;;
;
(printf "running test2.ss\n")
(printf "running test2.rktl\n")
(define frame
(instantiate frame% ()

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@defclass/title[aligned-editor-canvas% editor-canvas% ()]{
@ -7,4 +7,3 @@ Calls the
@method[aligned-pasteboard<%> realign] method when resized.
}

View File

@ -1,9 +1,8 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@defclass/title[aligned-editor-snip% editor-snip% ()]{
Calls the @method[aligned-pasteboard<%> realign] method when resized.
}

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@definterface/title[aligned-pasteboard<%> ()]{

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@definterface/title[aligned-pasteboard-parent<%> ()]{
@ -10,4 +10,3 @@ is an @scheme[aligned-pasteboard<%>].
void?]{}
}

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "../common.ss")
@(require "../common.rkt")
@title[#:style 'toc]{Aligned Pasteboard}

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@defclass/title[horizontal-pasteboard% pasteboard% (aligned-pasteboard<%>)]{
@ -28,4 +28,3 @@ Passes all arguments to @scheme[super-init].
(resized [snip (is-a?/c snip%)]
[redraw-now? any/c])
void?]{}}

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@definterface/title[stretchable-snip<%> ()]{

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@defclass/title[vertical-pasteboard% pasteboard% (aligned-pasteboard<%>)]{

View File

@ -1,6 +1,5 @@
#lang scribble/doc
@(require "common.ss"
(for-label mrlib/bitmap-label))
@(require "common.rkt" (for-label mrlib/bitmap-label))
@title{Bitmap Label}

View File

@ -1,14 +1,13 @@
#lang scribble/doc
@(require "common.ss"
(for-label mrlib/cache-image-snip))
@(require "common.rkt" (for-label mrlib/cache-image-snip))
@title{Cache-image Snip}
@defmodule[mrlib/cache-image-snip]{
The @schememodname[mrlib/cache-image-snip] library provides the core
data structure for DrRacket's @filepath{image.ss} teachpack. Images in
the @filepath{image.ss} teachpack are instances of the
data structure for DrRacket's @filepath{image.rkt} teachpack. Images in
the @filepath{image.rkt} teachpack are instances of the
@scheme[cache-image-snip%] class.}
The library also defines a new type, @scheme[argb], that represents a

View File

@ -1,9 +1,7 @@
#lang scribble/doc
@(require "common.ss"
@(require "common.rkt"
(for-label mrlib/close-icon
scheme/gui
scheme/runtime-path
scheme/include))
scheme/gui scheme/runtime-path scheme/include))
@title{Close Icon}

View File

@ -1,7 +1,5 @@
#lang scribble/doc
@(require "common.ss"
(for-label mrlib/gif
file/gif))
@(require "common.rkt" (for-label mrlib/gif file/gif))
@title{GIF and Animated GIF Writing}

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@definterface/title[graph-pasteboard<%> ()]{
@ -121,4 +121,3 @@ of an arrowhead for a line that connects (@scheme[from-x],@scheme[from-y]) to (@
}
}

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@defmixin/title[graph-pasteboard-mixin (pasteboard%) (graph-pasteboard<%>)]{

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@definterface/title[graph-snip<%> ()]{

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss")
@(require "common.rkt")
@defmixin/title[graph-snip-mixin (snip%) (graph-snip<%>)]{
}

View File

@ -1,6 +1,5 @@
#lang scribble/doc
@(require "common.ss"
(for-label mrlib/graph))
@(require "common.rkt" (for-label mrlib/graph))
@title[#:style 'toc]{Graphs}

View File

@ -1,6 +1,5 @@
#lang scribble/doc
@(require "../common.ss"
(for-label mrlib/hierlist))
@(require "../common.rkt" (for-label mrlib/hierlist))
@definterface/title[hierarchical-list-compound-item<%>
(hierarchical-list-item<%>)]{

View File

@ -1,6 +1,5 @@
#lang scribble/doc
@(require "../common.ss"
(for-label mrlib/hierlist))
@(require "../common.rkt" (for-label mrlib/hierlist))
@title[#:style 'toc]{Hierarchical List Control}

View File

@ -1,6 +1,5 @@
#lang scribble/doc
@(require "../common.ss"
(for-label mrlib/hierlist))
@(require "../common.rkt" (for-label mrlib/hierlist))
@definterface/title[hierarchical-list-item<%> ()]{

View File

@ -1,6 +1,5 @@
#lang scribble/doc
@(require "../common.ss"
(for-label mrlib/hierlist))
@(require "../common.rkt" (for-label mrlib/hierlist))
@defclass/title[hierarchical-list% editor-canvas% ()]{

View File

@ -1,6 +1,5 @@
#lang scribble/doc
@(require "../common.ss"
(for-label mrlib/hierlist))
@(require "../common.rkt" (for-label mrlib/hierlist))
@title{Snips in a @scheme[hierarchical-list%] Instance}

View File

@ -1,6 +1,5 @@
#lang scribble/doc
@(require "common.ss"
(for-label mrlib/image-core))
@(require "common.rkt" (for-label mrlib/image-core))
@title{Image Core}

View File

@ -1,8 +1,6 @@
#lang scribble/doc
@(require "common.ss"
(for-label mrlib/include-bitmap
scheme/runtime-path
scheme/include))
@(require "common.rkt"
(for-label mrlib/include-bitmap scheme/runtime-path scheme/include))
@title{Include Bitmap}

View File

@ -1,7 +1,5 @@
#lang scribble/doc
@(require "common.ss"
(for-label mrlib/interactive-value-port
scheme/pretty))
@(require "common.rkt" (for-label mrlib/interactive-value-port scheme/pretty))
@title{Interactive Value Port}

View File

@ -1,5 +1,5 @@
#lang scribble/doc
@(require "common.ss"
@(require "common.rkt"
(for-label mrlib/matrix-snip
(only-in mrlib/cache-image-snip
cache-image-snip%)))

Some files were not shown because too many files have changed in this diff Show More