diff --git a/test/test-program.script b/test/test-program.script
index 70d51ee32119e57d9f954b8c371fb0a6bccb5247..b4ee174fbff9b2d5a945f07dbbc5ba748918c988 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))