R_ext/Itermacros.h File Reference

Go to the source code of this file.

Defines
#define	LOOP_WITH_INTERRUPT_CHECK(LOOP, ncheck, n,...)
#define	R_ITERATE_CORE(n, i, loop_body)
#define	R_ITERATE(n, i, loop_body)
#define	R_ITERATE_CHECK(ncheck, n, i, loop_body)
#define	MOD_ITERATE1_CORE(n, n1, i, i1, loop_body)
#define	MOD_ITERATE1(n, n1, i, i1, loop_body)
#define	MOD_ITERATE1_CHECK(ncheck, n, n1, i, i1, loop_body)
#define	MOD_ITERATE2_CORE(n, n1, n2, i, i1, i2, loop_body)
#define	MOD_ITERATE2(n, n1, n2, i, i1, i2, loop_body)
#define	MOD_ITERATE2_CHECK(ncheck, n, n1, n2, i, i1, i2, loop_body)
#define	MOD_ITERATE   MOD_ITERATE2
#define	MOD_ITERATE_CORE   MOD_ITERATE2_CORE
#define	MOD_ITERATE_CHECK   MOD_ITERATE2_CHECK
#define	MOD_ITERATE3_CORE(n, n1, n2, n3, i, i1, i2, i3, loop_body)
#define	MOD_ITERATE3(n, n1, n2, n3, i, i1, i2, i3, loop_body)
#define	MOD_ITERATE3_CHECK(ncheck, n, n1, n2, n3, i, i1, i2, i3, loop_body)
#define	MOD_ITERATE4_CORE(n, n1, n2, n3, n4, i, i1, i2, i3, i4, loop_body)
#define	MOD_ITERATE4(n, n1, n2, n3, n4, i, i1, i2, i3, i4, loop_body)
#define	MOD_ITERATE4_CHECK(ncheck, n, n1, n2, n3, n4, i, i1, i2, i3, i4, loop_body)
#define	MOD_ITERATE5_CORE(n, n1, n2, n3, n4, n5, i, i1, i2, i3, i4, i5, loop_body)
#define	MOD_ITERATE5(n, n1, n2, n3, n4, n5, i, i1, i2, i3, i4, i5, loop_body)
#define	MOD_ITERATE5_CHECK(ncheck, n, n1, n2, n3, n4, n5, i, i1, i2, i3, i4, i5,loop_body)

---

Define Documentation

#define LOOP_WITH_INTERRUPT_CHECK	(		LOOP,
			ncheck,
			n,
			...
	)

Value:

do {        \
    for (size_t __intr_threshold__ = ncheck;            \
         TRUE;                          \
         __intr_threshold__ += ncheck) {                \
        size_t __intr_end__ = n < __intr_threshold__ ?      \
        n : __intr_threshold__;                 \
        LOOP(__intr_end__, __VA_ARGS__);                \
        if (__intr_end__ == n) break;               \
        else R_CheckUserInterrupt();                \
    }                               \
    } while (0)

#define MOD_ITERATE   MOD_ITERATE2

#define MOD_ITERATE1	(		n,
			n1,
			i,
			i1,
			loop_body
	)

Value:

do {    \
    i = i1 = 0;                 \
    MOD_ITERATE1_CORE(n, n1, i, i1, loop_body); \
    } while (0)

#define MOD_ITERATE1_CHECK	(		ncheck,
			n,
			n1,
			i,
			i1,
			loop_body
	)

Value:

do {    \
    i = i1 = 0;                         \
    LOOP_WITH_INTERRUPT_CHECK(MOD_ITERATE1_CORE, ncheck, n,     \
                  n1, i, i1, loop_body);        \
    } while (0)

#define MOD_ITERATE1_CORE	(		n,
			n1,
			i,
			i1,
			loop_body
	)

Value:

do {    \
    for (; i < n;                           \
         i1 = (++i1 == n1) ? 0 : i1,                \
         ++i) {                         \
        loop_body                           \
        }                           \
    } while (0)

#define MOD_ITERATE2	(		n,
			n1,
			n2,
			i,
			i1,
			i2,
			loop_body
	)

Value:

do {    \
    i = i1 = i2 = 0;                    \
    MOD_ITERATE2_CORE(n, n1, n2, i, i1, i2, loop_body); \
    } while (0)

#define MOD_ITERATE2_CHECK	(		ncheck,
			n,
			n1,
			n2,
			i,
			i1,
			i2,
			loop_body
	)

Value:

do {    \
    i = i1 = i2 = 0;                        \
    LOOP_WITH_INTERRUPT_CHECK(MOD_ITERATE2_CORE, ncheck, n,     \
                  n1, n2, i, i1, i2, loop_body);    \
    } while (0)

#define MOD_ITERATE2_CORE	(		n,
			n1,
			n2,
			i,
			i1,
			i2,
			loop_body
	)

Value:

do {    \
    for (; i < n;                           \
         i1 = (++i1 == n1) ? 0 : i1,                \
         i2 = (++i2 == n2) ? 0 : i2,                \
         ++i) {                         \
        loop_body                           \
        }                           \
    } while (0)

#define MOD_ITERATE3	(		n,
			n1,
			n2,
			n3,
			i,
			i1,
			i2,
			i3,
			loop_body
	)

Value:

