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

lru-cache: fix M\ lru-cache clone.

char-rename
John Benediktsson 2017-03-02 18:41:24 -08:00
parent faf0158ad0
commit 9e4b0c10ae
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
extra/lru-cache/lru-cache.factor
View File

@ -31,3 +31,7 @@ M: lru-cache set-at
[ dlist>> ] tri (delete-at) [ dlist>> ] tri (delete-at)
] [ drop ] if ] [ drop ] if
] [ drop ] if* ; ] [ drop ] if* ;
M: lru-cache clone
[ assoc>> clone ] [ dlist>> clone ] [ max-size>> ] tri
lru-cache boa ;