QB64/QB64-PE
QB64/QB64-PE
1
1
Fork 0
mirror of https://github.com/QB64-Phoenix-Edition/QB64pe.git synced 2024-07-04 06:00:23 +00:00
Code Issues Releases Wiki Activity

Update test to inlcude invalid parameters for _NEWSND

Browse source
This commit is contained in:
Samuel Gomes 2023-01-06 12:39:44 +05:30
parent eacee1f609
commit e5b5a86b96
2 changed files with 106 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

64
tests/compile_tests/audio_mem_test/newsound_test.bas
View file

@ -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

43
tests/compile_tests/audio_mem_test/newsound_test.output
View file

@ -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