diff options
| author | Aryadev Chavali <aryadev@aryadevchavali.com> | 2025-02-11 00:48:14 +0000 |
|---|---|---|
| committer | Aryadev Chavali <aryadev@aryadevchavali.com> | 2025-02-11 00:54:01 +0000 |
| commit | 90ef834393c819e708800c1a759c183ccdd25842 (patch) | |
| tree | a07023783890e9744479e53f3fa5a1a90a58a483 | |
| parent | 9b3d8e471a8ab5280898095dcef1b77cf7570241 (diff) | |
| download | cantedraw-90ef834393c819e708800c1a759c183ccdd25842.tar.gz cantedraw-90ef834393c819e708800c1a759c183ccdd25842.tar.bz2 cantedraw-90ef834393c819e708800c1a759c183ccdd25842.zip | |
odraw -> cantedraw
Why name it something unique when this is what I'm going to be making
at the end of it all? Just makes it more confusing for the end user.
| -rw-r--r-- | bob.lisp | 6 | ||||
| -rw-r--r-- | cantedraw.asd (renamed from odraw.asd) | 8 | ||||
| -rw-r--r-- | cantedraw.lisp (renamed from odraw.lisp) | 6 | ||||
| -rw-r--r-- | packages.lisp | 2 |
4 files changed, 11 insertions, 11 deletions
@@ -26,11 +26,11 @@ (in-package :bob) (ql:quickload :deploy) -(asdf:load-asd (merge-pathnames "odraw.asd" (uiop:getcwd))) +(asdf:load-asd (merge-pathnames "cantedraw.asd" (uiop:getcwd))) (defun build () (push :deploy-console *features*) - (asdf:make :odraw)) + (asdf:make :cantedraw)) (defun load-all () - (asdf:load-system :odraw)) + (asdf:load-system :cantedraw)) diff --git a/odraw.asd b/cantedraw.asd index fee4d6e..d3aa60d 100644 --- a/odraw.asd +++ b/cantedraw.asd @@ -1,9 +1,9 @@ -(asdf:defsystem :odraw +(asdf:defsystem :cantedraw :depends-on (:deploy) :components ((:file "packages") (:file "lib.macros") (:file "lib.functions") - (:file "odraw")) + (:file "cantedraw")) :build-operation "deploy-op" - :build-pathname "odraw" - :entry-point "odraw:start") + :build-pathname "cantedraw" + :entry-point "cantedraw:start") diff --git a/odraw.lisp b/cantedraw.lisp index d4d94ee..4380d8a 100644 --- a/odraw.lisp +++ b/cantedraw.lisp @@ -1,4 +1,4 @@ -;;; odraw.lisp - 2025-02-11 +;;; cantedraw.lisp - 2025-02-11 ;; Copyright (C) 2025 Aryadev Chavali @@ -13,12 +13,12 @@ ;;; Commentary: -;; Implementation of `odraw' package. Defines the entrypoint of the program, +;; Implementation of `cantedraw' package. Defines the entrypoint of the program, ;; handling any input from the user and passing it into the system. ;;; Code: -(in-package :odraw) +(in-package :cantedraw) (fn read-input (&optional (prompt "> ")) (-> (&optional string) string) (format t "~a" prompt) diff --git a/packages.lisp b/packages.lisp index 703f890..7c77f50 100644 --- a/packages.lisp +++ b/packages.lisp @@ -32,6 +32,6 @@ :range :take :split :rev-map)) -(defpackage odraw +(defpackage cantedraw (:use :cl :lib.macros :lib.functions) (:export :start)) |