#pragma omp sections
{
  #pragma omp section
  stmt1;
  #pragma omp section
  stmt2;
  #pragma omp section
  stmt3;
}

for (i = GOMP_sections_start (3); i != 0; i = GOMP_sections_next ())
  switch (i)
    {
    case 1:
      stmt1;
      break;
    case 2:
      stmt2;
      break;
    case 3:
      stmt3;
      break;
    }
GOMP_barrier ();

unsigned
GOMP_sections_start (unsigned count)
{
  // 參數(shù) count 的含義就是表示一共有多少個(gè) section 代碼塊
  // 得到當(dāng)線程的相關(guān)數(shù)據(jù)
  struct gomp_thread *thr = gomp_thread ();
  long s, e, ret;
  // 進(jìn)行數(shù)據(jù)的初始化操作
  // 將數(shù)據(jù)的 chunk size 設(shè)置等于 1
  // 分割 chunk size 的起始位置設(shè)置成 1 因?yàn)楦鶕?jù)上面的代碼分析 0 表示退出循環(huán) 因此不能夠使用 0 作為分割的起始位置
  if (gomp_work_share_start (false))
    {
    // 這里傳入 count 作為參數(shù)的原因是需要設(shè)置 chunk 分配的最終位置 具體的源代碼在下方
      gomp_sections_init (thr->ts.work_share, count);
      gomp_work_share_init_done ();
    }
  // 如果獲取到一個(gè) section 的執(zhí)行權(quán) gomp_iter_dynamic_next 返回 true 否則返回 false 
  // s 和 e 分別表示 chunk 的起始位置和終止位置 但是在 sections 當(dāng)中需要注意的是所有的 chunk size 都等于 1
  // 這也很容易理解一次執(zhí)行一個(gè) section 代碼塊
  if (gomp_iter_dynamic_next (&s, &e))
    ret = s;
  else
    ret = 0;
  return ret;
}
// 下面是部分 gomp_sections_init 的代碼
static inline void
gomp_sections_init (struct gomp_work_share *ws, unsigned count)
{
  ws->sched = GFS_DYNAMIC;
  ws->chunk_size = 1; // 設(shè)置 chunk size 等于 1
  ws->end = count + 1L; // 因?yàn)橐还灿?count 個(gè) section 塊
  ws->incr = 1; // 每次增長一個(gè)
  ws->next = 1; // 從 1 開始進(jìn)行 chunk size 的分配 因?yàn)?0 表示退出循環(huán)（編譯器角度分析）
}
unsigned
GOMP_sections_next (void)
{
  // 這個(gè)函數(shù)就比較容易理解了 就是獲取一個(gè) chunk 拿到對應(yīng)的 section 的執(zhí)行權(quán)
  long s, e, ret;
  if (gomp_iter_dynamic_next (&s, &e))
    ret = s;
  else
    ret = 0;
  return ret;
}
// 下面的函數(shù)在之前的很多文章當(dāng)中都分析過了 這里不再進(jìn)行分析
// 下面的函數(shù)的主要過程就是使用 CAS 指令不斷的進(jìn)行嘗試，直到獲取成功或者全部獲取完成 沒有 chunk 需要分配
bool
gomp_iter_dynamic_next (long *pstart, long *pend)
{
  struct gomp_thread *thr = gomp_thread ();
  struct gomp_work_share *ws = thr->ts.work_share;
  long start, end, nend, chunk, incr;
  end = ws->end;
  incr = ws->incr;
  chunk = ws->chunk_size;
  if (__builtin_expect (ws->mode, 1))
    {
      long tmp = __sync_fetch_and_add (&ws->next, chunk);
      if (incr > 0)
  {
    if (tmp >= end)
      return false;
    nend = tmp + chunk;
    if (nend > end)
      nend = end;
    *pstart = tmp;
    *pend = nend;
    return true;
  }
      else
  {
    if (tmp <= end)
      return false;
    nend = tmp + chunk;
    if (nend < end)
      nend = end;
    *pstart = tmp;
    *pend = nend;
    return true;
  }
    }
  start = ws->next;
  while (1)
    {
      long left = end - start;
      long tmp;
      if (start == end)
  return false;
      if (incr < 0)
  {
    if (chunk < left)
      chunk = left;
  }
      else
  {
    if (chunk > left)
      chunk = left;
  }
      nend = start + chunk;
      tmp = __sync_val_compare_and_swap (&ws->next, start, nend);
      if (__builtin_expect (tmp == start, 1))
  break;
      start = tmp;
    }
  *pstart = start;
  *pend = nend;
  return true;
}