Correct contract documentation
This commit is contained in:
parent
f86c372baa
commit
18facb4c9e
|
@ -168,7 +168,7 @@
|
||||||
(define (filter-by-type rrset type)
|
(define (filter-by-type rrset type)
|
||||||
(set-filter (lambda (rr) (eqv? (rr-type rr) type)) rrset))
|
(set-filter (lambda (rr) (eqv? (rr-type rr) type)) rrset))
|
||||||
|
|
||||||
;; filter-rrs : SetOf<RR> QueryType QueryClass
|
;; filter-rrs : SetOf<RR> QueryType QueryClass -> SetOf<RR>
|
||||||
;; Returns a set like its argument with RRs not matching the given
|
;; Returns a set like its argument with RRs not matching the given
|
||||||
;; type and class removed.
|
;; type and class removed.
|
||||||
(define (filter-rrs rrs qtype qclass)
|
(define (filter-rrs rrs qtype qclass)
|
||||||
|
|
Loading…
Reference in New Issue