From e7d2df998bdb0b9a634affaff3da5efe40a01973 Mon Sep 17 00:00:00 2001 From: "Robert P. Goldman" <rpgoldman@sift.net> Date: Tue, 15 Apr 2014 15:56:53 -0500 Subject: [PATCH] Check for an appropriate lisp-invocation version. --- test/test-program.script | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/test/test-program.script b/test/test-program.script index 70d51ee3..b4ee174f 100644 --- a/test/test-program.script +++ b/test/test-program.script @@ -23,8 +23,10 @@ ;; try harder by enabling the user's source-registry (initialize-source-registry "")) (unless (find-system :lisp-invocation nil) - (leave-test "Couldn't find lisp-invocation. Skipping the rest the test." 0)) + (leave-test "Couldn't find lisp-invocation. Skipping the rest of the test." 0)) (load-system :lisp-invocation) +(unless (version-satisfies (find-system :lisp-invocation) "1") + (leave-test "Lisp-invocation library isn't new enough to test successfully. Skipping test-program." 0)) ;; Disable any user source registry. (initialize-source-registry `(:source-registry :ignore-inherited-configuration)) -- GitLab