anchor.diff:  
   procedure TsdCharData.WriteStream(S: TStream);
   begin
  -  // write the chardata: the platform value is the 
  +  // write the chardata: the platform value is the
     sdWriteToStream(S, GetPlatformValue);
   //  sdWriteToStream(S, GetCoreValue);
   end;
  
positive.code:   Result := GetString(FValueID);
  end;
  
  function TsdCharData.GetPlatformValue: Utf8String; 
  begin
    Result := sdUnNormaliseEol(GetCoreValue, GetEolStyle);
  end;
  
negative.code:     exit;
    end;
    NodeInsert(FDirectNodeCount, AAttribute);
  
    if FValueIndex >= FDirectNodeCount then
      Inc(FValueIndex);
  
    inc(FDirectNodeCount);
  end;
  
  