From ee86069822421c24b3fc65643a916341a8df4ba6 Mon Sep 17 00:00:00 2001 From: Robby Findler Date: Sat, 10 Aug 2013 05:23:32 -0500 Subject: [PATCH] add some debugging to try to figure out why the drdr run of these files are going wrong original commit: 577bae67698a6cf65f8472329bb185fe0e5ced5a --- pkgs/gui-pkgs/gui-test/framework/tests/test-suite-utils.rkt | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/pkgs/gui-pkgs/gui-test/framework/tests/test-suite-utils.rkt b/pkgs/gui-pkgs/gui-test/framework/tests/test-suite-utils.rkt index 06295eeb..62ea3c48 100644 --- a/pkgs/gui-pkgs/gui-test/framework/tests/test-suite-utils.rkt +++ b/pkgs/gui-pkgs/gui-test/framework/tests/test-suite-utils.rkt @@ -99,7 +99,9 @@ racket-bin (path->string (collection-file-path "framework-test-engine.rkt" "framework" "tests"))) - (eprintf "starting gracket failed; used path ~s\n" racket-bin)))) + (eprintf "starting gracket failed; used path ~s; (find-system-path 'exec-file) = ~s\n" + racket-bin + (find-system-path 'exec-file))))) (debug-printf mz-tcp "accepting listener\n") (let-values ([(in out) (tcp-accept listener)]) (set! in-port in)