core, basis, extra: Remove DOS line endings from files.
Remove whitespace from end of lines. Add a newline to the end of each file.db4
Doug Coleman
parent
2c08e9a089
commit
352e5de16a
|
|
@ -63,4 +63,3 @@ M: string-type c-type-setter
|
|||
drop [ set-alien-cell ] ;
|
||||
|
||||
[ { c-string utf8 } c-string typedef ] with-compilation-unit
|
||||
|
||||
|
|
|
|||
|
|
@ -160,4 +160,3 @@ SYNTAX: LE-PACKED-STRUCT:
|
|||
SYNTAX: BE-PACKED-STRUCT:
|
||||
parse-struct-definition
|
||||
big-endian define-endian-packed-struct-class ;
|
||||
|
||||
|
|
|
|||
|
|
@ -12,4 +12,3 @@ M: unix >deployed-library-path
|
|||
|
||||
M: macosx >deployed-library-path
|
||||
file-name "@executable_path/../Frameworks" prepend-path ;
|
||||
|
||||
|
|
|
|||
|
|
@ -2,4 +2,3 @@
|
|||
! See http://factorcode.org/license.txt for BSD license.
|
||||
USING: atk.ffi ;
|
||||
IN: atk
|
||||
|
||||
|
|
|
|||
|
|
@ -13,4 +13,3 @@ M: internet checksum-bytes
|
|||
drop 2 <groups> [ le> ] map-sum
|
||||
[ -16 shift ] [ 0xffff bitand ] bi +
|
||||
[ -16 shift ] keep + bitnot 2 >le ;
|
||||
|
||||
|
|
|
|||
|
|
@ -42,4 +42,3 @@ from within Factor for more information.
|
|||
|
||||
output-stream get [ stream-flush ] when*
|
||||
0 exit ;
|
||||
|
||||
|
|
|
|||
|
|
@ -95,4 +95,3 @@ SYMBOLS: cc-o cc/o ;
|
|||
{ cc/<> { +eq+ +unordered+ } }
|
||||
{ cc/<>= { +unordered+ } }
|
||||
} at member-eq? ;
|
||||
|
||||
|
|
|
|||
|
|
@ -79,4 +79,3 @@ T{ error-type-holder
|
|||
{ quot [ user-init-errors get-global values ] }
|
||||
{ forget-quot [ user-init-errors get-global delete-at ] }
|
||||
} define-error-type
|
||||
|
||||
|
|
|
|||
|
|
@ -11,4 +11,3 @@ IN: compiler.tree.dead-code
|
|||
mark-live-values
|
||||
compute-live-values
|
||||
(remove-dead-code) ;
|
||||
|
||||
|
|
|
|||
|
|
@ -32,4 +32,3 @@ FUNCTION: snappy_status snappy_uncompressed_length ( char* compressed,
|
|||
|
||||
FUNCTION: snappy_status snappy_validate_compressed_buffer ( char* compressed,
|
||||
size_t compressed_length ) ;
|
||||
|
||||
|
|
|
|||
|
|
@ -30,4 +30,3 @@ PRIVATE>
|
|||
size_t deref
|
||||
n>outs
|
||||
[ snappy_uncompress check-snappy ] 2keep drop >byte-array ;
|
||||
|
||||
|
|
|
|||
|
|
@ -41,4 +41,3 @@ FUNCTION: CFTypeRef CFRetain ( CFTypeRef cf ) ;
|
|||
FUNCTION: void CFRelease ( CFTypeRef cf ) ;
|
||||
|
||||
DESTRUCTOR: CFRelease
|
||||
|
||||
|
|
|
|||
|
|
@ -51,5 +51,3 @@ FUNCTION: CFTimeInterval CFRunLoopTimerGetInterval (
|
|||
FUNCTION: CFAbsoluteTime CFRunLoopTimerGetNextFireDate (
|
||||
CFRunLoopTimerRef timer
|
||||
) ;
|
||||
|
||||
|
||||
|
|
|
|||
|
|
@ -52,4 +52,3 @@ M: windows-error error.
|
|||
"Win32 error 0x" write
|
||||
dup n>> 0xffff,ffff bitand >hex write ": " write
|
||||
string>> write ;
|
||||
|
||||
|
|
|
|||
|
|
@ -7,4 +7,3 @@ M: dlist pprint-delims drop \ DL{ \ } ;
|
|||
M: dlist >pprint-sequence dlist>sequence ;
|
||||
M: dlist pprint-narrow? drop f ;
|
||||
M: dlist pprint* pprint-object ;
|
||||
|
||||
|
|
|
|||
|
|
@ -14,4 +14,3 @@ M: atom-editor editor-command ( file line -- command )
|
|||
atom-path get [ "atom" ?find-in-path ] unless* ,
|
||||
number>string ":" glue ,
|
||||
] { } make ;
|
||||
|
||||
|
|
|
|||
|
|
@ -18,4 +18,3 @@ M: editpadpro editor-command ( file line -- command )
|
|||
[
|
||||
editpadpro-path , number>string "/l" prepend , ,
|
||||
] { } make ;
|
||||
|
||||
|
|
|
|||
|
|
@ -18,4 +18,3 @@ M: etexteditor editor-command ( file line -- command )
|
|||
etexteditor-path ,
|
||||
[ , ] [ "--line" , number>string , ] bi*
|
||||
] { } make ;
|
||||
|
||||
|
|
|
|||
|
|
@ -290,4 +290,3 @@ M: array (write-farkup) [ (write-farkup) ] map ;
|
|||
|
||||
: convert-farkup ( string -- string' )
|
||||
[ write-farkup ] with-string-writer ;
|
||||
|
||||
|
|
|
|||
|
|
@ -14,4 +14,3 @@ M: keys-array length length>> ;
|
|||
M: keys-array nth-unsafe underlying>> nth-unsafe >key ;
|
||||
|
||||
INSTANCE: keys-array sequence
|
||||
|
||||
|
|
|
|||
|
|
@ -2,4 +2,3 @@
|
|||
! See http://factorcode.org/license.txt for BSD license.
|
||||
USING: gdk.ffi ;
|
||||
IN: gdk
|
||||
|
||||
|
|
|
|||
|
|
@ -2,4 +2,3 @@
|
|||
! See http://factorcode.org/license.txt for BSD license.
|
||||
USING: gdk.gl.ffi ;
|
||||
IN: gdk.gl
|
||||
|
||||
|
|
|
|||
|
|
@ -2,4 +2,3 @@
|
|||
! See http://factorcode.org/license.txt for BSD license.
|
||||
USING: gdk.pixbuf.ffi ;
|
||||
IN: gdk.pixbuf
|
||||
|
||||
|
|
|
|||
|
|
@ -2,4 +2,3 @@
|
|||
! See http://factorcode.org/license.txt for BSD license.
|
||||
USING: gio.ffi ;
|
||||
IN: gio
|
||||
|
||||
|
|
|
|||
|
|
@ -2,4 +2,3 @@
|
|||
! See http://factorcode.org/license.txt for BSD license.
|
||||
USING: glib.ffi ;
|
||||
IN: glib
|
||||
|
||||
|
|
|
|||
|
|
@ -2,4 +2,3 @@
|
|||
! See http://factorcode.org/license.txt for BSD license.
|
||||
USING: gmodule.ffi ;
|
||||
IN: gmodule
|
||||
|
||||
|
|
|
|||
|
|
@ -360,4 +360,3 @@ M: array-type field-type>c-type type>c-type ;
|
|||
|
||||
: def-ffi-repository ( repository -- )
|
||||
namespace>> def-namespace ;
|
||||
|
||||
|
|
|
|||
|
|
@ -2,4 +2,3 @@
|
|||
! See http://factorcode.org/license.txt for BSD license.
|
||||
USING: gobject.ffi ;
|
||||
IN: gobject
|
||||
|
||||
|
|
|
|||
|
|
@ -2,4 +2,3 @@
|
|||
! See http://factorcode.org/license.txt for BSD license.
|
||||
USING: gtk.gl.ffi ;
|
||||
IN: gtk.gl
|
||||
|
||||
|
|
|
|||
|
|
@ -2,4 +2,3 @@
|
|||
! See http://factorcode.org/license.txt for BSD license.
|
||||
USING: gtk.ffi ;
|
||||
IN: gtk
|
||||
|
||||
|
|
|
|||
|
|
@ -11,5 +11,3 @@ M: wrapped-hash-set >pprint-sequence members ;
|
|||
M: wrapped-hash-set pprint*
|
||||
nesting-limit inc
|
||||
[ pprint-object ] [ nesting-limit dec ] [ ] cleanup ;
|
||||
|
||||
|
||||
|
|
|
|||
|
|
@ -11,5 +11,3 @@ M: wrapped-hashtable >pprint-sequence >alist ;
|
|||
M: wrapped-hashtable pprint*
|
||||
nesting-limit inc
|
||||
[ pprint-object ] [ nesting-limit dec ] [ ] cleanup ;
|
||||
|
||||
|
||||
|
|
|
|||
|
|
@ -88,4 +88,3 @@ PRIVATE>
|
|||
[ >byte-array ] change-bitmap
|
||||
RGBA reorder-components
|
||||
normalize-scan-line-order ;
|
||||
|
||||
|
|
|
|||
|
|
@ -84,4 +84,3 @@ M: windows (directory-entries) ( path -- seq )
|
|||
over name>> "." = [ nip ] [ swap prefix ] if
|
||||
]
|
||||
] [ drop '[ _ FindClose win32-error=0/f ] ] 2bi [ ] cleanup ;
|
||||
|
||||
|
|
|
|||
|
|
@ -4,4 +4,3 @@ USING: io.encodings.8-bit ;
|
|||
IN: io.encodings.8-bit.latin4
|
||||
|
||||
8-BIT: latin4 ISO_8859-4:1988 8859-4
|
||||
|
||||
|
|
|
|||
|
|
@ -4,4 +4,3 @@ USING: io.encodings.8-bit ;
|
|||
IN: io.encodings.8-bit.latin6
|
||||
|
||||
8-BIT: latin6 ISO-8859-10 8859-10
|
||||
|
||||
|
|
|
|||
|
|
@ -6,4 +6,3 @@ IN: io.encodings.big5
|
|||
EUC: big5 "vocab:io/encodings/big5/CP950.TXT"
|
||||
|
||||
big5 "Big5" register-encoding
|
||||
|
||||
|
|
|
|||
|
|
@ -4,4 +4,3 @@ USE: io.encodings.euc
|
|||
IN: io.encodings.johab
|
||||
|
||||
EUC: johab "vocab:io/encodings/johab/johab.txt"
|
||||
|
||||
|
|
|
|||
|
|
@ -6,4 +6,3 @@ IN: io.sockets.unix.linux
|
|||
! Linux seems to use the same port-space for ipv4 and ipv6.
|
||||
|
||||
M: linux resolve-localhost { T{ ipv4 f "0.0.0.0" } } ;
|
||||
|
||||
|
|
|
|||
|
|
@ -35,4 +35,3 @@ M: object find-in-standard-login-path*
|
|||
{ [ os macosx? ] [ "io.standard-paths.macosx" ] }
|
||||
{ [ os unix? ] [ "io.standard-paths.unix" ] }
|
||||
} cond require
|
||||
|
||||
|
|
|
|||
|
|
@ -11,4 +11,3 @@ M: windows find-in-applications
|
|||
M: windows find-in-path*
|
||||
[ "PATH" os-env ";" split ] dip
|
||||
'[ _ append-path exists? ] find nip ;
|
||||
|
||||
|
|
|
|||
|
|
@ -161,4 +161,3 @@ TUPLE: mach-error-state error-code error-string ;
|
|||
IORegistryEntryCreateCFProperties mach-error
|
||||
]
|
||||
keep void* deref ;
|
||||
|
||||
|
|
|
|||
|
|
@ -159,4 +159,3 @@ PRIVATE>
|
|||
{ [ cpu ppc? ] [ "math.floats.env.ppc" require ] }
|
||||
[ "CPU architecture unsupported by math.floats.env" throw ]
|
||||
} cond >>
|
||||
|
||||
|
|
|
|||
|
|
@ -146,4 +146,3 @@ M: ppc-vmx-env (set-denormal-mode) ( register mode -- register )
|
|||
{ +denormal-flush+ [ vmx-denormal-mode-bits bitor ] }
|
||||
} case
|
||||
] curry change-vscr ; inline
|
||||
|
||||
|
|
|
|||
|
|
@ -99,4 +99,3 @@ MACRO: polyval* ( p -- )
|
|||
[ rest [ \ * swap \ + [ ] 3sequence ] map ]
|
||||
[ first \ drop swap [ ] 2sequence ] bi
|
||||
prefix \ cleave [ ] 2sequence ;
|
||||
|
||||
|
|
|
|||
|
|
@ -105,4 +105,3 @@ MACRO:: vconvert ( from-type to-type -- )
|
|||
{ [ from-size to-size = ] [ [vconvert] ] }
|
||||
{ [ from-size to-size > ] [ [vpack] ] }
|
||||
} cond ;
|
||||
|
||||
|
|
|
|||
|
|
@ -3,4 +3,3 @@ USING: kernel memoize parser sequences stack-checker ;
|
|||
IN: memoize.syntax
|
||||
|
||||
SYNTAX: MEMO[ parse-quotation dup infer memoize-quot suffix! ;
|
||||
|
||||
|
|
|
|||
|
|
@ -47,4 +47,3 @@ MEMO: mime-types ( -- assoc )
|
|||
|
||||
: mime-type-encoding ( mime-type -- encoding )
|
||||
"text/" head? utf8 binary ? ;
|
||||
|
||||
|
|
|
|||
|
|
@ -120,4 +120,3 @@ GENERIC: set-range-max-value ( value model -- )
|
|||
|
||||
: pop-model ( model -- value )
|
||||
[ pop ] change-model* ;
|
||||
|
||||
|
|
|
|||
|
|
@ -20,4 +20,3 @@ SYMBOL: G-world
|
|||
|
||||
SYNTAX: GB
|
||||
\ gl-break suffix! ;
|
||||
|
||||
|
|
|
|||
|
|
@ -2570,4 +2570,3 @@ CONSTANT: GL_COMPRESSED_LUMINANCE_LATC1_EXT 0x8C70
|
|||
CONSTANT: GL_COMPRESSED_SIGNED_LUMINANCE_LATC1_EXT 0x8C71
|
||||
CONSTANT: GL_COMPRESSED_LUMINANCE_ALPHA_LATC2_EXT 0x8C72
|
||||
CONSTANT: GL_COMPRESSED_SIGNED_LUMINANCE_ALPHA_LATC2_EXT 0x8C73
|
||||
|
||||
|
|
|
|||
|
|
@ -11,4 +11,3 @@ IN: opengl.gl.gtk
|
|||
ascii string>alien gdk_gl_get_proc_address ; inline
|
||||
|
||||
: gl-function-calling-convention ( -- str ) cdecl ; inline
|
||||
|
||||
|
|
|
|||
|
|
@ -131,4 +131,3 @@ PREDICATE: gl-program < integer (gl-program?) ;
|
|||
[ <vertex-shader> check-gl-shader ]
|
||||
[ <fragment-shader> check-gl-shader ] bi*
|
||||
2array <gl-program> check-gl-program ;
|
||||
|
||||
|
|
|
|||
|
|
@ -2,4 +2,3 @@
|
|||
! See http://factorcode.org/license.txt for BSD license.
|
||||
USING: pango.cairo.ffi ;
|
||||
IN: pango.cairo
|
||||
|
||||
|
|
|
|||
|
|
@ -2,4 +2,3 @@
|
|||
! See http://factorcode.org/license.txt for BSD license.
|
||||
USING: pango.ffi ;
|
||||
IN: pango
|
||||
|
||||
|
|
|
|||
|
|
@ -79,4 +79,3 @@ M: mersenne-twister random-32*
|
|||
[
|
||||
default-mersenne-twister random-generator set-global
|
||||
] "bootstrap.random" add-startup-hook
|
||||
|
||||
|
|
|
|||
|
|
@ -96,4 +96,3 @@ PRIVATE>
|
|||
|
||||
: unrolled-map-index ( seq len quot: ( x i -- newx ) -- newseq )
|
||||
[ dup length iota ] 2dip unrolled-2map ; inline
|
||||
|
||||
|
|
|
|||
|
|
@ -13,4 +13,3 @@ IN: specialized-arrays.prettyprint
|
|||
|
||||
M: specialized-array pprint*
|
||||
[ pprint-object ] [ pprint-direct-array ] pprint-c-object ;
|
||||
|
||||
|
|
|
|||
|
|
@ -185,4 +185,3 @@ M: object apply-object push-literal ;
|
|||
word effect variables branches n declare-effect-d
|
||||
] when*
|
||||
] each-index ;
|
||||
|
||||
|
|
|
|||
|
|
@ -8,4 +8,3 @@ HOOK: find-library-file os ( file -- path )
|
|||
os windows?
|
||||
"tools.deploy.libraries.windows"
|
||||
"tools.deploy.libraries.unix" ? require
|
||||
|
||||
|
|
|
|||
|
|
@ -13,4 +13,3 @@ M: unix find-library-file
|
|||
{ "/lib" "/usr/lib" "/usr/local/lib" "/opt/local/lib" "resource:" }
|
||||
[ prepend-path ?exists ] with map-find drop
|
||||
] if ;
|
||||
|
||||
|
|
|
|||
|
|
@ -13,4 +13,3 @@ M: windows find-library-file
|
|||
alien>native-string
|
||||
] [ FreeLibrary drop ] bi
|
||||
] [ f ] if* ;
|
||||
|
||||
|
|
|
|||
|
|
@ -79,4 +79,3 @@ PRIVATE>
|
|||
|
||||
hUpdate 0 EndUpdateResource drop
|
||||
] when ;
|
||||
|
||||
|
|
|
|||
|
|
@ -37,4 +37,3 @@ PRIVATE>
|
|||
|
||||
: typed-set-global ( value name type -- )
|
||||
[ set-global ] (typed-set) ; inline
|
||||
|
||||
|
|
|
|||
|
|
@ -263,4 +263,3 @@ cocoa-ui-backend ui-backend set-global
|
|||
|
||||
M: cocoa-ui-backend ui-backend-available?
|
||||
running.app? ;
|
||||
|
||||
|
|
|
|||
|
|
@ -444,4 +444,3 @@ M: string content-gadget
|
|||
'[ _ write ] make-pane <scroller>
|
||||
{ 450 100 } >>pref-dim
|
||||
<wrapper> ;
|
||||
|
||||
|
|
|
|||
|
|
@ -242,4 +242,3 @@ PRIVATE>
|
|||
[ <down-button> f track-add ]
|
||||
[ drop <gadget> { 1 1 } >>dim f track-add ]
|
||||
} cleave ;
|
||||
|
||||
|
|
|
|||
|
|
@ -17,4 +17,3 @@ M: image-pen draw-interior
|
|||
] if ;
|
||||
|
||||
M: image-pen pen-pref-dim nip image>> image-dim ;
|
||||
|
||||
|
|
|
|||
|
|
@ -14,4 +14,3 @@ M: linux utmpx>utmpx-record ( utmpx -- utmpx-record )
|
|||
[ ut_tv>> timeval>unix-time >>timestamp ]
|
||||
[ ut_host>> __UT_HOSTSIZE memory>string >>host ]
|
||||
} cleave ;
|
||||
|
||||
|
|
|
|||
|
|
@ -1568,5 +1568,3 @@ ALIAS: SetNamedSecurityInfo SetNamedSecurityInfoW
|
|||
! : WmiSetSingleItemW ;
|
||||
! : Wow64Win32ApiEntry ;
|
||||
! : WriteEncryptedFileRaw ;
|
||||
|
||||
|
||||
|
|
|
|||
|
|
@ -100,5 +100,3 @@ ERROR: null-com-release ;
|
|||
over [ com-release ] curry [ ] cleanup ; inline
|
||||
|
||||
DESTRUCTOR: com-release
|
||||
|
||||
|
||||
|
|
|
|||
|
|
@ -2030,4 +2030,3 @@ CONSTANT: SCWMI_CLOBBER_SECURITY 0x00000001
|
|||
FUNCTION: BOOL SetupConfigureWmiFromInfSectionA ( HINF InfHandle, PCSTR SectionName, DWORD Flags ) ;
|
||||
FUNCTION: BOOL SetupConfigureWmiFromInfSectionW ( HINF InfHandle, PCWSTR SectionName, DWORD Flags ) ;
|
||||
ALIAS: SetupConfigureWmiFromInfSection SetupConfigureWmiFromInfSectionW
|
||||
|
||||
|
|
|
|||
|
|
@ -564,4 +564,3 @@ FUNCTION: BOOL D2D1IsMatrixInvertible (
|
|||
|
||||
FUNCTION: BOOL D2D1InvertMatrix (
|
||||
D2D1_MATRIX_3X2_F* matrix ) ;
|
||||
|
||||
|
|
|
|||
|
|
@ -86,4 +86,3 @@ FUNCTION: HRESULT D3DStripShader (
|
|||
SIZE_T BytecodeLength,
|
||||
UINT uStripFlags,
|
||||
LPD3DBLOB* ppStrippedBlob ) ;
|
||||
|
||||
|
|
|
|||
|
|
@ -290,4 +290,3 @@ FUNCTION: HRESULT
|
|||
FLOAT* pROut,
|
||||
FLOAT* pGOut,
|
||||
FLOAT* pBOut ) ;
|
||||
|
||||
|
|
|
|||
|
|
@ -366,4 +366,3 @@ FUNCTION: HRESULT
|
|||
LPD3DXEFFECT pEffect,
|
||||
BOOL EnableColorCode,
|
||||
LPD3DXBUFFER* ppDisassembly ) ;
|
||||
|
||||
|
|
|
|||
|
|
@ -157,4 +157,3 @@ FUNCTION: HRESULT D3DXSHEvalHemisphereLight
|
|||
FUNCTION: HRESULT D3DXSHProjectCubeMap
|
||||
( UINT uOrder, LPDIRECT3DCUBETEXTURE9 pCubeMap,
|
||||
FLOAT* ROut, FLOAT* GOut, FLOAT* BOut ) ;
|
||||
|
||||
|
|
|
|||
|
|
@ -1217,4 +1217,3 @@ FUNCTION: HRESULT
|
|||
UINT* pVertDataLength,
|
||||
UINT* pSCClusterList,
|
||||
D3DXSHPRTSPLITMESHCLUSTERDATA* pSCData ) ;
|
||||
|
||||
|
|
|
|||
|
|
@ -434,4 +434,3 @@ STRUCT: D3DXSHADER_STRUCTMEMBERINFO
|
|||
{ Name DWORD }
|
||||
{ TypeInfo DWORD } ;
|
||||
TYPEDEF: D3DXSHADER_STRUCTMEMBERINFO* LPD3DXSHADER_STRUCTMEMBERINFO
|
||||
|
||||
|
|
|
|||
|
|
@ -851,4 +851,3 @@ MACRO: <DIDATAFORMAT> ( dwFlags dwDataSize struct rgodf-array -- alien )
|
|||
} [ [ rgodf>> free ] uninitialize ] each ;
|
||||
|
||||
PRIVATE>
|
||||
|
||||
|
|
|
|||
|
|
@ -471,4 +471,3 @@ CONSTANT: XACTENGINE_E_AUDITION_INVALIDDSPINDEX 0x8AC70106
|
|||
CONSTANT: XACTENGINE_E_AUDITION_MISSINGWAVE 0x8AC70107
|
||||
CONSTANT: XACTENGINE_E_AUDITION_CREATEDIRECTORYFAILED 0x8AC70108
|
||||
CONSTANT: XACTENGINE_E_AUDITION_INVALIDSESSION 0x8AC70109
|
||||
|
||||
|
|
|
|||
|
|
@ -63,5 +63,3 @@ COM-INTERFACE: IXAPO IUnknown {A90BC001-E897-E897-55E4-9E4700000000}
|
|||
COM-INTERFACE: IXAPOParameters IUnknown {A90BC001-E897-E897-55E4-9E4700000001}
|
||||
void SetParameters ( void* pParameters, UINT32 ParameterByteSize )
|
||||
void GetParameters ( void* pParameters, UINT32 ParameterByteSize ) ;
|
||||
|
||||
|
||||
|
|
|
|||
|
|
@ -39,4 +39,3 @@ PRIVATE>
|
|||
|
||||
: wrap-words ( words line-max line-ideal -- lines )
|
||||
[ words>elements ] 2dip wrap [ concat ] map! ;
|
||||
|
||||
|
|
|
|||
|
|
@ -138,4 +138,3 @@ CONSTANT: XI_RawMotion 17
|
|||
: XI_RawButtonPressMask ( -- n ) XI_RawButtonPress 2^ ; inline
|
||||
: XI_RawButtonReleaseMask ( -- n ) XI_RawButtonRelease 2^ ; inline
|
||||
: XI_RawMotionMask ( -- n ) XI_RawMotion 2^ ; inline
|
||||
|
||||
|
|
|
|||
|
|
@ -481,4 +481,3 @@ X-FUNCTION: Status XIGetProperty (
|
|||
uchar** data ) ;
|
||||
|
||||
X-FUNCTION: void XIFreeDeviceInfo ( XIDeviceInfo* info ) ;
|
||||
|
||||
|
|
|
|||
|
|
@ -14,4 +14,3 @@ IN: x11.xinput2
|
|||
} case ;
|
||||
|
||||
: xi2-available? ( -- ? ) dpy get (xi2-available?) ; inline
|
||||
|
||||
|
|
|
|||
|
|
@ -1446,4 +1446,3 @@ X-FUNCTION: c-string XSetLocaleModifiers ( c-string modifier_list ) ;
|
|||
! uncategorized xlib bindings
|
||||
|
||||
X-FUNCTION: int XQueryKeymap ( Display* display, char[32] keys_return ) ;
|
||||
|
||||
|
|
|
|||
|
|
@ -82,4 +82,3 @@ IN: xml.autoencoding
|
|||
{ 0xFE [ skip-utf16be-bom ] }
|
||||
[ drop utf8 decode-stream check f ]
|
||||
} case ;
|
||||
|
||||
|
|
|
|||
|
|
@ -170,4 +170,3 @@ C: <pathname> pathname
|
|||
M: pathname absolute-path string>> absolute-path ;
|
||||
|
||||
M: pathname <=> [ string>> ] compare ;
|
||||
|
||||
|
|
|
|||
|
|
@ -128,4 +128,3 @@ SYNTAX: data-map(
|
|||
|
||||
SYNTAX: data-map!(
|
||||
parse-data-map-effect \ data-map! suffix! ;
|
||||
|
||||
|
|
|
|||
|
|
@ -452,4 +452,3 @@ SYNTAX: LIBRARY:
|
|||
scan-token
|
||||
[ current-library set ]
|
||||
[ set-fortran-abi ] bi ;
|
||||
|
||||
|
|
|
|||
|
|
@ -46,4 +46,3 @@ DESTRUCTOR: release-alien-handle
|
|||
alien-address release-alien-handle ; inline
|
||||
|
||||
DESTRUCTOR: release-alien-handle-ptr
|
||||
|
||||
|
|
|
|||
|
|
@ -41,4 +41,3 @@ CONSTANT: annotation-tags {
|
|||
annotation-tags [ define-annotation ] each
|
||||
|
||||
>>
|
||||
|
||||
|
|
|
|||
|
|
@ -21,4 +21,3 @@ ERROR: format-unsupported-by-openal audio ;
|
|||
{ { 2 16 } [ drop AL_FORMAT_STEREO16 ] }
|
||||
[ drop format-unsupported-by-openal ]
|
||||
} case ;
|
||||
|
||||
|
|
|
|||
|
|
@ -25,4 +25,3 @@ ERROR: invalid-audio-file ;
|
|||
|
||||
: check-chunk ( chunk id class -- ? )
|
||||
heap-size [ id= ] [ [ length ] dip >= ] bi-curry* bi and ; inline
|
||||
|
||||
|
|
|
|||
|
|
@ -341,4 +341,3 @@ M: streaming-audio-clip dispose*
|
|||
[ update-listener ]
|
||||
[ clips>> clone [ update-audio-clip ] each ]
|
||||
} cleave ;
|
||||
|
||||
|
|
|
|||
|
|
@ -22,4 +22,3 @@ SYMBOL: loop-max
|
|||
20,000 [ outer-loop ] [ loop-max get-global assert= ] bi ;
|
||||
|
||||
MAIN: timers-benchmark
|
||||
|
||||
|
|
|
|||
|
|
@ -137,4 +137,3 @@ PRIVATE>
|
|||
#! requires patched bitcoind
|
||||
:: list-transactions ( count include-generated -- seq )
|
||||
"listtransactions" { count include-generated } bitcoin-request ;
|
||||
|
||||
|
|
|
|||
|
|
@ -155,4 +155,3 @@ M: range-observer model-changed
|
|||
MAIN-WINDOW: boids { { title "Boids" } }
|
||||
create-gadgets
|
||||
>>gadgets ;
|
||||
|
||||
|
|
|
|||
|
|
@ -85,4 +85,3 @@ CONSTANT: T_Binary_Bytes_Deprecated 0x2
|
|||
CONSTANT: T_Binary_UUID 0x3
|
||||
CONSTANT: T_Binary_MD5 0x5
|
||||
CONSTANT: T_Binary_Custom 0x80
|
||||
|
||||
|
|
|
|||
Some files were not shown because too many files have changed in this diff Show More
Loading…
Reference in New Issue