Mercurial > mxe-octave
view src/libgcrypt-test.c @ 4734:80461a9e516c
override default xerbla with version from Octave
* mingw-blas-1-xerbla.patch, blas.mk: Build default libxerbla lib.
* mingw-lapack-1-xerbla.patch, lapack.mk: Use external libxerbla.
* mingw-openblas-1-xerbla.patch, openblas.mk: Likewise.
* src/qrupdate-1-fixes.patch: Likewise.
* default-octave.mk: Also install libxerbla.dll as libxerbla-octave.dll.
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Thu, 21 Jun 2018 01:32:10 -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; }