The simplified-driver doesn't need any UDP operations

This commit is contained in:
Tony Garnock-Jones 2012-01-16 17:20:10 -05:00
parent 744c963abb
commit c6f9545817
1 changed files with 8 additions and 3 deletions

View File

@ -10,14 +10,19 @@
(require "api.rkt")
(require "codec.rkt")
(require "zonedb.rkt")
(require "ground-udp-operations-unit.rkt")
(require "network-query-unit.rkt")
(require "network-query-sig.rkt")
(require "resolver-unit.rkt")
(require "dump-bytes.rkt")
(require "simple-udp-service.rkt")
(define-unit network-query@
(import)
(export network-query^)
(define (network-query/addresses q db ns-rr addresses)
(error 'network-query/addresses "Forbidden to invoke resolver in server")))
(define-values/invoke-unit/infer
(link resolver@ network-query@ ground-udp-operations@))
(link resolver@ network-query@))
;; Instantiated with a SOA record for the zone it is serving as well
;; as a zone's worth of DNS data which is used to answer queries