anchor.diff:  
   class function TUtils.readXMLUntil(out_: TStringBuilder; s: String; start: integer; cend: TSysCharSet): integer;
   var
  -  position, n: integer;
  +  position : integer;
     ch, stringChar: char;
     inString: boolean;
   begin
  
positive.code: 
  { TConfiguration }
  
  constructor TConfiguration.CreateDefault;
  begin
    inherited Create;
    FallowSpacesInFencedDelimiters := true;
    Fdecorator := TDecorator.Create;
  end;
  
  constructor TConfiguration.CreateSafe;
  begin
    inherited Create;
    FallowSpacesInFencedDelimiters := true;
    Fdecorator := TDecorator.Create;
    FsafeMode := true;
  end;
  
  destructor TConfiguration.Destroy;
  
negative.code: constructor TMarkdownDaringFireball.Create;
  begin
    inherited Create;
    FConfig := TConfiguration.Create(true);
    Femitter := TEmitter.Create(config);
  end;
  
  