1*629ff9f7SJohn Marino /* Copyright (C) 2005, 2009 Free Software Foundation, Inc. 2*629ff9f7SJohn Marino Contributed by Richard Henderson <rth@redhat.com>. 3*629ff9f7SJohn Marino 4*629ff9f7SJohn Marino This file is part of the GNU OpenMP Library (libgomp). 5*629ff9f7SJohn Marino 6*629ff9f7SJohn Marino Libgomp is free software; you can redistribute it and/or modify it 7*629ff9f7SJohn Marino under the terms of the GNU General Public License as published by 8*629ff9f7SJohn Marino the Free Software Foundation; either version 3, or (at your option) 9*629ff9f7SJohn Marino any later version. 10*629ff9f7SJohn Marino 11*629ff9f7SJohn Marino Libgomp is distributed in the hope that it will be useful, but WITHOUT ANY 12*629ff9f7SJohn Marino WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS 13*629ff9f7SJohn Marino FOR A PARTICULAR PURPOSE. See the GNU General Public License for 14*629ff9f7SJohn Marino more details. 15*629ff9f7SJohn Marino 16*629ff9f7SJohn Marino Under Section 7 of GPL version 3, you are granted additional 17*629ff9f7SJohn Marino permissions described in the GCC Runtime Library Exception, version 18*629ff9f7SJohn Marino 3.1, as published by the Free Software Foundation. 19*629ff9f7SJohn Marino 20*629ff9f7SJohn Marino You should have received a copy of the GNU General Public License and 21*629ff9f7SJohn Marino a copy of the GCC Runtime Library Exception along with this program; 22*629ff9f7SJohn Marino see the files COPYING3 and COPYING.RUNTIME respectively. If not, see 23*629ff9f7SJohn Marino <http://www.gnu.org/licenses/>. */ 24*629ff9f7SJohn Marino 25*629ff9f7SJohn Marino /* This file handles the BARRIER construct. */ 26*629ff9f7SJohn Marino 27*629ff9f7SJohn Marino #include "libgomp.h" 28*629ff9f7SJohn Marino 29*629ff9f7SJohn Marino 30*629ff9f7SJohn Marino void GOMP_barrier(void)31*629ff9f7SJohn MarinoGOMP_barrier (void) 32*629ff9f7SJohn Marino { 33*629ff9f7SJohn Marino struct gomp_thread *thr = gomp_thread (); 34*629ff9f7SJohn Marino struct gomp_team *team = thr->ts.team; 35*629ff9f7SJohn Marino 36*629ff9f7SJohn Marino /* It is legal to have orphaned barriers. */ 37*629ff9f7SJohn Marino if (team == NULL) 38*629ff9f7SJohn Marino return; 39*629ff9f7SJohn Marino 40*629ff9f7SJohn Marino gomp_team_barrier_wait (&team->barrier); 41*629ff9f7SJohn Marino } 42