view src/libgcrypt-test.c @ 4245:e622765c49c7 octave-release-4.2.0

Update stable-octave package for 4.2.0 release. * src/stable-octave.mk: Update for 4.2.0 release. * src/stable-octave-1-gnulib.patch: New file. * src/stable-octave-1-docinstall.patch: Delete. * src/stable-octave-1-fixes.patch: Delete. * src/of-io-1-fixes.patch: New file.
author John W. Eaton <jwe@octave.org>
date Sun, 13 Nov 2016 12:47:40 -0500
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;
}