1
2//===----------------------------------------------------------------------===//
3//
4// The LLVM Compiler Infrastructure
5//
6// This file is dual licensed under the MIT and the University of Illinois Open
7// Source Licenses. See LICENSE.txt for details.
8//
9//===----------------------------------------------------------------------===//
10
11#include "kmp.h"
12#include "kmp_i18n.h"
13#include "kmp_io.h"
14#include "kmp_str.h"
15#if OMPT_SUPPORT
16#include "ompt-specific.h"
17#endif
18
19#if OMP_40_ENABLED
20
21/*!
22@ingroup CANCELLATION
23@param loc_ref location of the original task directive
24@param gtid Global thread ID of encountering thread
25@param cncl_kind Cancellation kind (parallel, for, sections, taskgroup)
26
27@return returns true if the cancellation request has been activated and the
28execution thread needs to proceed to the end of the canceled region.

--- 38 unchanged lines hidden (view full) ---

67 else if (cncl_kind == cancel_loop)
68 type = ompt_cancel_loop;
69 else if (cncl_kind == cancel_sections)
70 type = ompt_cancel_sections;
71 ompt_callbacks.ompt_callback(ompt_callback_cancel)(
72 task_data, type | ompt_cancel_activated,
73 OMPT_GET_RETURN_ADDRESS(0));
74 }
75#endif
76 return 1 /* true */;
77 }
78 break;
79 }
80 case cancel_taskgroup:
81 // cancellation requests for a task group
82 // are handled through the taskgroup structure
83 {

--- 243 unchanged lines hidden (view full) ---

327 taskgroup = task->td_taskgroup;
328 return taskgroup && taskgroup->cancel_request;
329 }
330 }
331 }
332
333 return 0 /* false */;
334}
335
336#endif