From 1c3ebd17bda7a43172645db94ffb5baf4d7c2ffc Mon Sep 17 00:00:00 2001 From: Tony Garnock-Jones Date: Fri, 17 Feb 2012 16:05:56 -0500 Subject: [PATCH] Make stress.rkt use a more sensible question and get its port number from DNSPORT --- stress.rkt | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) 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)