From 9960303469d3e26d911a53022ed1c1b2a4f33f1a Mon Sep 17 00:00:00 2001 From: Helmut Merz Date: Thu, 18 Apr 2024 21:03:56 +0200 Subject: [PATCH] add first primitive (dummy) version of test facility --- scopes.asd | 3 ++- test/test-forge.lisp | 12 ++++++++++++ 2 files changed, 14 insertions(+), 1 deletion(-) create mode 100644 test/test-forge.lisp diff --git a/scopes.asd b/scopes.asd index e115c71..74c6f63 100644 --- a/scopes.asd +++ b/scopes.asd @@ -8,7 +8,8 @@ :homepage "https://www.cyberconcepts.org" :description "" :depends-on (:str) - :components ((:file "forge/forge")) + :components ((:file "forge/forge") + (:file "test/test-forge")) :long-description "scopes: generic data processingg facilities") ;;#.(uiop:read-file-string diff --git a/test/test-forge.lisp b/test/test-forge.lisp new file mode 100644 index 0000000..886aa76 --- /dev/null +++ b/test/test-forge.lisp @@ -0,0 +1,12 @@ +;;; cl-scopes/test/test-forge + +;;;; testing facility for scopes/forge + +(defpackage :scopes/test-forge + (:use :common-lisp :scopes/forge) + (:export #:run)) + +(in-package :scopes/test-forge) + +(defun run () + (scf:hello))