You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and dots ('.'), can be up to 35 characters long. Letters must be lowercase.
56 lines
1.3 KiB
56 lines
1.3 KiB
// |
|
// 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
|
|
|