2006-02-09 20:36:11 -05:00
|
|
|
! Copyright (C) 2006 Slava Pestov
|
|
|
|
! See http://factorcode.org/license.txt for BSD license.
|
|
|
|
USING: cocoa compiler io kernel objc sequences words ;
|
|
|
|
|
|
|
|
"Compiling Objective C bridge..." print
|
|
|
|
|
|
|
|
{ "cocoa" "objc" } compile-vocabs
|
|
|
|
|
|
|
|
"Loading Cocoa frameworks..." print
|
|
|
|
{
|
|
|
|
"/System/Library/Frameworks/WebKit.framework"
|
|
|
|
"/System/Library/Frameworks/QTKit.framework"
|
|
|
|
"/System/Library/Frameworks/Quartz.framework/Frameworks/PDFKit.framework"
|
|
|
|
} [
|
|
|
|
dup print flush load-framework
|
|
|
|
] each
|
|
|
|
|
|
|
|
"Importing Cocoa classes..." print
|
|
|
|
{
|
|
|
|
"NSApplication"
|
|
|
|
"NSAutoreleasePool"
|
|
|
|
"NSDate"
|
2006-02-09 22:11:22 -05:00
|
|
|
"NSError"
|
2006-02-09 20:36:11 -05:00
|
|
|
"NSEvent"
|
2006-02-19 22:08:08 -05:00
|
|
|
"NSException"
|
2006-02-09 20:36:11 -05:00
|
|
|
"NSInvocation"
|
|
|
|
"NSMethodSignature"
|
|
|
|
"NSObject"
|
2006-03-11 04:00:22 -05:00
|
|
|
"NSOpenGLContext"
|
2006-02-09 20:36:11 -05:00
|
|
|
"NSOpenGLView"
|
|
|
|
"NSSpeechSynthesizer"
|
|
|
|
"NSURLRequest"
|
2006-03-10 22:57:57 -05:00
|
|
|
"NSView"
|
2006-02-09 20:36:11 -05:00
|
|
|
"NSWindow"
|
2006-02-09 22:11:22 -05:00
|
|
|
"PDFDocument"
|
2006-02-09 20:36:11 -05:00
|
|
|
"PDFView"
|
|
|
|
"QTMovie"
|
|
|
|
"QTMovieView"
|
|
|
|
"WebFrame"
|
|
|
|
"WebView"
|
|
|
|
} [
|
2006-03-08 16:07:17 -05:00
|
|
|
dup print flush import-objc-class
|
2006-02-09 20:36:11 -05:00
|
|
|
] each
|