syndicate-lang
/
syndicate-2017
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Rename "matcher" to "trie".

This commit is contained in:
Tony Garnock-Jones 2016-01-21 22:02:24 -05:00
parent 1ab7475869
commit 5fcb4cb777
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
prospect-gl/2d.rkt
View File

@ -303,15 +303,15 @@
(flush-texture-cache!))
(define (process-stop-requests! p)
(when (matcher-match-value (patch-added p) 'stop #f)
(when (trie-lookup (patch-added p) 'stop #f)
(send (send this get-top-level-window) show #f)))
(define (process-fullscreen-requests! p)
(define changed? #f)
(when (matcher-match-value (patch-removed p) 'fullscreen #f)
(when (trie-lookup (patch-removed p) 'fullscreen #f)
(set! changed? #t)
(set! fullscreen? #f))
(when (matcher-match-value (patch-added p) 'fullscreen #f)
(when (trie-lookup (patch-added p) 'fullscreen #f)
(set! changed? #t)
(set! fullscreen? #t))
(when changed?