Source position: libnettle.pp line 920
type Tsha1_ctx = record
state: array [0..4] of Tuint32_t;
count: Tuint64_t;
index: TCuint;
block: array [0..63] of Tuint8_t;
end;