Mercurial > hg > CbC > CbC_gcc

comparison libgomp/testsuite/libgomp.c/appendix-a/a.33.3.c @ 0:a06113de4d67

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
first commit
author kent <kent@cr.ie.u-ryukyu.ac.jp>
date Fri, 17 Jul 2009 14:47:48 +0900
parents
children
comparison
equal deleted inserted replaced
-1:000000000000 0:a06113de4d67
1 /* { dg-do compile } */
2
3 #include <stdio.h>
4 #include <stdlib.h>
5 #include <omp.h>
6 omp_lock_t *
7 new_lock ()
8 {
9 omp_lock_t *lock_ptr;
10 #pragma omp single copyprivate(lock_ptr)
11 {
12 lock_ptr = (omp_lock_t *) malloc (sizeof (omp_lock_t));
13 omp_init_lock (lock_ptr);
14 }
15 return lock_ptr;
16 }