T128BitDigest

type T128BitDigest = packed record

  case Integer of

    0: (

        Int64s: array [0..1] of Int64;

      );

    1: (

        Word32s: array [0..3] of Word32;

      );

    2: (

        Word16s: array [0..7] of Word16;

      );

    3: (

        Bytes: array [0..15] of Byte;

      );

end;