stack-checker.alien: We just want to track callbacks to see if we leak them, but not actually dispose of them yet. Fixes #1151.
parent
794baf3222
commit
8fc2ecc281
|
@ -107,7 +107,7 @@ TUPLE: alien-callback-params < alien-node-params xt ;
|
|||
: callback-xt ( word -- alien )
|
||||
callbacks get [
|
||||
dup "stack-cleanup" word-prop <callback>
|
||||
callback-destructor boa &dispose callback>>
|
||||
[ callback-destructor new-disposable callback<< ] keep
|
||||
] cache ;
|
||||
|
||||
: callback-bottom ( params -- )
|
||||
|
|
Loading…
Reference in New Issue