Randomized node heights and the beginnings of a test to drive out cor…

…ner cases which seem to exist with duplicate markers returned from stabbing queries
gcirne · Jan 26, 2008 · 98df058 · 98df058
1 parent 1169099
commit 98df058
Show file tree

Hide file tree

Showing 6 changed files with 2,406 additions and 2,625 deletions.
diff --git a/lib/treetop/runtime/interval_skip_list/interval_skip_list.rb b/lib/treetop/runtime/interval_skip_list/interval_skip_list.rb
@@ -1,7 +1,10 @@
 class IntervalSkipList
+  attr_reader :probability
+
   def initialize
     @head = HeadNode.new(max_height)
     @ranges = {}
+    @probability = 0.5
   end
 
   def max_height
@@ -144,7 +147,11 @@ def make_path
   end
 
   def next_node_height
-    nil
+    height = 1
+    while rand < probability && height < max_height
+      height += 1
+    end
+    height
   end
 
   def can_ascend_from?(node, level)