From 4dfb4c46a138d7f5f37ba2030b3cfff357fce9a9 Mon Sep 17 00:00:00 2001 From: Tony Garnock-Jones Date: Wed, 20 Jan 2016 14:16:18 -0500 Subject: [PATCH] world --> network --- examples/platformer/main.rkt | 20 ++++++++++---------- 1 file changed, 10 insertions(+), 10 deletions(-) diff --git a/examples/platformer/main.rkt b/examples/platformer/main.rkt index d248835..57e04f2 100644 --- a/examples/platformer/main.rkt +++ b/examples/platformer/main.rkt @@ -848,17 +848,17 @@ ;; LevelTerminationMonitor ;; ;; When the player vanishes from the board, or LevelCompleted is seen, -;; kills the world. +;; kills the network. (define (spawn-level-termination-monitor) (spawn (lambda (e s) (match e [(? patch/removed?) (log-info "Player died! Terminating level.") - (transition s (quit-world))] + (transition s (quit-network))] [(message (at-meta (level-completed))) (log-info "Level completed! Terminating level.") - (transition s (quit-world))] + (transition s (quit-network))] [_ #f])) (void) (patch-seq (sub (game-piece-configuration player-id ? ? ?)) @@ -897,7 +897,7 @@ #:level-size [level-size-vec (vector 4000 2000)] #:scene [scene grassland-backdrop] . actions) - (spawn-world + (spawn-network (and scene (spawn-background-image level-size-vec scene)) (spawn-display-controller level-size-vec) (spawn-physics-engine) @@ -969,10 +969,10 @@ (define game-level 3) ;; used to specify meta-level to reach external I/O -(2d-world #:width 600 #:height 400 - (spawn-keyboard-integrator) - (spawn-scene-manager) - (spawn-world (spawn-score-keeper) - (spawn-level-spawner 0) - ) +(2d-network #:width 600 #:height 400 + (spawn-keyboard-integrator) + (spawn-scene-manager) + (spawn-network (spawn-score-keeper) + (spawn-level-spawner 0) + ) )