anchor.diff:      FGrindahl512: IHash;
   
     const
  -    FExpectedHashOfEmptyData =
  +    FExpectedHashOfEmptyData
  +      : String =
         'EE0BA85F90B6D232430BA43DD0EDD008462591816962A355602ED214FAAE54A9A4607D6F577CE950421FF58AEA53F51A7A9F5CCA894C3776104D43568FEA1207';
  -    FExpectedHashOfDefaultData =
  +    FExpectedHashOfDefaultData
  +      : String =
         '540F3C6A5070DA391BBA7121DB8F8745752D3515164498FC82CB5B4D837632CF3F256D85C4A0B7F34A86936FAB07BDA2DF2BFDD59AFDBD901E1347C2001DB1AD';
  -    FExpectedHashOfDefaultDataWithHMACWithLongKey =
  +    FExpectedHashOfDefaultDataWithHMACWithLongKey
  +      : String =
         '59A3F868AE1844BA9B683760D62C73E6E254BE6F46DF923F45118F32E9E1AB80A9056AA8A4792F0D6B8C709919C0ACC64EF64FC013C919758841AE6026F47E61';
  -    FExpectedHashOfDefaultDataWithHMACWithShortKey =
  +    FExpectedHashOfDefaultDataWithHMACWithShortKey
  +      : String =
         '7F067A454A4F6300982CAE37900171C627992A75A5567E0D3A51BC6672F79C5AC0CEF5978E933B713F38494DDF26114994C47689AC93EEC9B8EF7892C3B24087';
  -    FExpectedHashOfOnetoNine =
  +    FExpectedHashOfOnetoNine
  +      : String =
         '6845F20B8A9DB083F307844506D342ED0FEE0D16BAF64B22E6C07552CB8C907E936FEDCD885B72C1B05813F722B5706C112AD59D3421CFD88CAA1CFB40EF1BEF';
  -    FExpectedHashOfabcde =
  +    FExpectedHashOfabcde
  +      : String =
         'F282C47F31831EAB58B8EE9D1EEE3B9B5A6A86354EEFE84CA3176BED5AB447E6D5AC82316F2D6FAAD350848E2D418336A57772D96311DA8BC51C93087204C6A5';
   
     protected
  
positive.code:     FHaval_4_160: IHash;
  
    const
      FExpectedHashOfEmptyData = '1D33AAE1BE4146DBAACA0B6E70D7A11F10801525';
      FExpectedHashOfDefaultData = '9E86A9E2D964CCF9019593C88F40AA5C725E0912';
      FExpectedHashOfDefaultDataWithHMACWithLongKey =
        'E7969DB764172896F2467CF74F62BBE231E2772D';
      FExpectedHashOfDefaultDataWithHMACWithShortKey =
        '6FEAC0105DA74AEDC8FA76A1CF0848C8CA94BA28';
      FExpectedHashOfOnetoNine = 'B03439BE6F2A3EBED93AC86846D029D76F62FD99';
      FExpectedHashOfabcde = 'F74B326FE2CE8F5BA151B85B16E67B28FE71F131';
  
    protected
      procedure SetUp; override;
  
negative.code:     FHaval_4_256: IHash;
  
    const
      FExpectedHashOfEmptyData
        : String =
        'C92B2E23091E80E375DADCE26982482D197B1A2521BE82DA819F8CA2C579B99B';
      FExpectedHashOfDefaultData
        : String =
        'B5E97F406CBD4C36CC549072713E733EE31A5F9F23DD6C5982D3A239A9B38434';
      FExpectedHashOfDefaultDataWithHMACWithLongKey
        : String =
        'ED5D88C730ED3EB103DDE96AD42DA60825A9B8B0D8BD2ED580EBF92B851B12E7';
      FExpectedHashOfDefaultDataWithHMACWithShortKey
        : String =
        'FD0122B375A581D3F06DB6EB992F9A3F46657091E427BB8BD247D835CC086437';
      FExpectedHashOfOnetoNine
        : String =
        'DDC95DF473DD169456484BEB4B04EDCA83A5572D9D7ECCD00092365AE4EF8D79';
      FExpectedHashOfabcde
        : String =
        '8F9B46785E52C6C48A0178EDC66D3C23C220D15E52C3C8A13E1CD45D21369193';
  
    protected
  