aboutsummaryrefslogtreecommitdiffhomepage
path: root/src/interactive/sprite.lisp
diff options
context:
space:
mode:
authorcolin <colin@cicadas.surf>2024-12-14 08:36:23 -0800
committercolin <colin@cicadas.surf>2024-12-14 08:36:23 -0800
commit3a2217263d581be9a7f629b10d75aa8e3d581890 (patch)
tree23f5f0a5449a06473aba2ec7914a3c2193823a10 /src/interactive/sprite.lisp
parent03cdbb6a15e130a012377ab8d54074b6864e3480 (diff)
parent8a51ba81c7df6b0b6dab7cf4b35b5ca084b653ba (diff)
Merge branch 'refactor-with-def'
Diffstat (limited to 'src/interactive/sprite.lisp')
-rw-r--r--src/interactive/sprite.lisp8
1 files changed, 5 insertions, 3 deletions
diff --git a/src/interactive/sprite.lisp b/src/interactive/sprite.lisp
index 68f8a8d..dd9b2a1 100644
--- a/src/interactive/sprite.lisp
+++ b/src/interactive/sprite.lisp
@@ -2,9 +2,11 @@
(in-package #:wheelwork)
-(defclass/std sprite (unit interactive)
- ((framesets :with :doc "A PLIST whose values are framesets.")
- (frameset-key :with :doc "The current name of the frameset being displayed.")))
+(def:class sprite (unit interactive)
+ ((framesets "A PLIST whose values are framesets")
+ :required :prefix)
+ ((frameset-key "The name of the current frameset being displayed")
+ :required :prefix))
(defun current-frameset (sprite)
"Returns the current FRAMESET instance being displayed on SRPITE."