1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556 |
- //
- // Copyright (c) 2000-2002
- // Joerg Walter, Mathias Koch
- //
- // Distributed under the Boost Software License, Version 1.0. (See
- // accompanying file LICENSE_1_0.txt or copy at
- // http://www.boost.org/LICENSE_1_0.txt)
- //
- // The authors gratefully acknowledge the support of
- // GeNeSys mbH & Co. KG in producing this work.
- //
- #ifndef _BOOST_UBLAS_DUFF_
- #define _BOOST_UBLAS_DUFF_
- #define DD_SWITCH(n, d, r, expr) \
- { \
- unsigned r = ((n) + (d) - 1) / (d); \
- switch ((n) % (d)) { \
- case 0: do { expr;
- #define DD_CASE_I(i, expr) \
- case (i): expr;
- #define DD_WHILE(r) \
- } while (-- (r) > 0); \
- } \
- }
- #define DD_1T(n, d, r, expr) \
- DD_WHILE(r)
- #define DD_2T(n, d, r, expr) \
- DD_CASE_I(1, expr) \
- DD_1T(n, d, r, expr)
- #define DD_3T(n, d, r, expr) \
- DD_CASE_I(2, expr) \
- DD_2T(n, d, r, expr)
- #define DD_4T(n, d, r, expr) \
- DD_CASE_I(3, expr) \
- DD_3T(n, d, r, expr)
- #define DD_5T(n, d, r, expr) \
- DD_CASE_I(4, expr) \
- DD_4T(n, d, r, expr)
- #define DD_6T(n, d, r, expr) \
- DD_CASE_I(5, expr) \
- DD_5T(n, d, r, expr)
- #define DD_7T(n, d, r, expr) \
- DD_CASE_I(6, expr) \
- DD_6T(n, d, r, expr)
- #define DD_8T(n, d, r, expr) \
- DD_CASE_I(7, expr) \
- DD_7T(n, d, r, expr)
- #define DD(n, d, r, expr) \
- DD_SWITCH(n, d, r, expr) \
- DD_##d##T(n, d, r, expr)
- #endif
|