Fix a memory leak in Cocoa

slava 2006-03-21 20:07:53 +00:00
parent 5c62ed4917
commit c69fadfc22
3 changed files with 9 additions and 7 deletions

View File

@ -6,9 +6,7 @@
- amd64 %box-struct - amd64 %box-struct
- x86 %box-struct - x86 %box-struct
- x86 %write-barrier - x86 %write-barrier
- OS X stuff: - statically link freetype on OS X
- set resource path to bundle path
- link in freetype statically
- when generating a 32-bit image on a 64-bit system, large numbers which should - when generating a 32-bit image on a 64-bit system, large numbers which should
be bignums become fixnums be bignums become fixnums
@ -23,6 +21,9 @@
+ ui/help: + ui/help:
- finish x11 backend
- sometimes clicks come through twice
- hand is broken by design
- speed up ideas: - speed up ideas:
- only do clipping for certain gadgets - only do clipping for certain gadgets
- use glRect - use glRect
@ -30,7 +31,6 @@
- add some padding to launchpad ui - add some padding to launchpad ui
- saving the image should save window configuration - saving the image should save window configuration
- menu drag retarget broken - menu drag retarget broken
- hang with multiple windows
- incremental layout flicker - incremental layout flicker
- expired aliens in view hash - expired aliens in view hash
- changelog in the UI - changelog in the UI
@ -44,8 +44,9 @@
- document tools - document tools
- document conventions - document conventions
- new turtle graphics tutorial - new turtle graphics tutorial
- better line spacing in ui and html= - better line spacing in ui and html
- tabular formatting - for inspector and changes - tabular formatting - for inspector and changes
- grid layout
- don't multiplex in the event loop if there is no pending i/o - don't multiplex in the event loop if there is no pending i/o
+ compiler/ffi: + compiler/ffi:
@ -70,6 +71,7 @@
+ misc: + misc:
- set resource path to image parent directory
- clean up stack effect generation code - clean up stack effect generation code
- code walker & exceptions - code walker & exceptions
- slice: if sequence or seq start is changed, abstraction violation - slice: if sequence or seq start is changed, abstraction violation

View File

@ -161,7 +161,7 @@ H{ } clone views set-global
[ over set-world-handle dup add-notify register-view ] keep ; [ over set-world-handle dup add-notify register-view ] keep ;
: <FactorWindow> ( gadget title -- window ) : <FactorWindow> ( gadget title -- window )
>r <FactorView> r> <ViewWindow> ; >r <FactorView> r> <ViewWindow> dup [contentView] [release] ;
IN: gadgets IN: gadgets

View File

@ -7,7 +7,7 @@ objc-NSOpenGLView objc-NSView opengl sequences ;
: <GLView> ( class dim -- view ) : <GLView> ( class dim -- view )
>r [alloc] 0 0 r> first2 <NSRect> >r [alloc] 0 0 r> first2 <NSRect>
NSOpenGLView [defaultPixelFormat] NSOpenGLView [defaultPixelFormat]
[initWithFrame:pixelFormat:] [autorelease] [initWithFrame:pixelFormat:]
dup 1 [setPostsBoundsChangedNotifications:] dup 1 [setPostsBoundsChangedNotifications:]
dup 1 [setPostsFrameChangedNotifications:] ; dup 1 [setPostsFrameChangedNotifications:] ;