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

trees.avl: fix typo in test

char-rename
Jon Harper 2016-11-27 14:37:11 +01:00 committed by John Benediktsson
parent 7465bd0ed6
commit eb46e23eab
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
extra/trees/avl/avl-tests.factor
View File

@ -3,7 +3,7 @@ assocs accessors trees.avl.private trees.private ;
IN: trees.avl.tests
{ "key1" 0 "key2" 0 } [
T{ avl-node f "key1" f f T{ avl-node f "key2" f f 1 } 2 }
T{ avl-node f "key1" f f T{ avl-node f "key2" f f f 1 } 2 }
[ single-rotate ] go-left
[ left>> dup key>> swap balance>> ] keep
dup key>> swap balance>>