anchor.diff:          let isEnd = ref false
           let attachEdges () =
               let inline snd3 (_,x,_) = x
  -            for vertex in usedStates (*|> Set.ofSeq*) do
  +            for vertex in usedStates do
                   let mutable i = 0
                   let edges = edges.[vertex]
                   let mutable count = -1
  
positive.code:                 errorList <- errInfo :: errorList
                  wasError <- ref true
              else
                  
                  //makeReductions ()
                  //attachEdges()
                  let vertices = usedStates.ToArray() |> Array.map (fun i -> stateToVertex.[i])                    
                  drawDot parserSource.TokenToNumber tokens parserSource.LeftSide vertices parserSource.NumToString parserSource.ErrorIndex
                              <| sprintf "dot/stack_%d_0.dot" !curLvl
                  if !isEOF //&& !NeadSh
                  then
                      try 
                          
  
negative.code:         /// Stores states, used on current level. Instead statesCount must be number of non-terminals, but doesn't matter
          let usedStates = new Stack<_>(statesCount)
          let stateToVertex : Vertex[] = Array.zeroCreate statesCount
  
          let addVertex vertData =
              [|
  