diff options
author | Aryadev Chavali <aryadev@aryadevchavali.com> | 2025-07-09 21:31:43 +0100 |
---|---|---|
committer | Aryadev Chavali <aryadev@aryadevchavali.com> | 2025-07-10 00:08:23 +0100 |
commit | cd6ac8930db6ad3b866b4b8398a25b49c3767a5b (patch) | |
tree | b7d85e0845f1d0aa1b17ee3a0105823190bba4be /packages.lisp | |
parent | 062b5f59d74bda9710c3b532648658a4a7910290 (diff) | |
download | cantedraw-cd6ac8930db6ad3b866b4b8398a25b49c3767a5b.tar.gz cantedraw-cd6ac8930db6ad3b866b4b8398a25b49c3767a5b.tar.bz2 cantedraw-cd6ac8930db6ad3b866b4b8398a25b49c3767a5b.zip |
Overhaulmaster
Loads of changes, some which I wasn't sure what I was on when doing
them
Diffstat (limited to 'packages.lisp')
-rw-r--r-- | packages.lisp | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/packages.lisp b/packages.lisp index 1c5f889..70d01ee 100644 --- a/packages.lisp +++ b/packages.lisp @@ -22,7 +22,7 @@ (:use :cl) (:export :--> :->> :-<> - :-> :fn + :-> :fn :call-rev :while :alist-val :$-> :$>> :$<>)) @@ -30,9 +30,8 @@ (:nicknames :5d-lib.functions) (:use :cl :5d-lib.macros) (:export - :parse-integer* :sort* - :range :take :split - :rev-map + :parse-integer* + :range :split :rev-map :remove-at-indices)) (defpackage cantedraw.model @@ -40,7 +39,7 @@ (:use :cl :5d-lib.macros :5d-lib.functions) (:export ;; Types - :int-card :rank :suit :cardset + :int-card :rank :suit :cardset :cardset-p ;; card struct :card :make-card :card-suit :card-rank :card-p ;; Converters @@ -59,9 +58,10 @@ :5d-lib.macros :5d-lib.functions :5d.model) (:export - :player - :error-player-nonexistent - :error-player-broke + ;; player struct + :player :make-player :player-name :player-balance :player-hand :player-p + :make-player-table + :error-player-nonexistent :error-player-broke :player-exists? :player-bankrupt? :player-can-pay? :player-debit :player-credit @@ -81,5 +81,5 @@ (:nicknames :5d.main) (:use :cl :5d-lib.macros :5d-lib.functions - :5d.model :5d.game) + :5d.model :5d.player :5d.game) (:export :start)) |