anchor.diff:      FSHA3_384: IHash;
   
     const
  -    FExpectedHashOfEmptyData =
  +    FExpectedHashOfEmptyData
  +      : String =
         '0C63A75B845E4F7D01107D852E4C2485C51A50AAAA94FC61995E71BBEE983A2AC3713831264ADB47FB6BD1E058D5F004';
  -    FExpectedHashOfDefaultData =
  +    FExpectedHashOfDefaultData
  +      : String =
         '87DD2935CD0DDEFFB8694E70ED1D33EABCEA848BD93A7A7B7227603B7C080A70BCF29FCEED66F456A7FB593EB23F950C';
  -    FExpectedHashOfDefaultDataWithHMACWithLongKey =
  +    FExpectedHashOfDefaultDataWithHMACWithLongKey
  +      : String =
         '802D520828C580A61EE4BFA138BE23708C22DB97F94913AF5897E3C9C12BA6C4EC33BFEB79691D2F302315B27674EA40';
  -    FExpectedHashOfDefaultDataWithHMACWithShortKey =
  +    FExpectedHashOfDefaultDataWithHMACWithShortKey
  +      : String =
         '52A4A926B60AA9F6B7DB1C8F5344A097540A8E2115164BF75734907E88C2BC1F7DD84D0EE8569B9857590A39EB5FF499';
  -    FExpectedHashOfOnetoNine =
  +    FExpectedHashOfOnetoNine
  +      : String =
         '8B90EDE4D095409F1A12492C2520599683A9478DC70B7566D23B3E41ECE8538C6CDE92382A5E38786490375C54672ABF';
  -    FExpectedHashOfabcde =
  +    FExpectedHashOfabcde
  +      : String =
         '348494236B82EDDA7602C78BA67FC3838E427C63C23E2C9D9AA5EA6354218A3C2CA564679ACABF3AC6BF5378047691C4';
   
     protected
  
positive.code:     FSHA2_256: IHash;
  
    const
      FExpectedHashOfEmptyData =
        'E3B0C44298FC1C149AFBF4C8996FB92427AE41E4649B934CA495991B7852B855';
      FExpectedHashOfDefaultData =
        'BCF45544CB98DDAB731927F8760F81821489ED04C0792A4D254134887BEA9E38';
      FExpectedHashOfDefaultDataWithHMACWithLongKey =
        'BC05A7D3B13A4A67445C62389564D35B18F33A0C6408EC8DA0CB2506AE6E2D14';
      FExpectedHashOfDefaultDataWithHMACWithShortKey =
        '92678A1C746AAEAA1D3F0C9DAC4BCA73801D278B51C1F6861D49C9A2C1175687';
      FExpectedHashOfOnetoNine =
        '15E2B0D3C33891EBB0F1EF609EC419420C20E320CE94C65FBC8C3312448EB225';
      FExpectedHashOfabcde =
        '36BBE50ED96841D10443BCB670D6554F0A34B761BE67EC9C4A8AD2C0C44CA42C';
  
    protected
  
negative.code:     FActualString, FExpectedString: String;
  
    const
      FEmptyData: String = '';
      FDefaultData: String = 'HashLib4Pascal';
      FShortMessage: String = 'A short message';
      FZerotoFour: String = '01234';
  