2007-09-20 18:09:08 -04:00
|
|
|
! Copyright (C) 2007 Chris Double.
|
|
|
|
|
! See http://factorcode.org/license.txt for BSD license.
|
|
|
|
|
!
|
|
|
|
|
IN: openal.macosx
|
2007-09-25 20:54:05 -04:00
|
|
|
USING: openal alien.c-types kernel alien alien.syntax shuffle
|
|
|
|
|
combinators.lib ;
|
2007-09-20 18:09:08 -04:00
|
|
|
|
|
|
|
|
LIBRARY: alut
|
|
|
|
|
|
|
|
|
|
FUNCTION: void alutLoadWAVFile ( ALbyte* fileName, ALenum* format, void** data, ALsizei* size, ALsizei* frequency ) ;
|
|
|
|
|
|
|
|
|
|
M: macosx-openal-impl load-wav-file ( filename -- format data size frequency )
|
|
|
|
|
0 <int> f <void*> 0 <int> 0 <int>
|
|
|
|
|
[ alutLoadWAVFile ] 4keep
|
|
|
|
|
>r >r >r *int r> *void* r> *int r> *int ;
|
