ci-service.rkt (254B)
1 #lang racket/base 2 3 (provide ci-service^) 4 5 (require racket/unit racket/contract/base) 6 7 (define-signature ci-service^ 8 ((contracted 9 ;; The Service's query string based on the environment 10 [query (-> (listof (cons/c symbol? (or/c string? #f))))])))