From 981fd3d9a7ad7e2b2dc4e92c5b594e6b2684a888 Mon Sep 17 00:00:00 2001 From: Frank Duncan Date: Mon, 27 Dec 2021 13:10:06 -0600 Subject: [PATCH] Rename projects, docgen->sheep, checkstyle->wolf --- .candle | 14 +++++++------- README.md | 2 +- bin/buildRelease.sh | 12 ++++++------ bin/generatedocs.sh | 6 +++--- bin/test.sh | 4 ++-- src/main/package.lisp | 2 +- src/main/style-checker.asd | 8 -------- src/main/wolf.asd | 8 ++++++++ src/main/{syntax-checker.lisp => wolf.lisp} | 2 +- src/test/main.lisp | 4 ++-- src/test/package.lisp | 2 +- src/test/{style-checker-test.asd => wolf-test.asd} | 6 +++--- 12 files changed, 35 insertions(+), 35 deletions(-) delete mode 100644 src/main/style-checker.asd create mode 100644 src/main/wolf.asd rename src/main/{syntax-checker.lisp => wolf.lisp} (99%) rename src/test/{style-checker-test.asd => wolf-test.asd} (63%) diff --git a/.candle b/.candle index a69e7fd..f31a745 100644 --- a/.candle +++ b/.candle @@ -1,11 +1,11 @@ -(:packages :style-checker :style-checker-test :docgen) -(:name :style-checker +(:packages :wolf :wolf-test :sheep) +(:name :wolf :tasks ((:name :test - :directions (style-checker-test:run-all-tests)) - (:name :checkstyle :directions - (syntax-checker:pretty-print-check-directory "src")) - (:name :docgen :directions - (docgen:pretty-print-validate-packages :syntax-checker)))) + :directions (wolf-test:run-all-tests)) + (:name :wolf :directions + (wolf:pretty-print-check-directory "src")) + (:name :sheep :directions + (sheep:pretty-print-validate-packages :wolf)))) ; vim:ft=lisp diff --git a/README.md b/README.md index 37409b9..0707073 100644 --- a/README.md +++ b/README.md @@ -1,7 +1,7 @@ # Common Lisp Style Checker Enforcement of my guidelines for common lisp style. -If you like, you can [download it](https://github.com/frankduncan/style-checker/releases/download/0.1/style-checker_0.1.tar.gz) +If you like, you can [download it](https://github.com/frankduncan/wolf/releases/download/0.1/wolf_0.1.tar.gz) ## Syntax Checking Rules * Elements on new line in each form must be indented the same amount diff --git a/bin/buildRelease.sh b/bin/buildRelease.sh index d5c1019..1d6161b 100755 --- a/bin/buildRelease.sh +++ b/bin/buildRelease.sh @@ -1,13 +1,13 @@ #!/bin/bash -version=$(sbcl --noinform --disable-ldb --lose-on-corruption --end-runtime-options --eval '(format t "~A" (asdf:component-version (asdf:find-system :style-checker)))' --eval "(quit)") +version=$(sbcl --noinform --disable-ldb --lose-on-corruption --end-runtime-options --eval '(format t "~A" (asdf:component-version (asdf:find-system :wolf)))' --eval "(quit)") echo -n "Building version $version, hit enter to continue" read -mkdir style-checker_$version -cp -ap src/main/* style-checker_$version/ -tar zcf style-checker_${version}.tar.gz style-checker_$version/ -rm -rf style-checker_$version +mkdir wolf_$version +cp -ap src/main/* wolf_$version/ +tar zcf wolf_${version}.tar.gz wolf_$version/ +rm -rf wolf_$version -echo "All done, it's in style-checker_${version}.tar.gz, you should tag it and push it up to github" +echo "All done, it's in wolf_${version}.tar.gz, you should tag it and push it up to github" diff --git a/bin/generatedocs.sh b/bin/generatedocs.sh index 25af9b8..324979a 100755 --- a/bin/generatedocs.sh +++ b/bin/generatedocs.sh @@ -1,8 +1,8 @@ #!/bin/bash sbcl \ - --eval "(asdf:load-system :docgen)" \ - --eval "(asdf:load-system :style-checker)" \ + --eval "(asdf:load-system :sheep)" \ + --eval "(asdf:load-system :wolf)" \ --eval "(format t \"----~%\")" \ - --eval "(format t \"~A\" (docgen:export-package :syntax-checker))" \ + --eval "(format t \"~A\" (sheep:export-package :wolf))" \ --eval "(quit)" 2> /dev/null | sed -n '/^----$/,$p' | tail -n +2 > wiki/Home.md diff --git a/bin/test.sh b/bin/test.sh index e4cb97d..0c3b572 100755 --- a/bin/test.sh +++ b/bin/test.sh @@ -1,4 +1,4 @@ #!/bin/bash -sbcl --eval "(asdf:load-system :style-checker)" --eval '(syntax-checker:pretty-print-check-directory "src")' -sbcl --eval "(asdf:load-system :style-checker)" --eval '(syntax-checker:pretty-print-check-directory "resources")' +sbcl --eval "(asdf:load-system :wolf)" --eval '(wolf:pretty-print-check-directory "src")' +sbcl --eval "(asdf:load-system :wolf)" --eval '(wolf:pretty-print-check-directory "resources")' diff --git a/src/main/package.lisp b/src/main/package.lisp index 504f2ac..5053c00 100644 --- a/src/main/package.lisp +++ b/src/main/package.lisp @@ -1,4 +1,4 @@ -(defpackage #:syntax-checker (:use :cl) +(defpackage #:wolf (:use :cl) (:export #:check-file #:check-directory #:pretty-print-check-directory) (:documentation "Enforces arbitrary set of style guidelines. diff --git a/src/main/style-checker.asd b/src/main/style-checker.asd deleted file mode 100644 index efbec3e..0000000 --- a/src/main/style-checker.asd +++ /dev/null @@ -1,8 +0,0 @@ -(asdf:defsystem style-checker - :name "Style Checker" - :version "0.1" - :maintainer "Frank Duncan (frank@kank.com)" - :author "Frank Duncan (frank@kank.com)" - :components ((:file "package") (:file "syntax-checker")) - :serial t - :depends-on (:cl-ppcre)) diff --git a/src/main/wolf.asd b/src/main/wolf.asd new file mode 100644 index 0000000..3671f2e --- /dev/null +++ b/src/main/wolf.asd @@ -0,0 +1,8 @@ +(asdf:defsystem wolf + :name "Wolf - A syntax checking utility for common lisp" + :version "0.1" + :maintainer "Frank Duncan (frank@consxy.com)" + :author "Frank Duncan (frank@consxy.com)" + :components ((:file "package") (:file "wolf")) + :serial t + :depends-on (:cl-ppcre)) diff --git a/src/main/syntax-checker.lisp b/src/main/wolf.lisp similarity index 99% rename from src/main/syntax-checker.lisp rename to src/main/wolf.lisp index f6c31da..d6f60e3 100644 --- a/src/main/syntax-checker.lisp +++ b/src/main/wolf.lisp @@ -1,4 +1,4 @@ -(in-package #:syntax-checker) +(in-package #:wolf) ; Some thoughts ; - form starting reader macros will have to be hand added to this code diff --git a/src/test/main.lisp b/src/test/main.lisp index 3278681..e1176db 100644 --- a/src/test/main.lisp +++ b/src/test/main.lisp @@ -1,4 +1,4 @@ -(in-package #:style-checker-test) +(in-package #:wolf-test) (defvar *tests* nil) @@ -8,7 +8,7 @@ (let ((green (format nil "~c[1;32m" #\Esc)) (red (format nil "~c[1;31m" #\Esc)) - (result (syntax-checker:check-file ,filename))) + (result (wolf:check-file ,filename))) (cond ((not (eql ,success (car result))) (format t "~A- ~A failed, expected ~A and got ~A~c[0m~%" diff --git a/src/test/package.lisp b/src/test/package.lisp index 26eb90c..3d11409 100644 --- a/src/test/package.lisp +++ b/src/test/package.lisp @@ -1,2 +1,2 @@ -(defpackage #:style-checker-test (:use :common-lisp) +(defpackage #:wolf-test (:use :common-lisp) (:export :run-all-tests)) diff --git a/src/test/style-checker-test.asd b/src/test/wolf-test.asd similarity index 63% rename from src/test/style-checker-test.asd rename to src/test/wolf-test.asd index 02661cb..daa8d88 100644 --- a/src/test/style-checker-test.asd +++ b/src/test/wolf-test.asd @@ -1,8 +1,8 @@ -(asdf:defsystem style-checker-test - :name "Style Checker Tests" +(asdf:defsystem wolf-test + :name "Wolf Tests" :version "0.1" :maintainer "Frank Duncan (frank@kank.com)" :author "Frank Duncan (frank@kank.com)" :serial t :components ((:file "package") (:file "main")) - :depends-on (:style-checker)) + :depends-on (:wolf)) -- 2.25.1