oreodave/cantedraw
Archived
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

main -> odraw

Browse Source
This commit is contained in:
Aryadev Chavali
2025-02-11 00:30:27 +00:00
parent 0b66ce5dc1
commit 52f7db44cf
3 changed files with 6 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
odraw.asd
View File

@@ -3,7 +3,7 @@
:components ((:file "packages") :components ((:file "packages")
(:file "lib.macros") (:file "lib.macros")
(:file "lib.functions") (:file "lib.functions")
(:file "main")) (:file "odraw"))
:build-operation "deploy-op" :build-operation "deploy-op"
:build-pathname "odraw" :build-pathname "odraw"
:entry-point "main:start") :entry-point "odraw:start")

6
main.lisp → odraw.lisp
View File

@@ -1,4 +1,4 @@
;;; main.lisp - 2025-02-09 ;;; odraw.lisp - 2025-02-11
;; Copyright (C) 2025 Aryadev Chavali ;; Copyright (C) 2025 Aryadev Chavali
@@ -13,12 +13,12 @@
;;; Commentary: ;;; Commentary:
;; Implementation of `main' package. Defines the entrypoint of the program, ;; Implementation of `odraw' package. Defines the entrypoint of the program,
;; handling any input from the user and passing it into the system. ;; handling any input from the user and passing it into the system.
;;; Code: ;;; Code:
(in-package :main) (in-package :odraw)
(fn read-input (&optional (prompt "> ")) (-> (&optional string) string) (fn read-input (&optional (prompt "> ")) (-> (&optional string) string)
(format t "~a" prompt) (format t "~a" prompt)

2
packages.lisp
View File

@@ -32,6 +32,6 @@
:range :take :split :range :take :split
:rev-map)) :rev-map))
(defpackage main (defpackage odraw
(:use :cl :lib.macros :lib.functions) (:use :cl :lib.macros :lib.functions)
(:export :start)) (:export :start))