anchor.diff:    soob : Byte;
     raw: TRawBytes;
     load_protocol_version : Word;
  +  LLoadPreviousUpdatedBlocks : Boolean;
   begin
     Lock;
     Try
  
positive.code:     if not Result then begin
        exit;
      end;
      If load_protocol_version>=CT_PROTOCOL_3 then begin
        Result := FPreviousUpdatedBlocks.LoadFromStream(Stream);
        If Not Result then begin
          errors := 'Invalid PreviousUpdatedBlock stream';
  
negative.code:     // - Value 4 means that is loading from storage using protocol v2 (so, includes always operations)
      // - Value 5 means that is loading from storage using TAccountPreviousBlockInfo
      load_protocol_version := CT_PROTOCOL_1;
      LLoadPreviousUpdatedBlocks := False;
      if (soob in [0,2]) then FIsOnlyOperationBlock:=false
      else if (soob in [1,3]) then FIsOnlyOperationBlock:=true
      else if (soob in [4]) then begin
  