diff options
| author | Aryadev Chavali <aryadev@aryadevchavali.com> | 2025-02-14 15:12:10 +0000 |
|---|---|---|
| committer | Aryadev Chavali <aryadev@aryadevchavali.com> | 2025-02-14 16:00:41 +0000 |
| commit | 4c27e7d5c1bf118d62da28e2be9a0983022190e3 (patch) | |
| tree | 93b87bd294c9f762882fdf855b28164dabc4390b | |
| parent | b335a12b7851405b3796f6efd463989196080fe3 (diff) | |
| download | cantedraw-4c27e7d5c1bf118d62da28e2be9a0983022190e3.tar.gz cantedraw-4c27e7d5c1bf118d62da28e2be9a0983022190e3.tar.bz2 cantedraw-4c27e7d5c1bf118d62da28e2be9a0983022190e3.zip | |
cantedraw.lisp -> main.lisp
| -rw-r--r-- | cantedraw.asd | 4 | ||||
| -rw-r--r-- | main.lisp (renamed from cantedraw.lisp) | 6 | ||||
| -rw-r--r-- | packages.lisp | 2 |
3 files changed, 6 insertions, 6 deletions
diff --git a/cantedraw.asd b/cantedraw.asd index b86503f..37be1d5 100644 --- a/cantedraw.asd +++ b/cantedraw.asd @@ -2,10 +2,10 @@ :components ((:file "packages") (:file "lib.macros") (:file "lib.functions") - (:file "cantedraw")) + (:file "main")) :build-operation "program-op" :build-pathname "bin/cantedraw" - :entry-point "cantedraw:start") + :entry-point "main:start") #+sb-core-compression (defmethod asdf:perform ((o asdf:image-op) (c asdf:system)) diff --git a/cantedraw.lisp b/main.lisp index 4380d8a..32a0088 100644 --- a/cantedraw.lisp +++ b/main.lisp @@ -1,4 +1,4 @@ -;;; cantedraw.lisp - 2025-02-11 +;;; main.lisp - 2025-02-11 ;; Copyright (C) 2025 Aryadev Chavali @@ -13,12 +13,12 @@ ;;; Commentary: -;; Implementation of `cantedraw' package. Defines the entrypoint of the program, +;; Implementation of `main' package. Defines the entrypoint of the program, ;; handling any input from the user and passing it into the system. ;;; Code: -(in-package :cantedraw) +(in-package :main) (fn read-input (&optional (prompt "> ")) (-> (&optional string) string) (format t "~a" prompt) diff --git a/packages.lisp b/packages.lisp index 7c77f50..b2a6760 100644 --- a/packages.lisp +++ b/packages.lisp @@ -32,6 +32,6 @@ :range :take :split :rev-map)) -(defpackage cantedraw +(defpackage main (:use :cl :lib.macros :lib.functions) (:export :start)) |