libgomp/omp_lib.h.in

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