Mercurial > mxe-octave
view src/libgcrypt-test.c @ 4690:702379b04b1c
Added tag octave-release-4.4.0 for changeset ebc418be26ec
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Mon, 30 Apr 2018 21:44:59 -0400 |
parents | 3a37e58eab36 |
children |
line wrap: on
line source
/* * This file is part of MXE. * See index.html for further information. */ #include <stdio.h> #include <gcrypt.h> int main(int argc, char *argv[]) { (void)argc; (void)argv; if (!gcry_check_version (GCRYPT_VERSION)) { fputs ("libgcrypt version mismatch\n", stderr); exit (2); } gcry_control (GCRYCTL_SUSPEND_SECMEM_WARN); gcry_control (GCRYCTL_INIT_SECMEM, 16384, 0); gcry_control (GCRYCTL_RESUME_SECMEM_WARN); gcry_control (GCRYCTL_INITIALIZATION_FINISHED, 0); if (!gcry_control (GCRYCTL_INITIALIZATION_FINISHED_P)) { fputs ("libgcrypt has not been initialized\n", stderr); abort (); } printf("gcrypt version: %s", GCRYPT_VERSION ); return 0; }