spacefrogg
/
critbit
1
0
Fork 0
Code Releases Activity

Fix alist implementation 

Missed the general object case (notably `f`) for root node.
master
Michael Raitza 2020-02-24 16:26:43 +01:00
parent 7c61cdf984
commit 642aaf718c
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
trees/cb/cb.factor
View File

@ -240,6 +240,8 @@ M: cb new-assoc
GENERIC: (cb-node>alist) ( node -- ) GENERIC: (cb-node>alist) ( node -- )
M: object (cb-node>alist) drop ;
M: node (cb-node>alist) M: node (cb-node>alist)
entry, ; entry, ;