Mercurial > mxe-octave
view src/libgomp-test.c @ 988:e55bb62b2970
improved test programs of packages libgomp and pthreads
author | Volker Grabsch <vog@notjusthosting.com> |
---|---|
date | Wed, 19 May 2010 23:50:39 +0200 |
parents | 35a9e556c82c |
children | f653602a0500 |
line wrap: on
line source
/* This file is part of mingw-cross-env. */ /* See doc/index.html for further information. */ #include <omp.h> #include <stdio.h> int main(int argc, char *argv[]) { (void)argc; (void)argv; omp_set_num_threads(4); #pragma omp parallel fprintf(stderr, "Hello from thread %d, nthreads %d\n", omp_get_thread_num(), omp_get_num_threads()); return 0; }