Revert "Temporary patch for dlists equality testing"
This reverts commit dbc6c37a37423a1672825b667bf5ca4844d5fc88.db4
parent
2bb483bc5c
commit
1d38dce342
|
@ -35,7 +35,6 @@ 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@
|
||||||
|
|
Loading…
Reference in New Issue