diff --git a/tests/compile_tests/audio_mem_test/newsound_test.bas b/tests/compile_tests/audio_mem_test/newsound_test.bas index 69fbffb5d..5da0a2744 100644 --- a/tests/compile_tests/audio_mem_test/newsound_test.bas +++ b/tests/compile_tests/audio_mem_test/newsound_test.bas @@ -4,11 +4,73 @@ Option _ExplicitArray Dim h As Long: h = _SndNew(1024, 2, 32) Print "Handle ="; h - Dim m As _MEM: m = _MemSound(h, 0) Print "Size ="; m.SIZE Print "Type ="; m.TYPE Print "Element Size ="; m.ELEMENTSIZE Print "Sound ="; m.SOUND +Print +_SndClose h + +h = _SndNew(0, 2, 32) +Print "Handle ="; h +m = _MemSound(h, 0) +Print "Size ="; m.SIZE +Print "Type ="; m.TYPE +Print "Element Size ="; m.ELEMENTSIZE +Print "Sound ="; m.SOUND +Print +_SndClose h + +h = _SndNew(1024, 0, 32) +Print "Handle ="; h +m = _MemSound(h, 0) +Print "Size ="; m.SIZE +Print "Type ="; m.TYPE +Print "Element Size ="; m.ELEMENTSIZE +Print "Sound ="; m.SOUND +Print +_SndClose h + +h = _SndNew(1024, 1, 0) +Print "Handle ="; h +m = _MemSound(h, 0) +Print "Size ="; m.SIZE +Print "Type ="; m.TYPE +Print "Element Size ="; m.ELEMENTSIZE +Print "Sound ="; m.SOUND +Print +_SndClose h + +h = _SndNew(1024, -10, 16) +Print "Handle ="; h +m = _MemSound(h, 0) +Print "Size ="; m.SIZE +Print "Type ="; m.TYPE +Print "Element Size ="; m.ELEMENTSIZE +Print "Sound ="; m.SOUND +Print +_SndClose h + +h = _SndNew(1024, 1, -32) +Print "Handle ="; h +m = _MemSound(h, 0) +Print "Size ="; m.SIZE +Print "Type ="; m.TYPE +Print "Element Size ="; m.ELEMENTSIZE +Print "Sound ="; m.SOUND +Print +_SndClose h + +h = _SndNew(-1024, 1, 16) +Print "Handle ="; h +m = _MemSound(h, 0) +Print "Size ="; m.SIZE +Print "Type ="; m.TYPE +Print "Element Size ="; m.ELEMENTSIZE +Print "Sound ="; m.SOUND +Print +_SndClose h System + diff --git a/tests/compile_tests/audio_mem_test/newsound_test.output b/tests/compile_tests/audio_mem_test/newsound_test.output index b405e31ab..6bb9b5bf9 100644 --- a/tests/compile_tests/audio_mem_test/newsound_test.output +++ b/tests/compile_tests/audio_mem_test/newsound_test.output @@ -3,3 +3,46 @@ Size = 8192 Type = 260 Element Size = 8 Sound = 1 + +Handle = 0 +Size = 0 +Type = 0 +Element Size = 0 +Sound = 0 + +Handle = 0 +Size = 0 +Type = 0 +Element Size = 0 +Sound = 0 + +Handle = 0 +Size = 0 +Type = 0 +Element Size = 0 +Sound = 0 + +Handle = 0 +Size = 0 +Type = 0 +Element Size = 0 +Sound = 0 + +Handle = 0 +Size = 0 +Type = 0 +Element Size = 0 +Sound = 0 + +Handle = 0 +Size = 0 +Type = 0 +Element Size = 0 +Sound = 0 + +Handle = 2 +Size = 2048 +Type = 130 +Element Size = 2 +Sound = 2 +