suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

added state display to world programs

Browse Source 
svn: r15837
This commit is contained in:
Matthias Felleisen 2009-08-30 18:11:19 +00:00
parent 68fb5e42fa
commit 8c20ce344d
1 changed files with 27 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

32
collects/teachpack/2htdp/scribblings/universe.scrbl
View File

@ -161,7 +161,8 @@ The design of a world program demands that you come up with a data
@defform/subs[#:id big-bang @defform/subs[#:id big-bang
#:literals #:literals
(on-tick on-draw on-key on-mouse on-receive stop-when check-with register record? name) (on-tick on-draw on-key on-mouse on-receive stop-when
check-with register record? state name)
(big-bang state-expr clause ...) (big-bang state-expr clause ...)
([clause ([clause
(on-tick tick-expr) (on-tick tick-expr)
@ -173,6 +174,7 @@ The design of a world program demands that you come up with a data
(stop-when stop-expr) (stop-when stop-expr last-scene-expr) (stop-when stop-expr) (stop-when stop-expr last-scene-expr)
(check-with world?-expr) (check-with world?-expr)
(record? boolean-expr) (record? boolean-expr)
(state boolean-expr)
(on-receive rec-expr) (on-receive rec-expr)
(register IP-expr) (register IP-expr)
(name name-expr) (name name-expr)
@ -452,6 +454,17 @@ All @tech{MouseEvent}s are represented via strings:
interaction. The replay action also generates one png image per scene and interaction. The replay action also generates one png image per scene and
an animated gif for the entire sequence. an animated gif for the entire sequence.
}} }}
@item{
@defform[(state boolean-expr)
#:contracts
([boolean-expr boolean?])]{
tell DrScheme to display a separate window in which the current
state is rendered each time it is updated. This is useful for beginners
who wish to see how their world evolves---without having to design a
rendering function---plus for the debugging of world programs.
}}
] ]
The following example shows that @scheme[(run-simulation create-UFO-scene)] is The following example shows that @scheme[(run-simulation create-UFO-scene)] is
@ -654,8 +667,8 @@ Each world-producing callback in a world program---those for handling clock
@defproc[(make-package [w any/c][m sexp?]) package?]{ @defproc[(make-package [w any/c][m sexp?]) package?]{
create a @tech{Package} from a @tech{WorldState} and an @tech{S-expression}.} create a @tech{Package} from a @tech{WorldState} and an @tech{S-expression}.}
As mentioned, all event handlers may return @tech{WorldState}s or @tech{Package}s; As mentioned, all event handlers may return @tech{WorldState}s or
here are the revised specifications: @tech{Package}s; here are the revised specifications:
@defform/none[#:literals (on-tick) @defform/none[#:literals (on-tick)
(on-tick tick-expr) (on-tick tick-expr)
@ -904,7 +917,7 @@ The @tech{server} itself is created with a description that includes the
@defform/subs[#:id universe @defform/subs[#:id universe
#:literals #:literals
(on-new on-msg on-tick on-disconnect to-string check-with) (on-new on-msg on-tick on-disconnect to-string check-with state)
(universe state-expr clause ...) (universe state-expr clause ...)
([clause ([clause
(on-new new-expr) (on-new new-expr)
@ -912,6 +925,7 @@ The @tech{server} itself is created with a description that includes the
(on-tick tick-expr) (on-tick tick-expr)
(on-tick tick-expr rate-expr) (on-tick tick-expr rate-expr)
(on-disconnect dis-expr) (on-disconnect dis-expr)
(state boolean-expr)
(to-string render-expr) (to-string render-expr)
(check-with universe?-expr) (check-with universe?-expr)
])]{ ])]{
@ -993,7 +1007,6 @@ optional handlers:
tell DrScheme to apply @scheme[tick-expr] as above but use the specified tell DrScheme to apply @scheme[tick-expr] as above but use the specified
clock tick rate instead of the default. clock tick rate instead of the default.
} }
} }
@item{ @item{
@ -1025,6 +1038,15 @@ optional handlers:
@tech{UniverseState}.} @tech{UniverseState}.}
} }
@item{
@defform/none[(state boolean-expr)
#:contracts
([boolean-expr boolean?])]{
tell DrScheme to display a separate window in which the current
state is rendered each time it is updated. This is mostly useful for
debugging server programs.
}}
] ]
@subsection{Exploring a Universe} @subsection{Exploring a Universe}