Source position: gnutls.pp line 2037
var gnutls_x509_crt_set_key_purpose_oid: function(
cert: Tgnutls_x509_crt_t;
oid: pointer;
critical: dword
):LongInt;