runtime/src/kmp_gsupport.cpp

515   int func(long lb, long ub, long str, long chunk_sz, long *p_lb,              \
524              func) ": T#%d, lb 0x%lx, ub 0x%lx, str 0x%lx, chunk_sz 0x%lx\n",  \
525          gtid, lb, ub, str, chunk_sz));                                        \
527     if ((str > 0) ? (lb < ub) : (lb > ub)) {                                   \
529       KMP_DISPATCH_INIT(&loc, gtid, (schedule), lb,                            \
552   int func(long lb, long ub, long str, long *p_lb, long *p_ub) {               \
560         (KMP_STR(func) ": T#%d, lb 0x%lx, ub 0x%lx, str 0x%lx, chunk_sz %d\n", \
561          gtid, lb, ub, str, chunk_sz));                                        \
563     if ((str > 0) ? (lb < ub) : (lb > ub)) {                                   \
565       KMP_DISPATCH_INIT(&loc, gtid, (schedule), lb,                            \
655     long stride, lb, ub, str;                                                  \
666     lb = 0;                                                                    \
669     KA_TRACE(20, (KMP_STR(func) ": T#%d, ncounts %u, lb 0x%lx, ub 0x%lx, str " \
672                   gtid, ncounts, lb, ub, str, chunk_sz));                      \
674     if ((str > 0) ? (lb < ub) : (lb > ub)) {                                   \
675       KMP_DISPATCH_INIT(&loc, gtid, (schedule), lb,                            \
701     long stride, lb, ub, str;                                                  \
713     lb = 0;                                                                    \
718         (KMP_STR(func) ": T#%d, lb 0x%lx, ub 0x%lx, str 0x%lx, chunk_sz %d\n", \
719          gtid, lb, ub, str, chunk_sz));                                        \
721     if ((str > 0) ? (lb < ub) : (lb > ub)) {                                   \
722       KMP_DISPATCH_INIT(&loc, gtid, (schedule), lb,                            \
788   int func(int up, unsigned long long lb, unsigned long long ub,               \
797     KA_TRACE(20, (KMP_STR(func) ": T#%d, up %d, lb 0x%llx, ub 0x%llx, str "    \
799                   gtid, up, lb, ub, str, chunk_sz));                           \
801     if ((str > 0) ? (lb < ub) : (lb > ub)) {                                   \
802       KMP_DISPATCH_INIT_ULL(&loc, gtid, (schedule), lb,                        \
825   int func(int up, unsigned long long lb, unsigned long long ub,               \
835     KA_TRACE(20, (KMP_STR(func) ": T#%d, up %d, lb 0x%llx, ub 0x%llx, str "    \
837                   gtid, up, lb, ub, str, chunk_sz));                           \
839     if ((str > 0) ? (lb < ub) : (lb > ub)) {                                   \
840       KMP_DISPATCH_INIT_ULL(&loc, gtid, (schedule), lb,                        \
933     long long stride, str, lb, ub;                                             \
944     lb = 0;                                                                    \
948     KA_TRACE(20, (KMP_STR(func) ": T#%d, lb 0x%llx, ub 0x%llx, str "           \
950                   gtid, lb, ub, str, chunk_sz));                               \
952     if ((str > 0) ? (lb < ub) : (lb > ub)) {                                   \
953       KMP_DISPATCH_INIT_ULL(&loc, gtid, (schedule), lb,                        \
981     unsigned long long stride, str, lb, ub;                                    \
993     lb = 0;                                                                    \
996     KA_TRACE(20, (KMP_STR(func) ": T#%d, lb 0x%llx, ub 0x%llx, str "           \
998                   gtid, lb, ub, str, chunk_sz));                               \
1000     if ((str > 0) ? (lb < ub) : (lb > ub)) {                                   \
1001       KMP_DISPATCH_INIT_ULL(&loc, gtid, (schedule), lb,                        \
1043   void func(void (*task)(void *), void *data, unsigned num_threads, long lb,   \
1050              func) ": T#%d, lb 0x%lx, ub 0x%lx, str 0x%lx, chunk_sz 0x%lx\n",  \
1051          gtid, lb, ub, str, chunk_sz));                                        \
1061                            9, task, data, num_threads, &loc, (schedule), lb,   \
1069     KMP_DISPATCH_INIT(&loc, gtid, (schedule), lb,                              \
1243 // worksharing construct with lb 1 and stride 1, and use the iteration #'s
1251   kmp_int lb, ub, stride;
1258   status = KMP_DISPATCH_NEXT(&loc, gtid, NULL, &lb, &ub, &stride);
1261     KMP_DEBUG_ASSERT(lb > 0);
1262     KMP_ASSERT(lb == ub);
1264     lb = 0;
1268                 (unsigned)lb));
1269   return (unsigned)lb;
1274   kmp_int lb, ub, stride;
1283   status = KMP_DISPATCH_NEXT(&loc, gtid, NULL, &lb, &ub, &stride);
1286     KMP_DEBUG_ASSERT(lb > 0);
1287     KMP_ASSERT(lb == ub);
1289     lb = 0;
1293       20, ("GOMP_sections_next exit: T#%d returning %u\n", gtid, (unsigned)lb));
1294   return (unsigned)lb;
1459   void func(void (*task)(void *), void *data, unsigned num_threads, long lb,   \
1466              func) ": T#%d, lb 0x%lx, ub 0x%lx, str 0x%lx, chunk_sz 0x%lx\n",  \
1467          gtid, lb, ub, str, chunk_sz));                                        \
1479                            9, task, data, num_threads, &loc, (schedule), lb,   \
1486     KMP_DISPATCH_INIT(&loc, gtid, (schedule), lb,                              \