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

Temporary patch for dlists equality testing 

Until https://github.com/slavapestov/factor/issues/1027 is resolved
db4
Jon Harper 2014-04-04 23:17:08 +02:00 committed by John Benediktsson
parent 3623778d26
commit 99c853e3c8
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
basis/dlists/dlists.factor
View File

@ -35,6 +35,7 @@ TUPLE: dlist
M: dlist deque-empty? front>> not ; inline M: dlist deque-empty? front>> not ; inline
M: dlist-node equal? over dlist-node? [ [ obj>> ] same? ] [ 2drop f ] if ;
M: dlist equal? M: dlist equal?
over dlist? [ over dlist? [
[ front>> ] bi@ [ front>> ] bi@