factor: LIBRARY: -> library:

locals-and-roots
Doug Coleman 2016-06-04 16:29:00 -07:00
parent c998f64bef
commit 048703d6ce
170 changed files with 204 additions and 203 deletions

View File

@ -10,7 +10,7 @@ in: io.files.trash.windows
<PRIVATE
LIBRARY: shell32
library: shell32
TYPEDEF: WORD FILEOP_FLAGS ;

View File

@ -236,7 +236,7 @@ ARTICLE: "reading-writing-memory" "Reading and writing memory directly"
ARTICLE: "alien-invoke" "Calling C from Factor"
"The easiest way to call into a C library is to define bindings using a pair of parsing words:"
{ $subsections
postpone: LIBRARY:
postpone: library:
postpone: FUNCTION:
postpone: FUNCTION-ALIAS:
}

View File

@ -44,7 +44,7 @@ HELP: load-library
HELP: add-library
{ $values { "name" string } { "path" string } { "abi" "one of " { $link cdecl } " or " { $link stdcall } } }
{ $description "Defines a new logical library named " { $snippet "name" } " located in the file system at " { $snippet "path" } " and the specified ABI. You can find the location of the library via words in " { $vocab-link "alien.libraries.finder" } ". The logical library name can then be used by a " { $link postpone: LIBRARY: } " form to specify the logical library for subsequent " { $link postpone: FUNCTION: } " definitions." }
{ $description "Defines a new logical library named " { $snippet "name" } " located in the file system at " { $snippet "path" } " and the specified ABI. You can find the location of the library via words in " { $vocab-link "alien.libraries.finder" } ". The logical library name can then be used by a " { $link postpone: library: } " form to specify the logical library for subsequent " { $link postpone: FUNCTION: } " definitions." }
{ $notes "Because the entire source file is parsed before top-level forms are executed, " { $link add-library } " must be placed within a " { $snippet "<< ... >>" } " parse-time evaluation block."
$nl
"This ensures that if the logical library is later used in the same file, for example by a " { $link postpone: FUNCTION: } " definition. Otherwise, the " { $link add-library } " call will happen too late, after compilation, and the C function calls will not refer to the correct library."

View File

@ -6,7 +6,7 @@ in: atk.ffi
<< "gobject.ffi" require >>
LIBRARY: atk
library: atk
<< "atk" {
{ [ os windows? ] [ "libatk-1.0-0.dll" ] }

View File

@ -14,7 +14,7 @@ in: cairo.ffi
{ [ os unix? ] [ "libcairo.so" ] }
} cond cdecl add-library >>
LIBRARY: cairo
library: cairo
FUNCTION: int cairo_version ( ) ;
FUNCTION: c-string cairo_version_string ( ) ;

View File

@ -9,7 +9,7 @@ in: clutter.cally.ffi
"clutter.ffi" require
>>
LIBRARY: clutter.cally
library: clutter.cally
<<
"clutter.cally" {

View File

@ -8,7 +8,7 @@ in: clutter.cogl.ffi
"gobject.ffi" require
>>
LIBRARY: clutter.cogl
library: clutter.cogl
<<
"clutter.cogl" {

View File

@ -12,7 +12,7 @@ in: clutter.ffi
"clutter.json.ffi" require
>>
LIBRARY: clutter
library: clutter
<<
"clutter" {

View File

@ -9,7 +9,7 @@ in: clutter.gtk.ffi
"gtk.ffi" require
>>
LIBRARY: clutter.gtk
library: clutter.gtk
<<
"clutter.gtk" {

View File

@ -9,7 +9,7 @@ in: clutter.json.ffi
"gio.ffi" require
>>
LIBRARY: clutter.json
library: clutter.json
<<
"clutter.json" {

View File

@ -6,7 +6,7 @@ destructors io io.encodings.string io.encodings.utf8 kernel locals
math math.parser namespaces sequences strings ;
in: cuda.demos.hello-world
CUDA-LIBRARY: hello cuda32 "vocab:cuda/demos/hello-world/hello.ptx"
CUDA-library: hello cuda32 "vocab:cuda/demos/hello-world/hello.ptx"
CUDA-FUNCTION: helloWorld ( char* string-ptr ) ;

View File

@ -3,7 +3,7 @@
USING: alien.c-types cuda cuda.contexts cuda.libraries cuda.syntax locals ;
in: cuda.demos.prefix-sum
CUDA-LIBRARY: prefix-sum cuda32 "vocab:cuda/demos/prefix-sum/prefix-sum.ptx"
CUDA-library: prefix-sum cuda32 "vocab:cuda/demos/prefix-sum/prefix-sum.ptx"
CUDA-FUNCTION: prefix_sum_block ( uint* in, uint* out, uint n ) ;

View File

@ -11,7 +11,7 @@ in: cuda.ffi
} cond add-library
>>
LIBRARY: cuda
library: cuda
TYPEDEF: uint CUdeviceptr ;
TYPEDEF: int CUdevice ;

View File

@ -2,7 +2,7 @@
USING: alien.c-types alien.syntax cuda.ffi opengl.gl ;
in: cuda.gl.ffi
LIBRARY: cuda
library: cuda
FUNCTION: CUresult cuGLCtxCreate ( CUcontext* pCtx, uint Flags, CUdevice device ) ;
FUNCTION: CUresult cuGraphicsGLRegisterBuffer ( CUgraphicsResource* pCudaResource, GLuint buffer, uint Flags ) ;

View File

@ -8,7 +8,7 @@ PREDICATE: cuda-function-word < word
def>> { [ length 14 = ] [ last \ cuda-invoke eq? ] } 1&& ;
: pprint-cuda-library ( library -- )
[ \ CUDA-LIBRARY: [ text ] pprint-prefix ] when* ;
[ \ CUDA-library: [ text ] pprint-prefix ] when* ;
: pprint-cuda-function ( word quot -- )
[

View File

@ -4,7 +4,7 @@ USING: alien.parser cuda.libraries fry kernel lexer namespaces
parser ;
in: cuda.syntax
SYNTAX: CUDA-LIBRARY:
SYNTAX: CUDA-library:
scan-token scan-word scan-object
'[ _ _ add-cuda-library ]
[ current-cuda-library set-global ] bi ;

View File

@ -9,7 +9,7 @@ in: curl.ffi
{ [ os unix? ] [ "libcurl.so" ] }
} cond cdecl add-library >>
LIBRARY: curl
library: curl
! curl.h

View File

@ -81,7 +81,7 @@ STRUCT: MEVENT
{ x int } { y int } { z int }
{ bstate mmask_t } ;
LIBRARY: curses
library: curses
C-GLOBAL: void* stdscr ;

View File

@ -6,7 +6,7 @@ alien.libraries.finder alien.syntax combinators kernel system ;
in: fftw.ffi
LIBRARY: fftw3
library: fftw3
<< "fftw3" {
{ [ os windows? ] [ "libfftw3-3.dll" ] }

View File

@ -8,7 +8,7 @@ in: forestdb.ffi
<< "forestdb" dup find-library cdecl add-library >>
LIBRARY: forestdb
library: forestdb
! Begin fdb_types.h

View File

@ -10,7 +10,7 @@ in: freetype
{ [ t ] [ drop ] }
} cond >>
LIBRARY: freetype
library: freetype
TYPEDEF: uchar FT_Byte ;
TYPEDEF: void* FT_Bytes ;

View File

@ -8,7 +8,7 @@ in: gdbm.ffi
{ "gdbm" "gdbm3" "libgdbm-3" } find-library-from-list
cdecl add-library >>
LIBRARY: libgdbm
library: libgdbm
C-GLOBAL: c-string gdbm_version ;

View File

@ -11,7 +11,7 @@ in: gdk.ffi
"gdk.pixbuf.ffi" require
>>
LIBRARY: gdk
library: gdk
<<
"gdk" {

View File

@ -8,7 +8,7 @@ in: gdk.gl.ffi
"gdk.ffi" require
>>
LIBRARY: gdk.gl
library: gdk.gl
<<
"gdk.gl" {

View File

@ -8,7 +8,7 @@ in: gdk.pixbuf.ffi
<< "gio.ffi" require >>
LIBRARY: gdk.pixbuf
library: gdk.pixbuf
<< "gdk.pixbuf" {
{ [ os windows? ] [ "libgdk_pixbuf-2.0-0.dll" ] }

View File

@ -6,7 +6,7 @@ in: gio.ffi
<< "gobject.ffi" require >>
LIBRARY: gio
library: gio
<< "gio" {
{ [ os windows? ] [ "libgio-2.0-0.dll" ] }

View File

@ -6,7 +6,7 @@ gobject-introspection.standard-types io.encodings.utf8 kernel
system ;
in: glib.ffi
LIBRARY: glib
library: glib
<< "glib" {
{ [ os windows? ] [ "libglib-2.0-0.dll" ] }

View File

@ -6,7 +6,7 @@ in: gmodule.ffi
<< "glib.ffi" require >>
LIBRARY: gmodule
library: gmodule
<< "gmodule" {
{ [ os windows? ] [ "libgmodule-2.0-0.dll" ] }

View File

@ -9,7 +9,7 @@ in: gobject.ffi
<< "glib.ffi" require >>
use: glib.ffi
LIBRARY: gobject
library: gobject
<< "gobject" {
{ [ os windows? ] [ "libgobject-2.0-0.dll" ] }

View File

@ -8,7 +8,7 @@ in: gstreamer.base.ffi
"gstreamer.ffi" require
>>
LIBRARY: gstreamer.base
library: gstreamer.base
<<
"gstreamer.base" {

View File

@ -8,7 +8,7 @@ in: gstreamer.controller.ffi
"gstreamer.ffi" require
>>
LIBRARY: gstreamer.controller
library: gstreamer.controller
<<
"gstreamer.controller" {

View File

@ -10,7 +10,7 @@ in: gstreamer.ffi
"gmodule.ffi" require
>>
LIBRARY: gstreamer
library: gstreamer
<<
"gstreamer" {

View File

@ -8,7 +8,7 @@ in: gstreamer.net.ffi
"gstreamer.ffi" require
>>
LIBRARY: gstreamer.net
library: gstreamer.net
<<
"gstreamer.net" {

View File

@ -11,7 +11,7 @@ in: gtk.ffi
"gdk.ffi" require
>>
LIBRARY: gtk
library: gtk
<<
"gtk" {

View File

@ -9,7 +9,7 @@ in: gtk.gl.ffi
"gdk.gl.ffi" require
>>
LIBRARY: gtk.gl
library: gtk.gl
<<
"gtk.gl" {

View File

@ -12,7 +12,7 @@ in: libtls.ffi
c-type: tls_config
c-type: tls_ctx
LIBRARY: libtls
library: libtls
FUNCTION: int tls_init ( ) ;
FUNCTION: c-string tls_error ( tls_ctx* ctx ) ;

View File

@ -6,7 +6,7 @@ in: libudev
<< "libudev" "libudev.so" cdecl add-library >>
LIBRARY: libudev
library: libudev
c-type: udev

View File

@ -12,7 +12,7 @@ in: libusb
{ [ os macosx? ] [ "libusb-1.0.dylib" ] }
{ [ os unix? ] [ "libusb-1.0.so" ] }
} cond cdecl add-library >>
LIBRARY: libusb
library: libusb
: libusb_cpu_to_le16 ( x -- y )
2 >native-endian le> ; inline

View File

@ -11,7 +11,7 @@ in: lua
{ [ os unix? ] [ "liblua5.1.so" ] }
} cond cdecl add-library >>
LIBRARY: liblua5.1
library: liblua5.1
! luaconf.h
TYPEDEF: double LUA_NUMBER ;

View File

@ -23,7 +23,7 @@ in: ogg
"ogg" deploy-library
>>
LIBRARY: ogg
library: ogg
STRUCT: oggpack-buffer
{ endbyte long }

View File

@ -109,7 +109,7 @@ STRUCT: th-huff-code
{ nbits int }
;
LIBRARY: theoradec
library: theoradec
FUNCTION: c-string th_version_string ( ) ;
FUNCTION: uint th_version_number ( ) ;
FUNCTION: longlong th_granule_frame ( void* encdec, longlong granpos ) ;
@ -144,7 +144,7 @@ CONSTANT: TH-RATECTL-CAP-UNDERFOW 4 ;
TYPEDEF: void* th-enc-ctx ;
LIBRARY: theoraenc
library: theoraenc
FUNCTION: th-enc-ctx* th_encode_alloc ( th-info* info ) ;
FUNCTION: int th_encode_ctl ( th-enc-ctx* enc, int req, void* buf, int buf_sz ) ;
FUNCTION: int th_encode_flushheader ( th-enc-ctx* enc, th-comment* comments, ogg-packet* op ) ;
@ -171,7 +171,7 @@ STRUCT: th-stripe-callback
TYPEDEF: void* th-dec-ctx ;
TYPEDEF: void* th-setup-info ;
LIBRARY: theoradec
library: theoradec
FUNCTION: int th_decode_headerin ( th-info* info, th-comment* tc, th-setup-info** setup, ogg-packet* op ) ;
FUNCTION: th-dec-ctx* th_decode_alloc ( th-info* info, th-setup-info* setup ) ;
FUNCTION: void th_setup_free ( th-setup-info* setup ) ;

View File

@ -24,7 +24,7 @@ in: ogg.vorbis
"vorbis" deploy-library
>>
LIBRARY: vorbis
library: vorbis
STRUCT: vorbis-info
{ version int }

View File

@ -18,7 +18,7 @@ in: openal.alut
<< os macosx? [ "alut" deploy-library ] unless >>
LIBRARY: alut
library: alut
CONSTANT: ALUT_API_MAJOR_VERSION 1 ;
CONSTANT: ALUT_API_MINOR_VERSION 1 ;

View File

@ -4,7 +4,7 @@ USING: alien.c-types alien.data kernel alien alien.syntax shuffle
openal openal.alut.backend namespaces system generalizations ;
in: openal.alut.macosx
LIBRARY: alut
library: alut
FUNCTION: void alutLoadWAVFile ( c-string fileName, ALenum* format, void** data, ALsizei* size, ALsizei* frequency ) ;

View File

@ -4,7 +4,7 @@ USING: alien.c-types alien.data alien.syntax combinators
generalizations kernel openal openal.alut.backend ;
in: openal.alut.other
LIBRARY: alut
library: alut
FUNCTION: void alutLoadWAVFile ( c-string fileName, ALenum* format, void** data, ALsizei* size, ALsizei* frequency, ALboolean* looping ) ;

View File

@ -19,7 +19,7 @@ in: openal
<< os unix? [ "openal" deploy-library ] unless >>
LIBRARY: openal
library: openal
TYPEDEF: char ALboolean ;
TYPEDEF: char ALchar ;

View File

@ -10,7 +10,7 @@ in: opencl.ffi
{ [ os macosx? ] [ "/System/Library/Frameworks/OpenCL.framework/OpenCL" cdecl ] }
{ [ os unix? ] [ "libOpenCL.so" cdecl ] }
} cond add-library >>
LIBRARY: opencl
library: opencl
! cl_platform.h
TYPEDEF: char cl_char ;

View File

@ -625,7 +625,7 @@ CONSTANT: GL_CLIENT_VERTEX_ARRAY_BIT 0x00000002 ;
CONSTANT: GL_ALL_CLIENT_ATTRIB_BITS 0xFFFFFFFF ;
CONSTANT: GL_CLIENT_ALL_ATTRIB_BITS 0xFFFFFFFF ;
LIBRARY: gl
library: gl
<<
os linux? [

View File

@ -1,7 +1,7 @@
USING: alien alien.c-types alien.syntax kernel windows.types ;
in: opengl.gl.windows
LIBRARY: gl
library: gl
FUNCTION: HGLRC wglGetCurrentContext ( ) ;
FUNCTION: void* wglGetProcAddress ( c-string name ) ;

View File

@ -14,7 +14,7 @@ os {
>>
LIBRARY: glu
library: glu
! These are defined as structs in glu.h, but we only ever use pointers to them
c-type: GLUnurbs
@ -202,7 +202,7 @@ CONSTANT: GLU_TESS_WINDING_POSITIVE 100132 ;
CONSTANT: GLU_TESS_WINDING_NEGATIVE 100133 ;
CONSTANT: GLU_TESS_WINDING_ABS_GEQ_TWO 100134 ;
LIBRARY: glu
library: glu
FUNCTION: void gluBeginCurve ( GLUnurbs* nurb ) ;
FUNCTION: void gluBeginPolygon ( GLUtesselator* tess ) ;

View File

@ -46,7 +46,7 @@ CONSTANT: BIO_C_SET_FILENAME 108 ;
CONSTANT: BIO_C_SET_SSL 109 ;
CONSTANT: BIO_C_GET_SSL 110 ;
LIBRARY: libcrypto
library: libcrypto
! ===============================================
! crypto.h

View File

@ -183,7 +183,7 @@ CONSTANT: SSL_ERROR_WANT_ACCEPT 8 ;
c-type: SSL_CTX
c-type: SSL_SESSION
LIBRARY: libssl
library: libssl
! ===============================================
! stack.h

View File

@ -6,7 +6,7 @@ in: pango.cairo.ffi
<< "pango.ffi" require >>
LIBRARY: pango.cairo
library: pango.cairo
<< "pango.cairo" {
{ [ os windows? ] [ "libpangocairo-1.0-0.dll" ] }

View File

@ -7,7 +7,7 @@ in: pango.ffi
<< "gobject.ffi" require >>
LIBRARY: pango
library: pango
<< "pango" {
{ [ os windows? ] [ "libpango-1.0-0.dll" ] }

View File

@ -14,7 +14,7 @@ in: pcre.ffi
{ [ os unix? ] [ "libpcre.so" ] }
} cond cdecl add-library >>
LIBRARY: pcre
library: pcre
CONSTANT: PCRE_CASELESS 0x00000001 ;
CONSTANT: PCRE_MULTILINE 0x00000002 ;

View File

@ -11,7 +11,7 @@ cdecl add-library >>
! Functions that return borrowed references needs to be called like this:
! Py_Func dup Py_IncRef &Py_DecRef
LIBRARY: python
library: python
c-type: PyObject

View File

@ -11,7 +11,7 @@ in: readline.ffi
{ [ os unix? ] [ "libreadline.so" ] }
} cond cdecl add-library >>
LIBRARY: readline
library: readline
TYPEDEF: void* histdata_t ;

View File

@ -51,7 +51,7 @@ M: macosx os-version
! See /usr/include/sys/sysctl.h for constants
LIBRARY: libc
library: libc
FUNCTION: int sysctl ( int* name, uint namelen, void* oldp, size_t* oldlenp, void* newp, size_t newlen ) ;
: (sysctl-query) ( name namelen oldp oldlenp -- oldp )

View File

@ -48,7 +48,7 @@ CONSTANT: SHUT_RD 0 ;
CONSTANT: SHUT_WR 1 ;
CONSTANT: SHUT_RDWR 2 ;
LIBRARY: libc
library: libc
STRUCT: group
{ gr_name c-string }

View File

@ -2,7 +2,7 @@ USING: alien.c-types alien.syntax classes.struct kernel
literals math math.bitwise windows.kernel32 windows.types ;
in: windows.advapi32
LIBRARY: advapi32
library: advapi32
CONSTANT: MS_DEF_DH_SCHANNEL_PROV "Microsoft DH Schannel Cryptographic Provider" ;

View File

@ -3,7 +3,7 @@ windows.ole32 windows.types continuations kernel alien.syntax
libc destructors accessors alien.data classes.struct windows.kernel32 ;
in: windows.com
LIBRARY: ole32
library: ole32
COM-INTERFACE: IUnknown f {00000000-0000-0000-C000-000000000046}
HRESULT QueryInterface ( REFGUID iid, void** ppvObject )

View File

@ -4,7 +4,7 @@ USING: alien.syntax classes.struct windows.kernel32
windows.types ;
in: windows.crypt32
LIBRARY: crypt32
library: crypt32
TYPEDEF: HANDLE HCERTSTORE ;
TYPEDEF: ULONG_PTR HCRYPTPROV ;

View File

@ -5,7 +5,7 @@ classes.struct kernel math windows.types windows.ole32 ;
in: windows.ddk.hid
<< "hid" "hid.dll" stdcall add-library >>
LIBRARY: hid
library: hid
TYPEDEF: LONG NTSTATUS ;
TYPEDEF: USHORT USAGE ;

View File

@ -6,7 +6,7 @@ windows.advapi32 alien.libraries ;
in: windows.ddk.setupapi
<< "setupapi" "setupapi.dll" stdcall add-library >>
LIBRARY: setupapi
library: setupapi
TYPEDEF: DWORDLONG SP_LOG_TOKEN ;
TYPEDEF: DWORDLONG* PSP_LOG_TOKEN ;

View File

@ -5,7 +5,7 @@ windows.kernel32 windows.types alien.libraries ;
in: windows.ddk.winusb
<< "winusb" "winusb.dll" stdcall add-library >>
LIBRARY: winusb
library: winusb
TYPEDEF: PVOID WINUSB_INTERFACE_HANDLE ;
TYPEDEF: WINUSB_INTERFACE_HANDLE* PWINUSB_INTERFACE_HANDLE ;

View File

@ -4,7 +4,7 @@ windows.directx.dcommon windows.directx.dxgi windows.directx.dxgiformat
windows.ole32 windows.types ;
in: windows.directx.d2d1
LIBRARY: d2d1
library: d2d1
CONSTANT: D2D1_INVALID_TAG 0xffffffffffffffff ;
CONSTANT: D2D1_DEFAULT_FLATTENING_TOLERANCE 0.25 ;

View File

@ -3,7 +3,7 @@ windows.directx windows.directx.dxgiformat windows.com.syntax
windows.com windows.ole32 windows.directx.dxgitype ;
in: windows.directx.d3d10
LIBRARY: d3d10
library: d3d10
CONSTANT: D3D10_16BIT_INDEX_STRIP_CUT_VALUE 0xffff ;
CONSTANT: D3D10_32BIT_INDEX_STRIP_CUT_VALUE 0xffffffff ;

View File

@ -4,7 +4,7 @@ windows.directx.d3d10misc windows.directx.dxgi
windows.directx.dxgiformat windows.types ;
in: windows.directx.d3d10_1
LIBRARY: d3d10_1
library: d3d10_1
CONSTANT: D3D10_1_DEFAULT_SAMPLE_MASK 0xffffffff ;
CONSTANT: D3D10_1_FLOAT16_FUSED_TOLERANCE_IN_ULP 0.6 ;

View File

@ -3,7 +3,7 @@ windows.com.syntax windows.directx windows.directx.d3d10
windows.directx.d3d10shader windows.types ;
in: windows.directx.d3d10_1shader
LIBRARY: d3d10_1
library: d3d10_1
CONSTANT: D3D10_SHADER_DEBUG_REG_INPUT 0 ;
CONSTANT: D3D10_SHADER_DEBUG_REG_OUTPUT 1 ;

View File

@ -3,7 +3,7 @@ windows.com.syntax windows.directx windows.directx.d3d10
windows.directx.d3d10misc windows.directx.d3d10shader windows.types ;
in: windows.directx.d3d10effect
LIBRARY: d3d10
library: d3d10
CONSTANT: D3D10_DST_SO_BUFFERS 1 ;
CONSTANT: D3D10_DST_OM_RENDER_TARGETS 2 ;

View File

@ -3,7 +3,7 @@ windows.directx windows.directx.d3d10 windows.directx.dxgi
windows.types ;
in: windows.directx.d3d10misc
LIBRARY: d3d10
library: d3d10
c-type: ID3D10Blob
TYPEDEF: ID3D10Blob* LPD3D10BLOB ;

View File

@ -3,7 +3,7 @@ windows.com.syntax windows.directx.d3d10 windows.directx.d3d10misc
windows.types windows.directx ;
in: windows.directx.d3d10shader
LIBRARY: d3d10
library: d3d10
CONSTANT: D3D10_SHADER_DEBUG 1 ;
CONSTANT: D3D10_SHADER_SKIP_VALIDATION 2 ;

View File

@ -4,7 +4,7 @@ windows.directx.dxgitype windows.directx.dxgi windows.directx.d3dcommon
windows.directx ;
in: windows.directx.d3d11
LIBRARY: d3d11
library: d3d11
CONSTANT: D3D11_16BIT_INDEX_STRIP_CUT_VALUE 0xffff ;
CONSTANT: D3D11_32BIT_INDEX_STRIP_CUT_VALUE 0xffffffff ;

View File

@ -4,7 +4,7 @@ windows.directx.d3d11 windows.com windows.com.syntax
windows.directx.d3dcommon ;
in: windows.directx.d3d11shader
LIBRARY: d3d11
library: d3d11
CONSTANT: D3D11_SHVER_PIXEL_SHADER 0 ;
CONSTANT: D3D11_SHVER_VERTEX_SHADER 1 ;

View File

@ -3,7 +3,7 @@ windows.com.syntax windows.com windows.directx windows.directx.d3d9caps
windows.ole32 windows.kernel32 ;
in: windows.directx.d3d9
LIBRARY: d3d9
library: d3d9
CONSTANT: DIRECT3D_VERSION 0x0900 ;

View File

@ -1,7 +1,7 @@
USING: alien.c-types alien.syntax windows.directx windows.ole32 windows.types ;
in: windows.directx.d3dcompiler
LIBRARY: d3dcompiler
library: d3dcompiler
c-type: D3D_SHADER_MACRO
c-type: ID3DBlob

View File

@ -2,7 +2,7 @@ USING: alien.c-types alien.syntax classes.struct windows.com windows.com.syntax
windows.directx windows.directx.d3d11 windows.types ;
in: windows.directx.d3dcsx
LIBRARY: d3dcsx
library: d3dcsx
CONSTANT: D3DX11_SCAN_DATA_TYPE_FLOAT 1 ;
CONSTANT: D3DX11_SCAN_DATA_TYPE_INT 2 ;

View File

@ -3,7 +3,7 @@ windows.directx.d3d10misc windows.directx.d3d10shader
windows.directx.d3dx10core windows.types ;
in: windows.directx.d3dx10async
LIBRARY: d3dx10
library: d3dx10
c-type: ID3DX10ThreadPump
c-type: ID3D10EffectPool

View File

@ -4,7 +4,7 @@ windows.directx.d3d10misc windows.directx.d3dx10math
windows.directx.dxgi windows.gdi32 windows.types ;
in: windows.directx.d3dx10core
LIBRARY: d3dx10
library: d3dx10
CONSTANT: D3DX10_SDK_VERSION 42 ;

View File

@ -3,7 +3,7 @@ windows.com.syntax windows.directx windows.directx.d3d10
windows.directx.d3d10misc windows.types windows.directx.d3dx10math ;
in: windows.directx.d3dx10mesh
LIBRARY: d3dx10
library: d3dx10
CONSTANT: D3DX10_MESH_32_BIT 1 ;
CONSTANT: D3DX10_MESH_GS_ADJACENCY 4 ;

View File

@ -4,7 +4,7 @@ windows.directx.d3dx10async windows.directx.dxgiformat
windows.types ;
in: windows.directx.d3dx10tex
LIBRARY: d3dx10
library: d3dx10
CONSTANT: D3DX10_FILTER_NONE 0x00000001 ;
CONSTANT: D3DX10_FILTER_POINT 0x00000002 ;

View File

@ -3,7 +3,7 @@ windows.directx.d3d10shader windows.directx.d3d11
windows.directx.d3dx11core windows.directx.d3dx11tex windows.types ;
in: windows.directx.d3dx11async
LIBRARY: d3dx11
library: d3dx11
FUNCTION: HRESULT D3DX11CompileFromFileA ( LPCSTR pSrcFile, D3D10_SHADER_MACRO* pDefines, LPD3D10INCLUDE pInclude,
LPCSTR pFunctionName, LPCSTR pProfile, UINT Flags1, UINT Flags2, ID3DX11ThreadPump* pPump, ID3D10Blob** ppShader, ID3D10Blob** ppErrorMsgs, HRESULT* pHResult ) ;

View File

@ -2,7 +2,7 @@ USING: alien.syntax windows.directx windows.types windows.com.syntax
alien.c-types windows.com windows.directx.d3d11 ;
in: windows.directx.d3dx11core
LIBRARY: d3dx11
library: d3dx11
FUNCTION: HRESULT D3DX11CheckVersion ( UINT D3DSdkVersion, UINT D3DX11SdkVersion ) ;

View File

@ -3,7 +3,7 @@ windows.directx windows.directx.d3d10misc windows.directx.d3d11
windows.directx.d3dx11core windows.directx.dxgiformat windows.types ;
in: windows.directx.d3dx11tex
LIBRARY: d3dx11
library: d3dx11
CONSTANT: D3DX11_FILTER_NONE 0x00000001 ;
CONSTANT: D3DX11_FILTER_POINT 0x00000002 ;

View File

@ -5,7 +5,7 @@ windows.directx.d3dx9mesh windows.directx.d3dx9xof
windows.types ;
in: windows.directx.d3dx9anim
LIBRARY: d3dx9
library: d3dx9
TYPEDEF: int D3DXMESHDATATYPE ;
CONSTANT: D3DXMESHTYPE_MESH 1 ;

View File

@ -3,7 +3,7 @@ windows.com windows.directx windows.directx.d3dx9math windows.directx.d3d9types
classes.struct windows.gdi32 ;
in: windows.directx.d3dx9core
LIBRARY: d3dx9
library: d3dx9
CONSTANT: D3DX_VERSION 0x0902 ;
CONSTANT: D3DX_SDK_VERSION 42 ;

View File

@ -5,7 +5,7 @@ windows.directx.d3dx9math windows.directx.d3dx9shader
windows.types ;
in: windows.directx.d3dx9effect
LIBRARY: d3dx9
library: d3dx9
CONSTANT: D3DXFX_DONOTSAVESTATE 1 ;
CONSTANT: D3DXFX_DONOTSAVESHADERSTATE 2 ;

View File

@ -2,7 +2,7 @@ USING: math classes.struct windows.types alien.syntax windows.directx.d3d9types
windows.com.syntax windows.com windows.directx windows.directx.d3d9 ;
in: windows.directx.d3dx9math
LIBRARY: d3dx9
library: d3dx9
CONSTANT: D3DX_PI 3.141592654 ;
CONSTANT: D3DX_1BYPI 0.318309886 ;

View File

@ -4,7 +4,7 @@ windows.directx.d3d9 windows.directx.d3dx9core windows.directx.d3dx9math
windows.directx.d3dx9xof ;
in: windows.directx.d3dx9mesh
LIBRARY: d3dx9
library: d3dx9
TYPEDEF: int D3DXPATCHMESHTYPE ;
CONSTANT: D3DXPATCHMESH_RECT 1 ;

View File

@ -4,7 +4,7 @@ windows.directx.d3d9 windows.directx.d3dx9core
windows.directx.d3dx9math windows.types ;
in: windows.directx.d3dx9shader
LIBRARY: d3dx9
library: d3dx9
: D3DXSHADER_DEBUG ( -- n ) 1 0 shift ; inline
: D3DXSHADER_SKIPVALIDATION ( -- n ) 1 1 shift ; inline

View File

@ -3,7 +3,7 @@ windows.directx.d3d9 windows.directx.d3dx9core
windows.directx.d3dx9mesh windows.types ;
in: windows.directx.d3dx9shape
LIBRARY: d3dx9
library: d3dx9
TYPEDEF: void* LPGLYPHMETRICSFLOAT ;

View File

@ -4,7 +4,7 @@ windows.directx.d3dx9core windows.directx.d3dx9shader
windows.types ;
in: windows.directx.d3dx9tex
LIBRARY: d3dx9
library: d3dx9
: D3DX_FILTER_NONE ( -- n ) 1 0 shift ; inline
: D3DX_FILTER_POINT ( -- n ) 2 0 shift ; inline

View File

@ -2,7 +2,7 @@ USING: alien.syntax classes.struct windows.com windows.com.syntax
windows.directx windows.kernel32 windows.ole32 windows.types ;
in: windows.directx.d3dx9xof
LIBRARY: d3dx9
library: d3dx9
TYPEDEF: DWORD D3DXF_FILEFORMAT ;

View File

@ -3,7 +3,7 @@ alien alien.c-types alien.syntax kernel system namespaces math
classes.struct windows.types windows.directx ;
in: windows.directx.dinput
LIBRARY: dinput
library: dinput
TYPEDEF: DWORD D3DCOLOR ;

View File

@ -3,7 +3,7 @@ windows.com.syntax windows.directx.dcommon windows.kernel32
windows.ole32 windows.types windows.directx ;
in: windows.directx.dwrite
LIBRARY: dwrite
library: dwrite
ENUM: DWRITE_FONT_FILE_TYPE
DWRITE_FONT_FILE_TYPE_UNKNOWN

View File

@ -2,7 +2,7 @@ USING: alien.syntax alien.c-types classes.struct windows.com
windows.com.syntax windows.kernel32 windows.ole32 windows.types ;
in: windows.directx.dxfile
LIBRARY: d3dxof
library: d3dxof
TYPEDEF: DWORD DXFILEFORMAT ;

View File

@ -3,7 +3,7 @@ windows.directx.dxgiformat windows.directx.dxgitype windows.kernel32
windows.ole32 windows.types windows.directx ;
in: windows.directx.dxgi
LIBRARY: dxgi
library: dxgi
CONSTANT: DXGI_CPU_ACCESS_NONE 0 ;
CONSTANT: DXGI_CPU_ACCESS_DYNAMIC 1 ;

View File

@ -2,7 +2,7 @@ USING: alien.c-types alien.syntax classes.struct windows.directx
windows.directx.d3dx10math windows.types ;
in: windows.directx.x3daudio
LIBRARY: x3daudio
library: x3daudio
CONSTANT: X3DAUDIO_HANDLE_BYTESIZE 20 ;

View File

@ -3,7 +3,7 @@ windows.com.syntax windows.directx windows.directx.xaudio2
windows.kernel32 windows.types ;
in: windows.directx.xact3
LIBRARY: xactengine
library: xactengine
c-type: IXACT3SoundBank
c-type: IXACT3WaveBank

View File

@ -2,7 +2,7 @@ USING: alien.c-types alien.syntax classes.struct windows.com
windows.directx windows.ole32 windows.types ;
in: windows.directx.xapofx
LIBRARY: xapofx
library: xapofx
CONSTANT: FXEQ_MIN_FRAMERATE 22000 ;
CONSTANT: FXEQ_MAX_FRAMERATE 48000 ;

Some files were not shown because too many files have changed in this diff Show More