diff options
-rw-r--r-- | doc/api.texi | 2 | ||||
-rw-r--r-- | sdl2/render.scm | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/doc/api.texi b/doc/api.texi index 2e6cb9f..13a8800 100644 --- a/doc/api.texi +++ b/doc/api.texi @@ -1229,7 +1229,7 @@ Free the memory used by @var{texture}. Get color mod of @var{texture} as a list of the integers. @end deffn -@deffn {Procedure} get-texture-alpha-mod texture +@deffn {Procedure} texture-alpha-mod texture Get alpha mod of @var{texture} as a single integer. @end deffn diff --git a/sdl2/render.scm b/sdl2/render.scm index f7665b6..40ad7da 100644 --- a/sdl2/render.scm +++ b/sdl2/render.scm @@ -344,7 +344,7 @@ created with 'texture')" (unless (zero? (ffi:sdl-set-texture-alpha-mod (unwrap-texture texture) a)) (sdl-error "set-texture-alpha-mod!" "Failed to set texture alpha mod"))) -(define (get-texture-alpha-mod texture) +(define (texture-alpha-mod texture) "Get alpha mod of TEXTURE as a single integer." (let ((bv (make-bytevector 1))) (let ((result (ffi:sdl-get-texture-alpha-mod |