1 #include <boost/config.hpp>
2 
3 #if defined(BOOST_MSVC)
4 #pragma warning(disable: 4786)  // identifier truncated in debug info
5 #pragma warning(disable: 4710)  // function not inlined
6 #pragma warning(disable: 4711)  // function selected for automatic inline expansion
7 #pragma warning(disable: 4514)  // unreferenced inline removed
8 #endif
9 
10 //
11 //  mem_fn_fastcall_test.cpp - a test for mem_fn.hpp + __fastcall
12 //
13 //  Copyright (c) 2002 Peter Dimov and Multi Media Ltd.
14 //
15 // Distributed under the Boost Software License, Version 1.0. (See
16 // accompanying file LICENSE_1_0.txt or copy at
17 // http://www.boost.org/LICENSE_1_0.txt)
18 //
19 
20 #define BOOST_MEM_FN_ENABLE_FASTCALL
21 
22 #include <boost/mem_fn.hpp>
23 #include <boost/shared_ptr.hpp>
24 
25 #if defined(BOOST_MSVC) && (BOOST_MSVC < 1300)
26 #pragma warning(push, 3)
27 #endif
28 
29 #include <iostream>
30 
31 #if defined(BOOST_MSVC) && (BOOST_MSVC < 1300)
32 #pragma warning(pop)
33 #endif
34 
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 
detect_errors(bool x)70 int detect_errors(bool x)
71 {
72     if(x)
73     {
74         std::cerr << "no errors detected.\n";
75         return 0;
76     }
77     else
78     {
79         std::cerr << "test failed.\n";
80         return 1;
81     }
82 }
83 
main()84 int main()
85 {
86     using boost::mem_fn;
87 
88     X x;
89 
90     X const & rcx = x;
91     X const * pcx = &x;
92 
93     boost::shared_ptr<X> sp(new X);
94 
95     mem_fn(&X::f0)(x);
96     mem_fn(&X::f0)(&x);
97     mem_fn(&X::f0)(sp);
98 
99     mem_fn(&X::g0)(x);
100     mem_fn(&X::g0)(rcx);
101     mem_fn(&X::g0)(&x);
102     mem_fn(&X::g0)(pcx);
103     mem_fn(&X::g0)(sp);
104 
105     mem_fn(&X::f1)(x, 1);
106     mem_fn(&X::f1)(&x, 1);
107     mem_fn(&X::f1)(sp, 1);
108 
109     mem_fn(&X::g1)(x, 1);
110     mem_fn(&X::g1)(rcx, 1);
111     mem_fn(&X::g1)(&x, 1);
112     mem_fn(&X::g1)(pcx, 1);
113     mem_fn(&X::g1)(sp, 1);
114 
115     mem_fn(&X::f2)(x, 1, 2);
116     mem_fn(&X::f2)(&x, 1, 2);
117     mem_fn(&X::f2)(sp, 1, 2);
118 
119     mem_fn(&X::g2)(x, 1, 2);
120     mem_fn(&X::g2)(rcx, 1, 2);
121     mem_fn(&X::g2)(&x, 1, 2);
122     mem_fn(&X::g2)(pcx, 1, 2);
123     mem_fn(&X::g2)(sp, 1, 2);
124 
125     mem_fn(&X::f3)(x, 1, 2, 3);
126     mem_fn(&X::f3)(&x, 1, 2, 3);
127     mem_fn(&X::f3)(sp, 1, 2, 3);
128 
129     mem_fn(&X::g3)(x, 1, 2, 3);
130     mem_fn(&X::g3)(rcx, 1, 2, 3);
131     mem_fn(&X::g3)(&x, 1, 2, 3);
132     mem_fn(&X::g3)(pcx, 1, 2, 3);
133     mem_fn(&X::g3)(sp, 1, 2, 3);
134 
135     mem_fn(&X::f4)(x, 1, 2, 3, 4);
136     mem_fn(&X::f4)(&x, 1, 2, 3, 4);
137     mem_fn(&X::f4)(sp, 1, 2, 3, 4);
138 
139     mem_fn(&X::g4)(x, 1, 2, 3, 4);
140     mem_fn(&X::g4)(rcx, 1, 2, 3, 4);
141     mem_fn(&X::g4)(&x, 1, 2, 3, 4);
142     mem_fn(&X::g4)(pcx, 1, 2, 3, 4);
143     mem_fn(&X::g4)(sp, 1, 2, 3, 4);
144 
145     mem_fn(&X::f5)(x, 1, 2, 3, 4, 5);
146     mem_fn(&X::f5)(&x, 1, 2, 3, 4, 5);
147     mem_fn(&X::f5)(sp, 1, 2, 3, 4, 5);
148 
149     mem_fn(&X::g5)(x, 1, 2, 3, 4, 5);
150     mem_fn(&X::g5)(rcx, 1, 2, 3, 4, 5);
151     mem_fn(&X::g5)(&x, 1, 2, 3, 4, 5);
152     mem_fn(&X::g5)(pcx, 1, 2, 3, 4, 5);
153     mem_fn(&X::g5)(sp, 1, 2, 3, 4, 5);
154 
155     mem_fn(&X::f6)(x, 1, 2, 3, 4, 5, 6);
156     mem_fn(&X::f6)(&x, 1, 2, 3, 4, 5, 6);
157     mem_fn(&X::f6)(sp, 1, 2, 3, 4, 5, 6);
158 
159     mem_fn(&X::g6)(x, 1, 2, 3, 4, 5, 6);
160     mem_fn(&X::g6)(rcx, 1, 2, 3, 4, 5, 6);
161     mem_fn(&X::g6)(&x, 1, 2, 3, 4, 5, 6);
162     mem_fn(&X::g6)(pcx, 1, 2, 3, 4, 5, 6);
163     mem_fn(&X::g6)(sp, 1, 2, 3, 4, 5, 6);
164 
165     mem_fn(&X::f7)(x, 1, 2, 3, 4, 5, 6, 7);
166     mem_fn(&X::f7)(&x, 1, 2, 3, 4, 5, 6, 7);
167     mem_fn(&X::f7)(sp, 1, 2, 3, 4, 5, 6, 7);
168 
169     mem_fn(&X::g7)(x, 1, 2, 3, 4, 5, 6, 7);
170     mem_fn(&X::g7)(rcx, 1, 2, 3, 4, 5, 6, 7);
171     mem_fn(&X::g7)(&x, 1, 2, 3, 4, 5, 6, 7);
172     mem_fn(&X::g7)(pcx, 1, 2, 3, 4, 5, 6, 7);
173     mem_fn(&X::g7)(sp, 1, 2, 3, 4, 5, 6, 7);
174 
175     mem_fn(&X::f8)(x, 1, 2, 3, 4, 5, 6, 7, 8);
176     mem_fn(&X::f8)(&x, 1, 2, 3, 4, 5, 6, 7, 8);
177     mem_fn(&X::f8)(sp, 1, 2, 3, 4, 5, 6, 7, 8);
178 
179     mem_fn(&X::g8)(x, 1, 2, 3, 4, 5, 6, 7, 8);
180     mem_fn(&X::g8)(rcx, 1, 2, 3, 4, 5, 6, 7, 8);
181     mem_fn(&X::g8)(&x, 1, 2, 3, 4, 5, 6, 7, 8);
182     mem_fn(&X::g8)(pcx, 1, 2, 3, 4, 5, 6, 7, 8);
183     mem_fn(&X::g8)(sp, 1, 2, 3, 4, 5, 6, 7, 8);
184 
185     return detect_errors(x.hash == 17610 && sp->hash == 2155);
186 }
187