critbit: Make compiler happy NOFIX
parent
3e2f2e7dac
commit
0674a825b0
|
@ -109,7 +109,7 @@ PRIVATE>
|
||||||
[ [ byte#>> ] bi@ - [ 0 < ] [ 0 = ] bi ] 2keep
|
[ [ byte#>> ] bi@ - [ 0 < ] [ 0 = ] bi ] 2keep
|
||||||
[ bits>> ] > and
|
[ bits>> ] > and
|
||||||
or
|
or
|
||||||
] dip
|
] dip drop
|
||||||
;
|
;
|
||||||
|
|
||||||
: insertion-walk ( tree split-node new-direction -- tree )
|
: insertion-walk ( tree split-node new-direction -- tree )
|
||||||
|
|
Loading…
Reference in New Issue