Source position: gnutls.pp line 1138
type Tgnutls_tdb_store_commitment_func = function(
db_name: Pchar;
host: Pchar;
service: Pchar;
expiration: Ttime_t;
hash_algo: Tgnutls_digest_algorithm_t;
hash: Pgnutls_datum_t
):LongInt;