diff options
Diffstat (limited to 'sdl3/bindings/surface.scm')
-rw-r--r-- | sdl3/bindings/surface.scm | 36 |
1 files changed, 36 insertions, 0 deletions
diff --git a/sdl3/bindings/surface.scm b/sdl3/bindings/surface.scm new file mode 100644 index 0000000..d9ebd15 --- /dev/null +++ b/sdl3/bindings/surface.scm @@ -0,0 +1,36 @@ +;;; guile-sdl3 -- Scheme bindings for SDL3 +;;; Copyright © 2024 David Thompson <dthompson2@worcester.edu> +;;; +;;; Licensed under the Apache License, Version 2.0 (the "License"); +;;; you may not use this file except in compliance with the License. +;;; You may obtain a copy of the License at +;;; +;;; http://www.apache.org/licenses/LICENSE-2.0 +;;; +;;; Unless required by applicable law or agreed to in writing, software +;;; distributed under the License is distributed on an "AS IS" BASIS, +;;; WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. +;;; See the License for the specific language governing permissions and +;;; limitations under the License. + +;;; Commentary: +;; +;; Low-level bindings for SDL_surface.h. +;; +;;; Code: + +(define-module (sdl3 bindings surface) + #:use-module (sdl3 bindings utils) + #:export (SDL_FlipMode + symbol->flip-mode + flip-mode->symbol + SDL_FLIP_NONE + SDL_FLIP_HORIZONTAL + SDL_FLIP_VERTICAL)) + +(define-enum SDL_FlipMode + symbol->flip-mode + flip-mode->symbol + (none SDL_FLIP_NONE) + (horizontal SDL_FLIP_HORIZONTAL) + (vertical SDL_FLIP_VERTICAL)) |