From 3a8c42e2d95efe594bde72abee58dca5ac9a5610 Mon Sep 17 00:00:00 2001 From: Joe Thornber Date: Tue, 10 Oct 2017 11:37:32 +0100 Subject: [PATCH] [functional-tests] use the tools in bin, rather than those installed on the system. --- functional-tests/functional-tests.scm | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/functional-tests/functional-tests.scm b/functional-tests/functional-tests.scm index cbb68a9..09f880a 100644 --- a/functional-tests/functional-tests.scm +++ b/functional-tests/functional-tests.scm @@ -190,7 +190,11 @@ (define (to-underscore c) (if (eq? #\- c) #\_ c)) - (list->string (map to-underscore (string->list (symbol->string sym))))) + (string-append "../bin/" + (list->string + (map to-underscore + (string->list + (symbol->string sym)))))) (define-syntax define-tool (syntax-rules ()