steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Fix PDFKit demo

slava 2006-02-10 03:35:28 +00:00
parent dc3f4b2efb
commit ecf9010f6d
2 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
examples/cocoa-pdfkit.factor
View File

@ -6,7 +6,7 @@ objc-NSObject objc-NSWindow objc-PDFDocument objc-PDFView ;
: <PDFDocument> ( url -- document ) : <PDFDocument> ( url -- document )
<CFURL> [autorelease] <CFURL> [autorelease]
PDFDocument swap [initWithURL:] [autorelease] ; PDFDocument [alloc] swap [initWithURL:] [autorelease] ;
: <PDFView> ( document -- view ) : <PDFView> ( document -- view )
PDFView [alloc] 0 0 500 500 <NSRect> [initWithFrame:] PDFView [alloc] 0 0 500 500 <NSRect> [initWithFrame:]

1
library/cocoa/application-utils.factor
View File

@ -25,7 +25,6 @@ objc-NSAutoreleasePool objc-NSObject threads ;
: event-loop ( -- ) : event-loop ( -- )
\ NSApplication get expired? [ \ NSApplication get expired? [
drop
NSApplication [sharedApplication] NSApplication [sharedApplication]
\ NSApplication set-global \ NSApplication set-global
[ (event-loop) ] in-thread [ (event-loop) ] in-thread