Tumac64_ctx

type Tumac64_ctx = record

  l1_key: array [0..((1024div4)+(4*(2-1)))-1] of Tuint32_t;

  l2_key: array [0..(6*2)-1] of Tuint32_t;

  l3_key1: array [0..(8*2)-1] of Tuint64_t;

  l3_key2: array [0..1] of Tuint32_t;

  pdf_key: Taes128_ctx;

  l2_state: array [0..(3*2)-1] of Tuint64_t;

  nonce: array [0..15] of Tuint8_t;

  nonce_length: Tcushort;

  nonce_low: Tcushort;

  pad_cache: array [0..(16div4)-1] of Tuint32_t;

  index: Tcunsigned;

  count: Tuint64_t;

  block: array [0..1023] of Tuint8_t;

end;