Changeset 27382 in project

Timestamp:

09/04/12 10:48:59 (9 years ago)

Author:

Christian Kellermann

Message:

sdl-mixer: quiet down compiler, omit unsupported flags for some platforms

Location:

release/4/sdl-mixer/trunk

Files:

• sdl-mixer-lolevel.scm (modified) (3 diffs)
• sdl-mixer.setup (modified) (1 diff)
• t.scm (deleted)

release/4/sdl-mixer/trunk/sdl-mixer-lolevel.scm

@@ -160 +160 @@
         if (channel_callback_fd >= 0) {
                 char chan[3];
+                int ignore;
                 snprintf(chan, 3, "%d\n", channel);
-                write(channel_callback_fd, chan, 2);
+                ignore = write(channel_callback_fd, chan, 2);
         }
 }
@@ -261 +262 @@
 static void music_finished (){
         if (music_callback_fd >= 0) {
-                write(music_callback_fd, "1\n", 2);
+                int ignore = write(music_callback_fd, "1\n", 2);
         }
 }
@@ -320 +321 @@
          "MUS_MID"
          "MUS_OGG"
-         "MUS_MP3"
-         "MUS_MP3_MAD"
-         "MUS_FLAC")
+         "MUS_MP3")
 
         (define mix-get-music-type

release/4/sdl-mixer/trunk/sdl-mixer.setup

@@ -18 +18 @@
                           (escape-flags
                            (with-input-from-pipe "sdl-config --libs" read-line)))))
+  (print "Building with sdl-flags: " sdl-cflags)
+  (print "Building with linker flags: " sdl-lflags)
+
   (for-each (lambda (s)
               (let ((source (string-append s ".scm"))
                     (import (string-append s ".import.scm")))
-                (compile -s -O3 -d1 ,source -J -lSDL_mixer ,sdl-cflags ,sdl-lflags)
+                (compile -s -O3 -d1 ,source -J -lSDL -lSDL_mixer ,sdl-cflags ,sdl-lflags)
                 (compile -s -O3 -d0 ,import ,sdl-cflags ,sdl-lflags)))
             sources))