Add Windows compatibility.
authorDavid Thompson <dthompson2@worcester.edu>
Mon, 29 Jul 2019 15:52:55 +0000 (11:52 -0400)
committerDavid Thompson <dthompson2@worcester.edu>
Mon, 29 Jul 2019 15:52:55 +0000 (11:52 -0400)
sdl2/config.scm.in

index fb6194a..fed0963 100644 (file)
@@ -4,14 +4,11 @@
             %libsdl2-ttf
             %libsdl2-mixer))
 
-(define %libsdl2
-  "@LIBSDL2@")
-
-(define %libsdl2-image
-  "@LIBSDL2_IMAGE@")
-
-(define %libsdl2-ttf
-  "@LIBSDL2_TTF@")
-
-(define %libsdl2-mixer
-  "@LIBSDL2_MIXER@")
+;; Special case Windows since the DLL names are different.  Performing
+;; this check at runtime allows a Linux machine to cross-compile
+;; guile-sdl2 for a Windows target.
+(define %windows? (string-prefix? "Windows" (utsname:sysname (uname))))
+(define %libsdl2 (if %windows? "SDL2" "@LIBSDL2@"))
+(define %libsdl2-image (if %windows? "SDL2_image" "@LIBSDL2_IMAGE@"))
+(define %libsdl2-ttf (if %windows? "SDL2_ttf" "@LIBSDL2_TTF@"))
+(define %libsdl2-mixer (if %windows? "SDL_mixer" "@LIBSDL2_MIXER@"))