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

tools.memory: move invariant code to cleanup-always quot of the cleanup

char-rename
Alexander Iljin 2016-05-31 13:07:20 +03:00 committed by John Benediktsson
parent e9454fc310
commit b0c6f97bf5
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
basis/tools/memory/memory.factor
View File

@ -101,8 +101,8 @@ PRIVATE>
: collect-gc-events ( quot -- gc-events ) : collect-gc-events ( quot -- gc-events )
enable-gc-events enable-gc-events
[ ] [ disable-gc-events drop ] cleanup [ disable-gc-events ] [ drop ] cleanup
disable-gc-events [ gc-event memory>struct ] map ; inline [ gc-event memory>struct ] map ; inline
<PRIVATE <PRIVATE