1 /*==============================================================================
2 Copyright (c) 2001 Peter Dimov
3 Copyright (c) 2005-2010 Joel de Guzman
4 Copyright (c) 2010 Thomas Heller
5
6 Distributed under the Boost Software License, Version 1.0. (See accompanying
7 file LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
8 ==============================================================================*/
9
10 #include <boost/config.hpp>
11
12 #if defined(BOOST_MSVC)
13 #pragma warning(disable: 4786) // identifier truncated in debug info
14 #pragma warning(disable: 4710) // function not inlined
15 #pragma warning(disable: 4711) // function selected for automatic inline expansion
16 #pragma warning(disable: 4514) // unreferenced inline removed
17 #endif
18
19 #define BOOST_MEM_FN_ENABLE_FASTCALL
20
21 #include <boost/phoenix/core.hpp>
22 #include <boost/phoenix/bind.hpp>
23
24 #if defined(BOOST_MSVC) && (BOOST_MSVC < 1300)
25 #pragma warning(push, 3)
26 #endif
27
28 #include <iostream>
29
30 #if defined(BOOST_MSVC) && (BOOST_MSVC < 1300)
31 #pragma warning(pop)
32 #endif
33
34 #include <boost/detail/lightweight_test.hpp>
35
36 struct X
37 {
38 mutable unsigned int hash;
39
XX40 X(): hash(0) {}
41
f0X42 void __fastcall f0() { f1(17); }
g0X43 void __fastcall g0() const { g1(17); }
44
f1X45 void __fastcall f1(int a1) { hash = (hash * 17041 + a1) % 32768; }
g1X46 void __fastcall g1(int a1) const { hash = (hash * 17041 + a1 * 2) % 32768; }
47
f2X48 void __fastcall f2(int a1, int a2) { f1(a1); f1(a2); }
g2X49 void __fastcall g2(int a1, int a2) const { g1(a1); g1(a2); }
50
f3X51 void __fastcall f3(int a1, int a2, int a3) { f2(a1, a2); f1(a3); }
g3X52 void __fastcall g3(int a1, int a2, int a3) const { g2(a1, a2); g1(a3); }
53
f4X54 void __fastcall f4(int a1, int a2, int a3, int a4) { f3(a1, a2, a3); f1(a4); }
g4X55 void __fastcall g4(int a1, int a2, int a3, int a4) const { g3(a1, a2, a3); g1(a4); }
56
f5X57 void __fastcall f5(int a1, int a2, int a3, int a4, int a5) { f4(a1, a2, a3, a4); f1(a5); }
g5X58 void __fastcall g5(int a1, int a2, int a3, int a4, int a5) const { g4(a1, a2, a3, a4); g1(a5); }
59
f6X60 void __fastcall f6(int a1, int a2, int a3, int a4, int a5, int a6) { f5(a1, a2, a3, a4, a5); f1(a6); }
g6X61 void __fastcall g6(int a1, int a2, int a3, int a4, int a5, int a6) const { g5(a1, a2, a3, a4, a5); g1(a6); }
62
f7X63 void __fastcall f7(int a1, int a2, int a3, int a4, int a5, int a6, int a7) { f6(a1, a2, a3, a4, a5, a6); f1(a7); }
g7X64 void __fastcall g7(int a1, int a2, int a3, int a4, int a5, int a6, int a7) const { g6(a1, a2, a3, a4, a5, a6); g1(a7); }
65
f8X66 void __fastcall f8(int a1, int a2, int a3, int a4, int a5, int a6, int a7, int a8) { f7(a1, a2, a3, a4, a5, a6, a7); f1(a8); }
g8X67 void __fastcall g8(int a1, int a2, int a3, int a4, int a5, int a6, int a7, int a8) const { g7(a1, a2, a3, a4, a5, a6, a7); g1(a8); }
68 };
69
member_function_test()70 void member_function_test()
71 {
72 using boost::phoenix::bind;
73 using boost::phoenix::ref;
74
75 X x;
76
77 // 0
78
79 bind(&X::f0, &x)();
80 bind(&X::f0, ref(x))();
81
82 bind(&X::g0, &x)();
83 bind(&X::g0, x)();
84 bind(&X::g0, ref(x))();
85
86 // 1
87
88 bind(&X::f1, &x, 1)();
89 bind(&X::f1, ref(x), 1)();
90
91 bind(&X::g1, &x, 1)();
92 bind(&X::g1, x, 1)();
93 bind(&X::g1, ref(x), 1)();
94
95 // 2
96
97 bind(&X::f2, &x, 1, 2)();
98 bind(&X::f2, ref(x), 1, 2)();
99
100 bind(&X::g2, &x, 1, 2)();
101 bind(&X::g2, x, 1, 2)();
102 bind(&X::g2, ref(x), 1, 2)();
103
104 // 3
105
106 bind(&X::f3, &x, 1, 2, 3)();
107 bind(&X::f3, ref(x), 1, 2, 3)();
108
109 bind(&X::g3, &x, 1, 2, 3)();
110 bind(&X::g3, x, 1, 2, 3)();
111 bind(&X::g3, ref(x), 1, 2, 3)();
112
113 // 4
114
115 bind(&X::f4, &x, 1, 2, 3, 4)();
116 bind(&X::f4, ref(x), 1, 2, 3, 4)();
117
118 bind(&X::g4, &x, 1, 2, 3, 4)();
119 bind(&X::g4, x, 1, 2, 3, 4)();
120 bind(&X::g4, ref(x), 1, 2, 3, 4)();
121
122 // 5
123
124 bind(&X::f5, &x, 1, 2, 3, 4, 5)();
125 bind(&X::f5, ref(x), 1, 2, 3, 4, 5)();
126
127 bind(&X::g5, &x, 1, 2, 3, 4, 5)();
128 bind(&X::g5, x, 1, 2, 3, 4, 5)();
129 bind(&X::g5, ref(x), 1, 2, 3, 4, 5)();
130
131 // 6
132
133 bind(&X::f6, &x, 1, 2, 3, 4, 5, 6)();
134 bind(&X::f6, ref(x), 1, 2, 3, 4, 5, 6)();
135
136 bind(&X::g6, &x, 1, 2, 3, 4, 5, 6)();
137 bind(&X::g6, x, 1, 2, 3, 4, 5, 6)();
138 bind(&X::g6, ref(x), 1, 2, 3, 4, 5, 6)();
139
140 // 7
141
142 bind(&X::f7, &x, 1, 2, 3, 4, 5, 6, 7)();
143 bind(&X::f7, ref(x), 1, 2, 3, 4, 5, 6, 7)();
144
145 bind(&X::g7, &x, 1, 2, 3, 4, 5, 6, 7)();
146 bind(&X::g7, x, 1, 2, 3, 4, 5, 6, 7)();
147 bind(&X::g7, ref(x), 1, 2, 3, 4, 5, 6, 7)();
148
149 // 8
150
151 bind(&X::f8, &x, 1, 2, 3, 4, 5, 6, 7, 8)();
152 bind(&X::f8, ref(x), 1, 2, 3, 4, 5, 6, 7, 8)();
153
154 bind(&X::g8, &x, 1, 2, 3, 4, 5, 6, 7, 8)();
155 bind(&X::g8, x, 1, 2, 3, 4, 5, 6, 7, 8)();
156 bind(&X::g8, ref(x), 1, 2, 3, 4, 5, 6, 7, 8)();
157
158 BOOST_TEST( x.hash == 23558 );
159 }
160
main()161 int main()
162 {
163 member_function_test();
164 return boost::report_errors();
165 }
166