Update for route.rkt -> trie.rkt switch

This commit is contained in:
Tony Garnock-Jones 2016-03-15 09:53:52 -04:00
parent 5fcb4cb777
commit a7eae9b00e
2 changed files with 5 additions and 5 deletions

View File

@ -23,7 +23,7 @@
(require (prefix-in pict: pict))
(require prospect)
(require prospect/route)
(require prospect/trie)
(require prospect/ground)
(require "texture.rkt")
@ -180,8 +180,8 @@
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(define scene-projection (compile-projection (?! (scene ? ?))))
(define sprite-projection (compile-projection (?! (sprite ? ?))))
(define scene-projection (?! (scene ? ?)))
(define sprite-projection (?! (sprite ? ?)))
(define sprite-order
(order 'sprite-order

View File

@ -4,8 +4,8 @@
(require 2htdp/image)
(require "../2d.rkt")
(define window-projection (compile-projection (at-meta (?! (window ? ?)))))
(define key-pressed-projection (compile-projection (key-pressed (?!))))
(define window-projection (at-meta (?! (window ? ?))))
(define key-pressed-projection (key-pressed (?!)))
(define (spawn-background)
(spawn (lambda (e s)