diff options
author | colin <colin@cicadas.surf> | 2024-12-10 07:11:02 -0800 |
---|---|---|
committer | colin <colin@cicadas.surf> | 2024-12-14 08:35:58 -0800 |
commit | 8a51ba81c7df6b0b6dab7cf4b35b5ca084b653ba (patch) | |
tree | 23f5f0a5449a06473aba2ec7914a3c2193823a10 /src/interactive/image.lisp | |
parent | 2cbb8e4114c860e1774efd40d18661aee8ab2a72 (diff) |
Replaced defclass-std with defrefactor-with-def
Diffstat (limited to 'src/interactive/image.lisp')
-rw-r--r-- | src/interactive/image.lisp | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/src/interactive/image.lisp b/src/interactive/image.lisp index 644c06e..a0fce09 100644 --- a/src/interactive/image.lisp +++ b/src/interactive/image.lisp @@ -4,11 +4,12 @@ (defvar *image-shader-program* nil "Cached for later cleanup.") + (defvar *image-vao* nil) -(defclass/std image (unit interactive) - ((texture :ri :std (error "A image requires a texture.")) - (alpha :std 1.0))) +(def:class image (unit interactive) + (texture :required :ro :type texture) + (alpha :type float :initform 1.0)) (defun make-shared-image-gpu-objects () (unless *image-shader-program* |