do {    \
    i = i1 = i2 = i3 = 0;                       \
    MOD_ITERATE3_CORE(n, n1, n2, n3, i, i1, i2, i3, loop_body); \
    } while (0)

#define MOD_ITERATE3_CHECK	(		ncheck,
			n,
			n1,
			n2,
			n3,
			i,
			i1,
			i2,
			i3,
			loop_body
	)

Value:

do {                                \
    i = i1 = i2 = i3 = 0;                       \
    LOOP_WITH_INTERRUPT_CHECK(MOD_ITERATE3_CORE, ncheck, n,     \
                  n1, n2, n3, i, i1, i2, i3, loop_body); \
    } while (0)

#define MOD_ITERATE3_CORE	(		n,
			n1,
			n2,
			n3,
			i,
			i1,
			i2,
			i3,
			loop_body
	)

Value:

do {    \
    for (; i < n;                           \
         i1 = (++i1 == n1) ? 0 : i1,                \
         i2 = (++i2 == n2) ? 0 : i2,                \
         i3 = (++i3 == n3) ? 0 : i3,                \
         ++i) {                         \
        loop_body                           \
        }                           \
    } while (0)

#define MOD_ITERATE4	(		n,
			n1,
			n2,
			n3,
			n4,
			i,
			i1,
			i2,
			i3,
			i4,
			loop_body
	)

Value:

do { \
    i = i1 = i2 = i3 = i4 = 0;                  \
    MOD_ITERATE4_CORE(n, n1, n2, n3, n4, i, i1, i2, i3, i4, loop_body); \
    } while (0)

#define MOD_ITERATE4_CHECK	(		ncheck,
			n,
			n1,
			n2,
			n3,
			n4,
			i,
			i1,
			i2,
			i3,
			i4,
			loop_body
	)

Value:

do {                                \
    i = i1 = i2 = i3 = i4 = 0;                  \
    LOOP_WITH_INTERRUPT_CHECK(MOD_ITERATE4_CORE, ncheck, n, \
                  n1, n2, n3, n4,           \
                  i, i1, i2, i3, i4, loop_body);    \
    } while (0)

#define MOD_ITERATE4_CORE	(		n,
			n1,
			n2,
			n3,
			n4,
			i,
			i1,
			i2,
			i3,
			i4,
			loop_body
	)

Value:

do {                                \
    for (; i < n;                           \
         i1 = (++i1 == n1) ? 0 : i1,                \
         i2 = (++i2 == n2) ? 0 : i2,                \
         i3 = (++i3 == n3) ? 0 : i3,                \
         i4 = (++i4 == n4) ? 0 : i4,                \
         ++i) {                         \
        loop_body                           \
        }                           \
    } while (0)

#define MOD_ITERATE5	(		n,
			n1,
			n2,
			n3,
			n4,
			n5,
			i,
			i1,
			i2,
			i3,
			i4,
			i5,
			loop_body
	)

Value:

do {                                \
    i = i1 = i2 = i3 = i4 = i5 = 0;                 \
    MOD_ITERATE5_CORE(n, n1, n2, n3, n4, n5, i, i1, i2, i3, i4, i5, \
              loop_body);                   \
    } while (0)

#define MOD_ITERATE5_CHECK	(		ncheck,
			n,
			n1,
			n2,
			n3,
			n4,
			n5,
			i,
			i1,
			i2,
			i3,
			i4,
			i5,
			loop_body
	)

Value:

do {                                \
    i = i1 = i2 = i3 = i4 = i5 = 0;                 \
    LOOP_WITH_INTERRUPT_CHECK(MOD_ITERATE5_CORE, ncheck, n, \
                  n1, n2, n3, n4, n5,           \
                  i, i1, i2, i3, i4, i5, loop_body);    \
    } while (0)

#define MOD_ITERATE5_CORE	(		n,
			n1,
			n2,
			n3,
			n4,
			n5,
			i,
			i1,
			i2,
			i3,
			i4,
			i5,
			loop_body
	)

Value:

do {                                \
    for (; i < n;                           \
         i1 = (++i1 == n1) ? 0 : i1,                \
         i2 = (++i2 == n2) ? 0 : i2,                \
         i3 = (++i3 == n3) ? 0 : i3,                \
         i4 = (++i4 == n4) ? 0 : i4,                \
         i5 = (++i5 == n5) ? 0 : i5,                \
         ++i) {                         \
        loop_body                           \
        }                           \
    } while (0)

#define MOD_ITERATE_CHECK   MOD_ITERATE2_CHECK

#define MOD_ITERATE_CORE   MOD_ITERATE2_CORE

#define R_ITERATE	(		n,
			i,
			loop_body
	)

Value:

do {        \
    i = 0;                  \
    R_ITERATE_CORE(n, i, loop_body);        \
    } while (0)

#define R_ITERATE_CHECK	(		ncheck,
			n,
			i,
			loop_body
	)

Value:

do {            \
    i = 0;                              \
    LOOP_WITH_INTERRUPT_CHECK(R_ITERATE_CORE, ncheck, n, i, loop_body); \
    } while (0)

#define R_ITERATE_CORE	(		n,
			i,
			loop_body
	)

Value:

do {    \
    for (; i < n; ++i) { loop_body }    \
    } while (0)