changed project name from cl-forth to kurt

This commit is contained in:
2024-08-16 10:09:45 +03:00
parent 68947d00aa
commit e90d124892
19 changed files with 52 additions and 18 deletions

View File

@@ -1,4 +1,4 @@
(in-package :cl-forth)
(in-package :kurt)
(defun drop-file-type (file &key (returns :string))
(let* ((file-str (namestring file))
@@ -73,7 +73,7 @@
(ignore-errors
(run-test file :target target))))
(remove-if-not (lambda (file)
(string= "lorth" (pathname-type file)))
(string= "kurt" (pathname-type file)))
(cl-fad:list-directory
(from-root "test"))))
counting (eq t success?) into succs