diff --git a/stress.rkt b/stress.rkt index e6ef081..529658f 100644 --- a/stress.rkt +++ b/stress.rkt @@ -8,6 +8,7 @@ (require "../racket-bitsyntax/main.rkt") (require "api.rkt") (require "codec.rkt") +(require "test-rrs.rkt") (require racket/pretty) @@ -36,7 +37,9 @@ 'recursion-desired 'no-recursion-available 'no-error - (list (question (domain '(#"example")) '* '*)) + (list (question (domain '(#"www" #"google" #"com")) + 'a + 'in)) '() '() '())) @@ -68,4 +71,4 @@ (record-latency-ms! (- received-time sent-time)) (loop (- remaining 1))))) -(stress "localhost" 5555 100000 500) +(stress "localhost" (test-port-number) 100000 500)