anchor.diff:  end;
   
   const
  -  STYLE_CODES : array [TCommonMarkStyle] of String = ('?', '.', '&', 'C', 'D', 'X', 'u', 't');
  +  STYLE_CODES : array [TCommonMarkStyle] of String = ('?', '.', '&', 'C', 'D', 'X', 'u', 't', '~');
   
   procedure TCommonMarkEngine.checkLines;
   var
  
positive.code:     '>', '"' : nodes.addText(lexer.location, htmlEscape(lexer.grab(cmText)));
      '&' : parseEntity(lexer, nodes, wsMode);
      '`' : parseBackTick(lexer, nodes, wsMode);
      '*' : parseDelimiter(lexer, nodes, wsMode, true);
      '_' : if isWhitespaceChar(lexer.peekLast) or isEscapable(lexer.peekLast) or (lexer.peekLast = #0) or
               isWhitespaceChar(lexer.peekEndRun) or isEscapable(lexer.peekEndRun) or (lexer.peekEndRun = #0) then
  
negative.code:   TEST_STYLING = false; // set this true to check style tracking while doing unit tests (10% speed hit)
  
  type
    TCommonMarkStyle = (cmUnknown, cmText, cmEntity, cmControlChar, cmDelimiter, cmCode, cmURL, cmTableMarker, cmDel);
  
    {$IFDEF FPC}
  
  