Skip to content

Commit

Permalink
define some constants for named values that aren't really "enum"s
Browse files Browse the repository at this point in the history
fixes #80
  • Loading branch information
3b committed May 9, 2024
1 parent 26fa139 commit 49d389f
Show file tree
Hide file tree
Showing 3 changed files with 16 additions and 1 deletion.
1 change: 1 addition & 0 deletions cl-opengl.asd
Original file line number Diff line number Diff line change
Expand Up @@ -62,6 +62,7 @@
(:file "funcs-gles2")
;; Lispifications.
(:file "package")
(:file "special-constants")
(:file "util")
(:file "opengl")
(:file "rasterization")
Expand Down
7 changes: 6 additions & 1 deletion gl/package.lisp
Original file line number Diff line number Diff line change
Expand Up @@ -455,4 +455,9 @@
#:create-renderbuffers
#:create-renderbuffer
#:delete-renderbuffer
#:bind-image-textures))
#:bind-image-textures
;; extra constants
#:+all-pixels-amd+
#:+invalid-index+
#:+timeout-ignored+
#:+timeout-ignored-apple+))
9 changes: 9 additions & 0 deletions gl/special-constants.lisp
Original file line number Diff line number Diff line change
@@ -0,0 +1,9 @@
(in-package #:cl-opengl)

;;; special values for some numeric arguments

(defconstant +all-pixels-amd+ #xFFFFFFFF)
(defconstant +invalid-index+ #xFFFFFFFF)
(defconstant +timeout-ignored+ #xFFFFFFFFFFFFFFFF)
(defconstant +timeout-ignored-apple+ #xFFFFFFFFFFFFFFFF)

0 comments on commit 49d389f

Please sign in to comment.