Mercurial > mxe-octave
view src/pthreads-test.c @ 6299:b8d72e61d379 release
default-octave: Rename configure variable (bug #62715).
* src/default-octave.mk: The configure variable "ax_blas_integer_size" was
renamed to "ax_cv_blas_integer_size" in Octave's build system. Adapt rule for
that change.
author | Markus Mützel <markus.muetzel@gmx.de> |
---|---|
date | Thu, 07 Jul 2022 20:52:36 +0200 |
parents | 99516e73b368 |
children |
line wrap: on
line source
/* * This file is part of MXE. * See index.html for further information. */ #include <stdio.h> #include <pthread.h> #define N 4 void *thread_fn(void *p) { const int *arg = p; fprintf(stderr, "Hello from thread %d, nthreads %d\n", *arg, N); return NULL; } int main(int argc, char *argv[]) { pthread_t threads[N]; int args[N]; int i; (void)argc; (void)argv; for (i = 0; i < N; i++) { args[i] = i; if (pthread_create(threads + i, NULL, thread_fn, args + i) != 0) { return 1; } } for (i = 0; i < N; i++) { if (pthread_join(threads[i], NULL) != 0) { return 2; } } return 0; }