Mercurial > mxe-octave
view src/libgcrypt-test.c @ 6083:49f199fba615
isl: Switch to official mirror.
* src/gcc-isl.mk, src/isl.mk: Use new "official" mirror.
See: https://groups.google.com/g/isl-development/c/JGaMo2VUu_8/m/wVTUVZrrAQAJ
author | Markus Mützel <markus.muetzel@gmx.de> |
---|---|
date | Sat, 12 Feb 2022 12:03:29 +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; }