anchor.diff:          | Br (_,_,_,_) as t ->
               let action = FSharpFunc<_,_,_>.Adapt action
   
  -            // TODO : Run some experiments to determine if this is a good initial capacity,
  -            // or if there is a more suitable value.
  -            let stack = System.Collections.Generic.Stack (64)
  +            /// The stack of trie nodes pending traversal.
  +            let stack = Stack (defaultTraversalStackSize)
   
               // Add the initial tree to the stack.
               stack.Push t
  
positive.code:         | Br (_,_,_,_) as t ->
              let folder = FSharpFunc<_,_,_,_>.Adapt folder
  
              // TODO : Run some experiments to determine if this is a good initial capacity,
              // or if there is a more suitable value.
              let stack = System.Collections.Generic.Stack (64)
  
              // Add the initial tree to the stack.
              stack.Push t
  
negative.code:         | Br (_,_,_,_) as t ->
              let action = FSharpFunc<_,_,_>.Adapt action
  
              /// The stack of trie nodes pending traversal.
              let stack = Stack (defaultTraversalStackSize)
  
              // Add the initial tree to the stack.
              stack.Push t
  