diff options
| author | Colin Okay <colin@cicadas.surf> | 2022-06-29 11:54:24 -0500 |
|---|---|---|
| committer | Colin Okay <colin@cicadas.surf> | 2022-06-29 11:54:24 -0500 |
| commit | 82f71b0d13788b1cff9a24c5b652effd11631523 (patch) | |
| tree | f0ec127b2f10f46029983ee95b6c72ef29bc504c /src/gl/texture.lisp | |
| parent | 4d1ee56c96ce254134b692f0e3b3271c87a42b54 (diff) | |
[refactor] [structure] modularized project file structure
Diffstat (limited to 'src/gl/texture.lisp')
| -rw-r--r-- | src/gl/texture.lisp | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/src/gl/texture.lisp b/src/gl/texture.lisp new file mode 100644 index 0000000..ad753a1 --- /dev/null +++ b/src/gl/texture.lisp @@ -0,0 +1,12 @@ +;;;; texture.lisp + +(in-package #:wheelwork) + +(defclass/std texture () + ((width height id mipmap :with :r) + (internal-format image-format :ri :with :std :rgba) + (wrap-s wrap-t :ri :with :std :repeat) + (min-filter mag-filter :ri :with :std :nearest))) + +(defmethod cleanup ((texture texture)) + (gl:delete-texture (texture-id texture))) |