From 7d79a93566e860ef8cfe33cb6dbe82fca33b36fe Mon Sep 17 00:00:00 2001 From: Joe Thornber Date: Tue, 10 Oct 2017 11:44:05 +0100 Subject: [PATCH] [functional-tests] get the version string from VERSION --- functional-tests/functional-tests.scm | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/functional-tests/functional-tests.scm b/functional-tests/functional-tests.scm index 09f880a..16d15fe 100644 --- a/functional-tests/functional-tests.scm +++ b/functional-tests/functional-tests.scm @@ -183,8 +183,11 @@ ;;----------------------------------------------- - ;; FIXME: don't hard code this - (define tools-version "0.7.3") + (define tools-version + (chomp + (with-input-from-file "../VERSION" + (lambda () + (get-line (current-input-port)))))) (define (tool-name sym) (define (to-underscore c)