core-foundation: cleanup usings.
parent
4a13633e5d
commit
be64b40b7f
|
@ -1,7 +1,7 @@
|
|||
! Copyright (C) 2008, 2009 Slava Pestov.
|
||||
! See http://factorcode.org/license.txt for BSD license.
|
||||
USING: alien.c-types alien.syntax core-foundation kernel
|
||||
sequences fry ;
|
||||
USING: alien.c-types alien.syntax core-foundation fry kernel
|
||||
sequences ;
|
||||
IN: core-foundation.arrays
|
||||
|
||||
TYPEDEF: void* CFArrayRef
|
||||
|
|
|
@ -1,9 +1,8 @@
|
|||
! Copyright (C) 2009 Slava Pestov.
|
||||
! See http://factorcode.org/license.txt for BSD license.
|
||||
USING: alien.c-types alien.syntax kernel destructors
|
||||
core-foundation core-foundation.dictionaries
|
||||
core-foundation.strings
|
||||
core-foundation.utilities ;
|
||||
USING: alien.c-types alien.syntax core-foundation
|
||||
core-foundation.dictionaries core-foundation.strings
|
||||
core-foundation.utilities destructors kernel ;
|
||||
IN: core-foundation.attributed-strings
|
||||
|
||||
TYPEDEF: void* CFAttributedStringRef
|
||||
|
|
|
@ -1,7 +1,7 @@
|
|||
! Copyright (C) 2008 Slava Pestov.
|
||||
! See http://factorcode.org/license.txt for BSD license.
|
||||
USING: alien.c-types alien.syntax kernel sequences
|
||||
core-foundation core-foundation.urls ;
|
||||
USING: alien.c-types alien.syntax core-foundation
|
||||
core-foundation.urls kernel sequences ;
|
||||
IN: core-foundation.bundles
|
||||
|
||||
TYPEDEF: void* CFBundleRef
|
||||
|
|
|
@ -1,6 +1,6 @@
|
|||
! Copyright (C) 2008 Joe Groff.
|
||||
! See http://factorcode.org/license.txt for BSD license.
|
||||
USING: alien.c-types alien.syntax core-foundation kernel math
|
||||
USING: alien.c-types alien.syntax core-foundation kernel
|
||||
sequences ;
|
||||
IN: core-foundation.data
|
||||
|
||||
|
|
|
@ -1,11 +1,11 @@
|
|||
! Copyright (C) 2008 Slava Pestov
|
||||
! See http://factorcode.org/license.txt for BSD license.
|
||||
USING: alien alien.c-types alien.data alien.strings alien.syntax
|
||||
kernel math sequences namespaces make assocs init accessors
|
||||
continuations combinators io.encodings.utf8 destructors locals
|
||||
arrays specialized-arrays classes.struct core-foundation
|
||||
core-foundation.arrays core-foundation.run-loop
|
||||
core-foundation.strings core-foundation.time unix.types ;
|
||||
USING: accessors alien alien.c-types alien.data alien.strings
|
||||
alien.syntax arrays assocs classes.struct combinators
|
||||
core-foundation core-foundation.arrays core-foundation.run-loop
|
||||
core-foundation.strings core-foundation.time destructors init
|
||||
io.encodings.utf8 kernel locals namespaces sequences
|
||||
specialized-arrays unix.types ;
|
||||
FROM: namespaces => change-global ;
|
||||
IN: core-foundation.fsevents
|
||||
|
||||
|
|
|
@ -1,10 +1,9 @@
|
|||
! Copyright (C) 2011 Doug Coleman.
|
||||
! See http://factorcode.org/license.txt for BSD license.
|
||||
USING: alien.c-types alien.data alien.syntax classes.struct
|
||||
continuations core-foundation core-foundation.strings
|
||||
core-foundation.urls destructors kernel sequences
|
||||
specialized-arrays.instances.alien.c-types.char strings
|
||||
unix.ffi ;
|
||||
USING: alien.syntax classes.struct continuations core-foundation
|
||||
core-foundation.strings core-foundation.urls destructors kernel
|
||||
sequences specialized-arrays.instances.alien.c-types.char
|
||||
strings unix.ffi ;
|
||||
IN: core-foundation.launch-services
|
||||
|
||||
FUNCTION: OSStatus LSFindApplicationForInfo (
|
||||
|
|
|
@ -1,7 +1,7 @@
|
|||
! Copyright (C) 2008, 2010 Slava Pestov.
|
||||
! See http://factorcode.org/license.txt for BSD license.
|
||||
USING: alien.c-types alien.syntax calendar core-foundation
|
||||
core-foundation.time calendar.unix kernel locals math system ;
|
||||
USING: alien.c-types alien.syntax calendar.unix core-foundation
|
||||
core-foundation.time locals ;
|
||||
IN: core-foundation.timers
|
||||
|
||||
TYPEDEF: void* CFRunLoopTimerRef
|
||||
|
|
|
@ -1,7 +1,7 @@
|
|||
! Copyright (C) 2008 Slava Pestov.
|
||||
! See http://factorcode.org/license.txt for BSD license.
|
||||
USING: alien.c-types alien.syntax kernel core-foundation.strings
|
||||
core-foundation core-foundation.urls ;
|
||||
USING: alien.c-types alien.syntax core-foundation
|
||||
core-foundation.strings kernel ;
|
||||
IN: core-foundation.urls
|
||||
|
||||
CONSTANT: kCFURLPOSIXPathStyle 0
|
||||
|
|
|
@ -1,10 +1,10 @@
|
|||
! Copyright (C) 2009 Slava Pestov.
|
||||
! See http://factorcode.org/license.txt for BSD license.
|
||||
USING: math assocs kernel sequences byte-arrays strings
|
||||
hashtables alien destructors
|
||||
core-foundation.numbers core-foundation.strings
|
||||
core-foundation.arrays core-foundation.dictionaries
|
||||
core-foundation.data core-foundation ;
|
||||
USING: alien assocs byte-arrays core-foundation
|
||||
core-foundation.arrays core-foundation.data
|
||||
core-foundation.dictionaries core-foundation.numbers
|
||||
core-foundation.strings destructors hashtables kernel math
|
||||
sequences strings ;
|
||||
IN: core-foundation.utilities
|
||||
|
||||
GENERIC: (>cf) ( obj -- cf )
|
||||
|
@ -18,4 +18,4 @@ M: hashtable (>cf) [ [ (>cf) &CFRelease ] bi@ ] assoc-map <CFDictionary> ;
|
|||
M: sequence (>cf) [ (>cf) &CFRelease ] map <CFArray> ;
|
||||
M: alien (>cf) CFRetain ;
|
||||
|
||||
: >cf ( obj -- cf ) [ (>cf) ] with-destructors ;
|
||||
: >cf ( obj -- cf ) [ (>cf) ] with-destructors ;
|
||||
|
|
Loading…
Reference in New Issue