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

Remove obsolete definition.

This commit is contained in:
Tony Garnock-Jones 2016-05-15 07:01:32 -04:00
parent 74c663d5d4
commit cd60353053
1 changed files with 0 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
racket/syndicate/broker/server.rkt
View File

@ -106,11 +106,6 @@
(define (wrap-trie* scope t)
(pattern->trie #t (broker-data scope (embedded-trie t))))
(define stuff-to-prune
(trie-union-all #:combiner (lambda (v1 v2) (trie-success #t))
(list (pattern->trie #t (at-meta ?))
(pattern->trie #t (observe (at-meta ?))))))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(module+ main