From eb46e23eabe2ee65f4560c0bfbf49aadfa3b1916 Mon Sep 17 00:00:00 2001 From: Jon Harper Date: Sun, 27 Nov 2016 14:37:11 +0100 Subject: [PATCH] trees.avl: fix typo in test --- extra/trees/avl/avl-tests.factor | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/extra/trees/avl/avl-tests.factor b/extra/trees/avl/avl-tests.factor index 568b6feac2..5491da3ae5 100644 --- a/extra/trees/avl/avl-tests.factor +++ b/extra/trees/avl/avl-tests.factor @@ -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>>