diff options
| author | Eero Leno <eero@leno.fi> | 2018-08-21 15:20:08 +0300 |
|---|---|---|
| committer | David Thompson <dthompson2@worcester.edu> | 2018-08-21 09:16:41 -0400 |
| commit | 5a6ea82c9ad859972c01d2908b2f66fb3addcfbb (patch) | |
| tree | fda5249cb52947ad9cd81221f2a486e86d1b9e27 /sdl2/bindings.scm | |
| parent | 726cc474fde01723fd500e9820e67b04cb7fb3a4 (diff) | |
Add binding for SDL_SetRenderDrawColor.
* sdl2/bindings.scm (sdl-set-render-draw-color): New procedure.
* sdl2/render.scm (set-render-draw-color): New procedure.
Diffstat (limited to 'sdl2/bindings.scm')
| -rw-r--r-- | sdl2/bindings.scm | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/sdl2/bindings.scm b/sdl2/bindings.scm index d333c59..84e49b8 100644 --- a/sdl2/bindings.scm +++ b/sdl2/bindings.scm @@ -1,5 +1,6 @@ ;;; guile-sdl2 --- FFI bindings for SDL2 ;;; Copyright © 2015, 2016 David Thompson <davet@gnu.org> +;;; Copyright © 2018 Eero Leno <eero@leno.fi> ;;; ;;; This file is part of guile-sdl2. ;;; @@ -235,6 +236,9 @@ RETURN-TYPE and accept arguments of ARG-TYPES." (define-foreign sdl-create-texture-from-surface '* "SDL_CreateTextureFromSurface" '(* *)) +(define-foreign sdl-set-render-draw-color + int "SDL_SetRenderDrawColor" (list '* uint8 uint8 uint8 uint8)) + ;;; ;;; Events |