aboutsummaryrefslogtreecommitdiffstats
path: root/structs.scm
diff options
context:
space:
mode:
Diffstat (limited to 'structs.scm')
-rw-r--r--structs.scm21
1 files changed, 21 insertions, 0 deletions
diff --git a/structs.scm b/structs.scm
index 44ed30b..76cc6ca 100644
--- a/structs.scm
+++ b/structs.scm
@@ -123,3 +123,24 @@
(c-lambda (rec float) void "___arg1.width = ___arg2;"))
(define rec-height-set!
(c-lambda (rec float) void "___arg1.height = ___arg2;"))
+
+
+;; texture, 5 components, id32w32h32mipmaps32format32 (160bit)
+(c-define-type texture (struct "Texture"))
+
+;; RenderTexture, 3 components: uint id, Texture tex, Texture depth
+(c-define-type render-texture (struct "RenderTexture"))
+
+(define render-texture-id
+ (c-lambda (render-texture) int "___return(___arg1.id);"))
+(define render-texture-tex
+ (c-lambda (render-texture) texture "___return(___arg1.texture);"))
+(define render-texture-depth
+ (c-lambda (render-texture) texture "___return(___arg1.depth);"))
+
+(define load-render-texture
+ (c-lambda (int int) render-texture "LoadRenderTexture"))
+(define render-texture-ready?
+ (c-lambda (render-texture) bool "IsRenderTextureReady"))
+(define unload-render-texture
+ (c-lambda (render-texture) void "UnloadRenderTexture"))