cocoa: cleanup usings.
parent
c65877104e
commit
4a13633e5d
|
@ -1,9 +1,7 @@
|
|||
! Copyright (C) 2006, 2010 Slava Pestov
|
||||
! See http://factorcode.org/license.txt for BSD license.
|
||||
USING: alien alien.c-types alien.syntax io kernel namespaces
|
||||
core-foundation core-foundation.strings cocoa.messages cocoa
|
||||
cocoa.classes cocoa.runtime sequences init summary
|
||||
kernel.private assocs ;
|
||||
USING: alien.c-types alien.syntax cocoa cocoa.classes
|
||||
cocoa.runtime core-foundation.strings kernel sequences ;
|
||||
IN: cocoa.application
|
||||
|
||||
: <NSString> ( str -- alien ) <CFString> -> autorelease ;
|
||||
|
|
|
@ -1,8 +1,7 @@
|
|||
! Copyright (C) 2006, 2008 Slava Pestov
|
||||
! See http://factorcode.org/license.txt for BSD license.
|
||||
USING: kernel cocoa cocoa.messages cocoa.classes
|
||||
cocoa.application sequences splitting core-foundation
|
||||
core-foundation.strings ;
|
||||
USING: cocoa cocoa.application cocoa.classes
|
||||
core-foundation.strings kernel splitting ;
|
||||
IN: cocoa.dialogs
|
||||
|
||||
: <NSOpenPanel> ( -- panel )
|
||||
|
@ -27,8 +26,9 @@ CONSTANT: NSCancelButton 0
|
|||
: (open-panel) ( panel -- paths )
|
||||
dup -> runModal NSOKButton =
|
||||
[ -> filenames CF>string-array ] [ drop f ] if ;
|
||||
|
||||
|
||||
: open-panel ( -- paths ) <NSOpenPanel> (open-panel) ;
|
||||
|
||||
: open-dir-panel ( -- paths ) <NSDirPanel> (open-panel) ;
|
||||
|
||||
: split-path ( path -- dir file )
|
||||
|
|
|
@ -1,11 +1,11 @@
|
|||
! Copyright (C) 2006, 2010 Slava Pestov.
|
||||
! See http://factorcode.org/license.txt for BSD license.
|
||||
USING: accessors alien alien.c-types alien.data alien.strings
|
||||
arrays assocs classes.struct continuations combinators compiler
|
||||
core-graphics.types stack-checker kernel math namespaces make
|
||||
quotations sequences strings words cocoa.runtime cocoa.types io
|
||||
macros memoize io.encodings.utf8 effects layouts libc lexer init
|
||||
core-foundation fry generalizations specialized-arrays locals ;
|
||||
arrays assocs classes.struct cocoa.runtime cocoa.types
|
||||
combinators core-graphics.types fry generalizations
|
||||
io.encodings.utf8 kernel layouts libc locals macros make math
|
||||
memoize namespaces quotations sequences specialized-arrays
|
||||
stack-checker strings words ;
|
||||
QUALIFIED-WITH: alien.c-types c
|
||||
IN: cocoa.messages
|
||||
|
||||
|
|
|
@ -1,8 +1,7 @@
|
|||
! Copyright (C) 2008, 2010 Slava Pestov.
|
||||
! See http://factorcode.org/license.txt for BSD license.
|
||||
USING: alien.c-types alien.data cocoa.application cocoa.messages
|
||||
cocoa.classes cocoa.runtime cocoa core-foundation
|
||||
core-foundation.arrays kernel ;
|
||||
USING: alien.c-types alien.data cocoa cocoa.application
|
||||
cocoa.classes core-foundation.arrays kernel ;
|
||||
IN: cocoa.nibs
|
||||
|
||||
: load-nib ( name -- )
|
||||
|
@ -18,4 +17,4 @@ IN: cocoa.nibs
|
|||
f
|
||||
{ void* } [ -> instantiateNibWithOwner:topLevelObjects: ]
|
||||
with-out-parameters
|
||||
swap [ CF>array ] [ drop f ] if ;
|
||||
swap [ CF>array ] [ drop f ] if ;
|
||||
|
|
|
@ -1,8 +1,8 @@
|
|||
! Copyright (C) 2006, 2009 Slava Pestov.
|
||||
! See http://factorcode.org/license.txt for BSD license.
|
||||
USING: alien.accessors arrays kernel cocoa.messages
|
||||
cocoa.classes cocoa.application sequences cocoa core-foundation
|
||||
core-foundation.strings core-foundation.arrays ;
|
||||
USING: alien.accessors arrays cocoa cocoa.application
|
||||
core-foundation.arrays core-foundation.strings kernel sequences
|
||||
;
|
||||
IN: cocoa.pasteboard
|
||||
|
||||
CONSTANT: NSStringPboardType "NSStringPboardType"
|
||||
|
|
|
@ -1,12 +1,11 @@
|
|||
! Copyright (C) 2007, 2009 Slava Pestov.
|
||||
! Copyright (C) 2008 Joe Groff.
|
||||
! See http://factorcode.org/license.txt for BSD license.
|
||||
USING: strings arrays hashtables assocs sequences fry macros
|
||||
cocoa cocoa.messages cocoa.classes cocoa.application
|
||||
kernel namespaces io.backend math cocoa.enumeration byte-arrays
|
||||
combinators alien.c-types alien.data words quotations
|
||||
core-foundation core-foundation.data core-foundation.strings
|
||||
core-foundation.utilities ;
|
||||
USING: alien.c-types alien.data arrays byte-arrays cocoa
|
||||
cocoa.application cocoa.classes cocoa.enumeration combinators
|
||||
core-foundation.data core-foundation.strings
|
||||
core-foundation.utilities fry io.backend kernel macros math
|
||||
quotations sequences ;
|
||||
IN: cocoa.plists
|
||||
|
||||
: >plist ( value -- plist ) >cf -> autorelease ;
|
||||
|
|
|
@ -1,11 +1,9 @@
|
|||
! Copyright (C) 2006, 2010 Slava Pestov, Joe Groff.
|
||||
! See http://factorcode.org/license.txt for BSD license.
|
||||
USING: alien alien.c-types alien.parser alien.strings arrays
|
||||
assocs combinators compiler hashtables kernel lexer libc
|
||||
locals.parser locals.types math namespaces parser sequences
|
||||
words cocoa.messages cocoa.runtime locals compiler.units
|
||||
io.encodings.utf8 continuations make fry effects stack-checker
|
||||
stack-checker.errors ;
|
||||
USING: alien alien.parser alien.strings arrays assocs
|
||||
cocoa.messages cocoa.runtime combinators compiler.units fry
|
||||
io.encodings.utf8 kernel lexer locals locals.parser locals.types
|
||||
make namespaces parser sequences words ;
|
||||
IN: cocoa.subclassing
|
||||
|
||||
: init-method ( method -- sel imp types )
|
||||
|
|
|
@ -1,7 +1,7 @@
|
|||
! Copyright (C) 2006, 2009 Slava Pestov
|
||||
! See http://factorcode.org/license.txt for BSD license.
|
||||
USING: alien.c-types alien.syntax combinators kernel layouts
|
||||
classes.struct cocoa.runtime core-graphics.types ;
|
||||
USING: alien.c-types alien.syntax classes.struct cocoa.runtime
|
||||
core-graphics.types ;
|
||||
IN: cocoa.types
|
||||
|
||||
TYPEDEF: long NSInteger
|
||||
|
|
|
@ -1,8 +1,7 @@
|
|||
! Copyright (C) 2006, 2009 Slava Pestov
|
||||
! See http://factorcode.org/license.txt for BSD license.
|
||||
USING: arrays kernel math namespaces make
|
||||
cocoa cocoa.messages cocoa.classes core-graphics
|
||||
core-graphics.types sequences continuations accessors ;
|
||||
USING: accessors arrays cocoa core-graphics.types kernel math
|
||||
sequences ;
|
||||
IN: cocoa.views
|
||||
|
||||
CONSTANT: NSOpenGLPFAAllRenderers 1
|
||||
|
|
|
@ -1,7 +1,6 @@
|
|||
! Copyright (C) 2006, 2007 Slava Pestov
|
||||
! See http://factorcode.org/license.txt for BSD license.
|
||||
USING: arrays kernel math cocoa cocoa.messages cocoa.classes
|
||||
sequences math.bitwise ;
|
||||
USING: cocoa cocoa.classes kernel math ;
|
||||
IN: cocoa.windows
|
||||
|
||||
! Window styles
|
||||
|
|
Loading…
Reference in New Issue