Mercurial > mxe-octave
view src/libgcrypt-test.c @ 4957:6a321b868d57
of-control: Updates for default Octave (bug #55670).
* of-control-1-deprecated.patch: Cherry pick more upstream patches.
author | Markus Mützel <markus.muetzel@gmx.de> |
---|---|
date | Mon, 11 Feb 2019 23:40:23 +0100 |
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; }