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

cache: Don't use in-place filter 

This solves a UI corruption problem by not reusing the hashtable when
purging the cache. The root cause of why the hashtable gets corrupted
when filtering in place hasn't been found.

Fixes #1978.
flac
Niklas Larsson 2019-10-31 13:34:42 +01:00 committed by Steve Ayerhart
parent 608a03f044
commit e7512d4240
No known key found for this signature in database
GPG Key ID: 5BFD39C5359E967D
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/cache/cache.factor vendored
View File

@ -38,9 +38,9 @@ M: cache-assoc dispose* clear-assoc ;
PRIVATE> PRIVATE>
: purge-cache ( cache -- ) : purge-cache ( cache -- )
[ assoc>> ] [ max-age>> ] bi V{ } clone [ dup [ assoc>> ] [ max-age>> ] bi V{ } clone [
'[ '[
nip dup age>> 1 + [ >>age ] keep nip dup age>> 1 + [ >>age ] keep
_ < [ drop t ] [ _ dispose-to f ] if _ < [ drop t ] [ _ dispose-to f ] if
] assoc-filter! drop ] assoc-filter >>assoc drop
] keep [ last rethrow ] unless-empty ; ] keep [ last rethrow ] unless-empty ;