1*38fd1498Szrj! Copyright (C) 2005-2018 Free Software Foundation, Inc. 2*38fd1498Szrj! Contributed by Jakub Jelinek <jakub@redhat.com>. 3*38fd1498Szrj 4*38fd1498Szrj! This file is part of the GNU Offloading and Multi Processing Library 5*38fd1498Szrj! (libgomp). 6*38fd1498Szrj 7*38fd1498Szrj! Libgomp is free software; you can redistribute it and/or modify it 8*38fd1498Szrj! under the terms of the GNU General Public License as published by 9*38fd1498Szrj! the Free Software Foundation; either version 3, or (at your option) 10*38fd1498Szrj! any later version. 11*38fd1498Szrj 12*38fd1498Szrj! Libgomp is distributed in the hope that it will be useful, but WITHOUT ANY 13*38fd1498Szrj! WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS 14*38fd1498Szrj! FOR A PARTICULAR PURPOSE. See the GNU General Public License for 15*38fd1498Szrj! more details. 16*38fd1498Szrj 17*38fd1498Szrj! Under Section 7 of GPL version 3, you are granted additional 18*38fd1498Szrj! permissions described in the GCC Runtime Library Exception, version 19*38fd1498Szrj! 3.1, as published by the Free Software Foundation. 20*38fd1498Szrj 21*38fd1498Szrj! You should have received a copy of the GNU General Public License and 22*38fd1498Szrj! a copy of the GCC Runtime Library Exception along with this program; 23*38fd1498Szrj! see the files COPYING3 and COPYING.RUNTIME respectively. If not, see 24*38fd1498Szrj! <http://www.gnu.org/licenses/>. 25*38fd1498Szrj 26*38fd1498Szrj integer omp_lock_kind, omp_nest_lock_kind, openmp_version 27*38fd1498Szrj parameter (omp_lock_kind = @OMP_LOCK_KIND@) 28*38fd1498Szrj parameter (omp_nest_lock_kind = @OMP_NEST_LOCK_KIND@) 29*38fd1498Szrj integer omp_sched_kind 30*38fd1498Szrj parameter (omp_sched_kind = 4) 31*38fd1498Szrj integer (omp_sched_kind) omp_sched_static, omp_sched_dynamic 32*38fd1498Szrj integer (omp_sched_kind) omp_sched_guided, omp_sched_auto 33*38fd1498Szrj parameter (omp_sched_static = 1) 34*38fd1498Szrj parameter (omp_sched_dynamic = 2) 35*38fd1498Szrj parameter (omp_sched_guided = 3) 36*38fd1498Szrj parameter (omp_sched_auto = 4) 37*38fd1498Szrj integer omp_proc_bind_kind 38*38fd1498Szrj parameter (omp_proc_bind_kind = 4) 39*38fd1498Szrj integer (omp_proc_bind_kind) omp_proc_bind_false 40*38fd1498Szrj integer (omp_proc_bind_kind) omp_proc_bind_true 41*38fd1498Szrj integer (omp_proc_bind_kind) omp_proc_bind_master 42*38fd1498Szrj integer (omp_proc_bind_kind) omp_proc_bind_close 43*38fd1498Szrj integer (omp_proc_bind_kind) omp_proc_bind_spread 44*38fd1498Szrj parameter (omp_proc_bind_false = 0) 45*38fd1498Szrj parameter (omp_proc_bind_true = 1) 46*38fd1498Szrj parameter (omp_proc_bind_master = 2) 47*38fd1498Szrj parameter (omp_proc_bind_close = 3) 48*38fd1498Szrj parameter (omp_proc_bind_spread = 4) 49*38fd1498Szrj integer omp_lock_hint_kind 50*38fd1498Szrj parameter (omp_lock_hint_kind = 4) 51*38fd1498Szrj integer (omp_lock_hint_kind) omp_lock_hint_none 52*38fd1498Szrj integer (omp_lock_hint_kind) omp_lock_hint_uncontended 53*38fd1498Szrj integer (omp_lock_hint_kind) omp_lock_hint_contended 54*38fd1498Szrj integer (omp_lock_hint_kind) omp_lock_hint_nonspeculative 55*38fd1498Szrj integer (omp_lock_hint_kind) omp_lock_hint_speculative 56*38fd1498Szrj parameter (omp_lock_hint_none = 0) 57*38fd1498Szrj parameter (omp_lock_hint_uncontended = 1) 58*38fd1498Szrj parameter (omp_lock_hint_contended = 2) 59*38fd1498Szrj parameter (omp_lock_hint_nonspeculative = 4) 60*38fd1498Szrj parameter (omp_lock_hint_speculative = 8) 61*38fd1498Szrj parameter (openmp_version = 201511) 62*38fd1498Szrj 63*38fd1498Szrj external omp_init_lock, omp_init_nest_lock 64*38fd1498Szrj external omp_init_lock_with_hint 65*38fd1498Szrj external omp_init_nest_lock_with_hint 66*38fd1498Szrj external omp_destroy_lock, omp_destroy_nest_lock 67*38fd1498Szrj external omp_set_lock, omp_set_nest_lock 68*38fd1498Szrj external omp_unset_lock, omp_unset_nest_lock 69*38fd1498Szrj external omp_set_dynamic, omp_set_nested 70*38fd1498Szrj external omp_set_num_threads 71*38fd1498Szrj 72*38fd1498Szrj external omp_get_dynamic, omp_get_nested 73*38fd1498Szrj logical(4) omp_get_dynamic, omp_get_nested 74*38fd1498Szrj external omp_test_lock, omp_in_parallel 75*38fd1498Szrj logical(4) omp_test_lock, omp_in_parallel 76*38fd1498Szrj 77*38fd1498Szrj external omp_get_max_threads, omp_get_num_procs 78*38fd1498Szrj integer(4) omp_get_max_threads, omp_get_num_procs 79*38fd1498Szrj external omp_get_num_threads, omp_get_thread_num 80*38fd1498Szrj integer(4) omp_get_num_threads, omp_get_thread_num 81*38fd1498Szrj external omp_test_nest_lock 82*38fd1498Szrj integer(4) omp_test_nest_lock 83*38fd1498Szrj 84*38fd1498Szrj external omp_get_wtick, omp_get_wtime 85*38fd1498Szrj double precision omp_get_wtick, omp_get_wtime 86*38fd1498Szrj 87*38fd1498Szrj external omp_set_schedule, omp_get_schedule 88*38fd1498Szrj external omp_get_thread_limit, omp_set_max_active_levels 89*38fd1498Szrj external omp_get_max_active_levels, omp_get_level 90*38fd1498Szrj external omp_get_ancestor_thread_num, omp_get_team_size 91*38fd1498Szrj external omp_get_active_level 92*38fd1498Szrj integer(4) omp_get_thread_limit, omp_get_max_active_levels 93*38fd1498Szrj integer(4) omp_get_level, omp_get_ancestor_thread_num 94*38fd1498Szrj integer(4) omp_get_team_size, omp_get_active_level 95*38fd1498Szrj 96*38fd1498Szrj external omp_in_final 97*38fd1498Szrj logical(4) omp_in_final 98*38fd1498Szrj 99*38fd1498Szrj external omp_get_cancelllation 100*38fd1498Szrj logical(4) omp_get_cancelllation 101*38fd1498Szrj 102*38fd1498Szrj external omp_get_proc_bind 103*38fd1498Szrj integer(omp_proc_bind_kind) omp_get_proc_bind 104*38fd1498Szrj 105*38fd1498Szrj integer(4) omp_get_num_places 106*38fd1498Szrj external omp_get_num_places 107*38fd1498Szrj integer(4) omp_get_place_num_procs 108*38fd1498Szrj external omp_get_place_num_procs 109*38fd1498Szrj external omp_get_place_proc_ids 110*38fd1498Szrj integer(4) omp_get_place_num 111*38fd1498Szrj external omp_get_place_num 112*38fd1498Szrj integer(4) omp_get_partition_num_places 113*38fd1498Szrj external omp_get_partition_num_places 114*38fd1498Szrj external omp_get_partition_place_nums 115*38fd1498Szrj 116*38fd1498Szrj external omp_set_default_device, omp_get_default_device 117*38fd1498Szrj external omp_get_num_devices, omp_get_num_teams 118*38fd1498Szrj external omp_get_team_num 119*38fd1498Szrj integer(4) omp_get_default_device, omp_get_num_devices 120*38fd1498Szrj integer(4) omp_get_num_teams, omp_get_team_num 121*38fd1498Szrj 122*38fd1498Szrj external omp_is_initial_device 123*38fd1498Szrj logical(4) omp_is_initial_device 124*38fd1498Szrj external omp_get_initial_device 125*38fd1498Szrj integer(4) omp_get_initial_device 126*38fd1498Szrj 127*38fd1498Szrj external omp_get_max_task_priority 128*38fd1498Szrj integer(4) omp_get_max_task_priority 129