1 files changed, 19 insertions, 0 deletions
diff --git a/sdl2/bindings.scm b/sdl2/bindings.scm
index 8925e6f..64e4313 100644
--- a/sdl2/bindings.scm
+++ b/sdl2/bindings.scm
@@ -228,3 +228,22 @@ RETURN-TYPE and accept arguments of ARG-TYPES."
 
 (define-foreign sdl-get-ticks
   uint32 "SDL_GetTicks" '())
+
+
+;;;
+;;; File I/O
+;;;
+
+(define-foreign sdl-rw-from-file
+  '* "SDL_RWFromFile" (list '* '*))
+
+
+;;;
+;;; Surface
+;;;
+
+(define-foreign sdl-free-surface
+  void "SDL_FreeSurface" '(*))
+
+(define-foreign sdl-load-bmp-rw
+  '* "SDL_LoadBMP_RW" (list '* int))