diff options
| author | David Thompson <dthompson2@worcester.edu> | 2019-01-07 22:53:13 -0500 |
|---|---|---|
| committer | David Thompson <dthompson2@worcester.edu> | 2019-01-07 22:53:13 -0500 |
| commit | 6b8bef2445f71bd777b41a94cb33558cbc5cd2fb (patch) | |
| tree | 8f4bb5c8732ed786cdb84195c51c7b7036eb9e29 /sdl2/bindings.scm | |
| parent | 74448f9ac2ef9f8eb2e68639da7c966f4eb2d6e2 (diff) | |
surface: Add SDL_BlitSurface binding.
* sdl2/bindings.scm (sdl-blit-surface): New procedure.
* sdl2/surface.scm (blit-surface): New procedure.
Diffstat (limited to 'sdl2/bindings.scm')
| -rw-r--r-- | sdl2/bindings.scm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/sdl2/bindings.scm b/sdl2/bindings.scm index 84e49b8..7c16abb 100644 --- a/sdl2/bindings.scm +++ b/sdl2/bindings.scm @@ -943,6 +943,9 @@ RETURN-TYPE and accept arguments of ARG-TYPES." (define-foreign sdl-convert-surface-format '* "SDL_ConvertSurfaceFormat" (list '* uint32 uint32)) +(define-foreign sdl-blit-surface + int "SDL_UpperBlit" '(* * * *)) + ;;; ;;; Audio |