anchor.diff:  //                    /// minus the low ASCII characters and complete Unicode categories.
   //                    let specificUnicodeChars =
   //                        compiledRules
  -//                        |> transitionChars
  -//                        |> specificUnicodeChars
  +//                        |> UnicodeLexer.transitionChars
  +//                        |> UnicodeLexer.specificUnicodeChars
                       UnicodeLexer.transitionVectorElements
                   else
                       AsciiLexer.transitionVectorElements
  
positive.code:                 CharSet.union transitionChars edgeSet))
  
      //
      let private specificUnicodeChars (transitionChars : CharSet) : CharSet =
          // Remove the low ASCII chars (0-127) first.
          let transitionChars =
              transitionChars
  
negative.code: 
          writeUInt16LiteralElement indentingWriter eofTransitionTarget
  
      //
      let transitionChars (compiledRules : Map<RuleIdentifier, CompiledRule>) =
          (CharSet.empty, compiledRules)
          ||> Map.fold (fun transitionChars _ compiledRule ->
              (transitionChars, compiledRule.Dfa.Transitions.AdjacencyMap)
  