Chris@16
|
1 //
|
Chris@16
|
2 // Copyright (c) 2000-2002
|
Chris@16
|
3 // Joerg Walter, Mathias Koch
|
Chris@16
|
4 //
|
Chris@16
|
5 // Distributed under the Boost Software License, Version 1.0. (See
|
Chris@16
|
6 // accompanying file LICENSE_1_0.txt or copy at
|
Chris@16
|
7 // http://www.boost.org/LICENSE_1_0.txt)
|
Chris@16
|
8 //
|
Chris@16
|
9 // The authors gratefully acknowledge the support of
|
Chris@16
|
10 // GeNeSys mbH & Co. KG in producing this work.
|
Chris@16
|
11 //
|
Chris@16
|
12
|
Chris@16
|
13 #ifndef _BOOST_UBLAS_DUFF_
|
Chris@16
|
14 #define _BOOST_UBLAS_DUFF_
|
Chris@16
|
15
|
Chris@16
|
16 #define DD_SWITCH(n, d, r, expr) \
|
Chris@16
|
17 { \
|
Chris@16
|
18 unsigned r = ((n) + (d) - 1) / (d); \
|
Chris@16
|
19 switch ((n) % (d)) { \
|
Chris@16
|
20 case 0: do { expr;
|
Chris@16
|
21 #define DD_CASE_I(i, expr) \
|
Chris@16
|
22 case (i): expr;
|
Chris@16
|
23 #define DD_WHILE(r) \
|
Chris@16
|
24 } while (-- (r) > 0); \
|
Chris@16
|
25 } \
|
Chris@16
|
26 }
|
Chris@16
|
27
|
Chris@16
|
28 #define DD_1T(n, d, r, expr) \
|
Chris@16
|
29 DD_WHILE(r)
|
Chris@16
|
30 #define DD_2T(n, d, r, expr) \
|
Chris@16
|
31 DD_CASE_I(1, expr) \
|
Chris@16
|
32 DD_1T(n, d, r, expr)
|
Chris@16
|
33 #define DD_3T(n, d, r, expr) \
|
Chris@16
|
34 DD_CASE_I(2, expr) \
|
Chris@16
|
35 DD_2T(n, d, r, expr)
|
Chris@16
|
36 #define DD_4T(n, d, r, expr) \
|
Chris@16
|
37 DD_CASE_I(3, expr) \
|
Chris@16
|
38 DD_3T(n, d, r, expr)
|
Chris@16
|
39 #define DD_5T(n, d, r, expr) \
|
Chris@16
|
40 DD_CASE_I(4, expr) \
|
Chris@16
|
41 DD_4T(n, d, r, expr)
|
Chris@16
|
42 #define DD_6T(n, d, r, expr) \
|
Chris@16
|
43 DD_CASE_I(5, expr) \
|
Chris@16
|
44 DD_5T(n, d, r, expr)
|
Chris@16
|
45 #define DD_7T(n, d, r, expr) \
|
Chris@16
|
46 DD_CASE_I(6, expr) \
|
Chris@16
|
47 DD_6T(n, d, r, expr)
|
Chris@16
|
48 #define DD_8T(n, d, r, expr) \
|
Chris@16
|
49 DD_CASE_I(7, expr) \
|
Chris@16
|
50 DD_7T(n, d, r, expr)
|
Chris@16
|
51
|
Chris@16
|
52 #define DD(n, d, r, expr) \
|
Chris@16
|
53 DD_SWITCH(n, d, r, expr) \
|
Chris@16
|
54 DD_##d##T(n, d, r, expr)
|
Chris@16
|
55
|
Chris@16
|
56 #endif
|