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_STDCALL
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 int __stdcall f0() { f1(17); return 0; }
g0X43 int __stdcall g0() const { g1(17); return 0; }
44
f1X45 int __stdcall f1(int a1) { hash = (hash * 17041 + a1) % 32768; return 0; }
g1X46 int __stdcall g1(int a1) const { hash = (hash * 17041 + a1 * 2) % 32768; return 0; }
47
f2X48 int __stdcall f2(int a1, int a2) { f1(a1); f1(a2); return 0; }
g2X49 int __stdcall g2(int a1, int a2) const { g1(a1); g1(a2); return 0; }
50
f3X51 int __stdcall f3(int a1, int a2, int a3) { f2(a1, a2); f1(a3); return 0; }
g3X52 int __stdcall g3(int a1, int a2, int a3) const { g2(a1, a2); g1(a3); return 0; }
53
f4X54 int __stdcall f4(int a1, int a2, int a3, int a4) { f3(a1, a2, a3); f1(a4); return 0; }
g4X55 int __stdcall g4(int a1, int a2, int a3, int a4) const { g3(a1, a2, a3); g1(a4); return 0; }
56
f5X57 int __stdcall f5(int a1, int a2, int a3, int a4, int a5) { f4(a1, a2, a3, a4); f1(a5); return 0; }
g5X58 int __stdcall g5(int a1, int a2, int a3, int a4, int a5) const { g4(a1, a2, a3, a4); g1(a5); return 0; }
59
f6X60 int __stdcall f6(int a1, int a2, int a3, int a4, int a5, int a6) { f5(a1, a2, a3, a4, a5); f1(a6); return 0; }
g6X61 int __stdcall g6(int a1, int a2, int a3, int a4, int a5, int a6) const { g5(a1, a2, a3, a4, a5); g1(a6); return 0; }
62
f7X63 int __stdcall f7(int a1, int a2, int a3, int a4, int a5, int a6, int a7) { f6(a1, a2, a3, a4, a5, a6); f1(a7); return 0; }
g7X64 int __stdcall 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); return 0; }
65
f8X66 int __stdcall 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); return 0; }
g8X67 int __stdcall 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); return 0; }
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 std::cout << typeid(typename boost::result_of<X::f0()>::type).name() << "\n";
80
81 bind(&X::f0, &x)();
82 bind(&X::f0, ref(x))();
83
84 bind(&X::g0, &x)();
85 bind(&X::g0, x)();
86 bind(&X::g0, ref(x))();
87
88 // 1
89
90 bind(&X::f1, &x, 1)();
91 bind(&X::f1, ref(x), 1)();
92
93 bind(&X::g1, &x, 1)();
94 bind(&X::g1, x, 1)();
95 bind(&X::g1, ref(x), 1)();
96
97 // 2
98
99 bind(&X::f2, &x, 1, 2)();
100 bind(&X::f2, ref(x), 1, 2)();
101
102 bind(&X::g2, &x, 1, 2)();
103 bind(&X::g2, x, 1, 2)();
104 bind(&X::g2, ref(x), 1, 2)();
105
106 // 3
107
108 bind(&X::f3, &x, 1, 2, 3)();
109 bind(&X::f3, ref(x), 1, 2, 3)();
110
111 bind(&X::g3, &x, 1, 2, 3)();
112 bind(&X::g3, x, 1, 2, 3)();
113 bind(&X::g3, ref(x), 1, 2, 3)();
114
115 // 4
116
117 bind(&X::f4, &x, 1, 2, 3, 4)();
118 bind(&X::f4, ref(x), 1, 2, 3, 4)();
119
120 bind(&X::g4, &x, 1, 2, 3, 4)();
121 bind(&X::g4, x, 1, 2, 3, 4)();
122 bind(&X::g4, ref(x), 1, 2, 3, 4)();
123
124 // 5
125
126 bind(&X::f5, &x, 1, 2, 3, 4, 5)();
127 bind(&X::f5, ref(x), 1, 2, 3, 4, 5)();
128
129 bind(&X::g5, &x, 1, 2, 3, 4, 5)();
130 bind(&X::g5, x, 1, 2, 3, 4, 5)();
131 bind(&X::g5, ref(x), 1, 2, 3, 4, 5)();
132
133 // 6
134
135 bind(&X::f6, &x, 1, 2, 3, 4, 5, 6)();
136 bind(&X::f6, ref(x), 1, 2, 3, 4, 5, 6)();
137
138 bind(&X::g6, &x, 1, 2, 3, 4, 5, 6)();
139 bind(&X::g6, x, 1, 2, 3, 4, 5, 6)();
140 bind(&X::g6, ref(x), 1, 2, 3, 4, 5, 6)();
141
142 // 7
143
144 bind(&X::f7, &x, 1, 2, 3, 4, 5, 6, 7)();
145 bind(&X::f7, ref(x), 1, 2, 3, 4, 5, 6, 7)();
146
147 bind(&X::g7, &x, 1, 2, 3, 4, 5, 6, 7)();
148 bind(&X::g7, x, 1, 2, 3, 4, 5, 6, 7)();
149 bind(&X::g7, ref(x), 1, 2, 3, 4, 5, 6, 7)();
150
151 // 8
152
153 bind(&X::f8, &x, 1, 2, 3, 4, 5, 6, 7, 8)();
154 bind(&X::f8, ref(x), 1, 2, 3, 4, 5, 6, 7, 8)();
155
156 bind(&X::g8, &x, 1, 2, 3, 4, 5, 6, 7, 8)();
157 bind(&X::g8, x, 1, 2, 3, 4, 5, 6, 7, 8)();
158 bind(&X::g8, ref(x), 1, 2, 3, 4, 5, 6, 7, 8)();
159
160 BOOST_TEST( x.hash == 23558 );
161 }
162
main()163 int main()
164 {
165 member_function_test();
166 return boost::report_errors();
167 }
168