Forráskód Böngészése

Added haiku sdl audio driver.

Brucey 5 éve
szülő
commit
a136943887
1 módosított fájl, 24 hozzáadás és 0 törlés
  1. 24 0
      audiosdl.mod/audiosdl.bmx

+ 24 - 0
audiosdl.mod/audiosdl.bmx

@@ -162,6 +162,30 @@ Type TDefaultSoloudAudioDriver Extends TCoreAudioSoloudAudioDriver
 		Return "SoLoud"
 		Return "SoLoud"
 	End Method
 	End Method
 
 
+End Type
+?haiku
+New THaikuSoloudAudioDriver
+New TDefaultSoloudAudioDriver
+
+Type THaikuSoloudAudioDriver Extends TSDLSoloudAudioDriver
+
+	Method Name$() Override
+		Return "SoLoud::Haiku"
+	End Method
+
+	Method Startup:Int() Override
+		SDLAudioInit("haiku")
+		Return Super.Startup()
+	End Method
+	
+End Type
+
+Type TDefaultSoloudAudioDriver Extends THaikuSoloudAudioDriver
+
+	Method Name$() Override
+		Return "SoLoud"
+	End Method
+
 End Type
 End Type
 ?
 ?