mem_fn_void_test.cpp

An article on the implementation of a fast C++ delegate with many advanced features.

#include <boost/config.hpp>

#if defined(BOOST_MSVC)
#pragma warning(disable: 4786)  // identifier truncated in debug info
#pragma warning(disable: 4710)  // function not inlined
#pragma warning(disable: 4711)  // function selected for automatic inline expansion
#pragma warning(disable: 4514)  // unreferenced inline removed
#endif

//
//  Test for fd::delegate<> void return member functions
//  , modified from mem_fn_void_test.cpp - a test for boost::mem_fn.hpp + void returns
//
//  Copyright (c) 2001 Peter Dimov and Multi Media Ltd.
//  Copyright (c) 2007 JaeWook Choi
//
// 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)
//

#include <boost/mem_fn.hpp>
#include <boost/shared_ptr.hpp>

#include <fd/delegate.hpp>

#if defined(BOOST_MSVC) && (BOOST_MSVC < 1300)
#pragma warning(push, 3)
#endif

#include <iostream>

#if defined(BOOST_MSVC) && (BOOST_MSVC < 1300)
#pragma warning(pop)
#endif


struct X
{
    mutable unsigned int hash;

    X(): hash(0) {}

    void f0() { f1(17); }
    void g0() const { g1(17); }

    void f1(int a1) { hash = (hash * 17041 + a1) % 32768; }
    void g1(int a1) const { hash = (hash * 17041 + a1 * 2) % 32768; }

    void f2(int a1, int a2) { f1(a1); f1(a2); }
    void g2(int a1, int a2) const { g1(a1); g1(a2); }

    void f3(int a1, int a2, int a3) { f2(a1, a2); f1(a3); }
    void g3(int a1, int a2, int a3) const { g2(a1, a2); g1(a3); }

    void f4(int a1, int a2, int a3, int a4) { f3(a1, a2, a3); f1(a4); }
    void g4(int a1, int a2, int a3, int a4) const { g3(a1, a2, a3); g1(a4); }

    void f5(int a1, int a2, int a3, int a4, int a5) { f4(a1, a2, a3, a4); f1(a5); }
    void g5(int a1, int a2, int a3, int a4, int a5) const { g4(a1, a2, a3, a4); g1(a5); }

    void f6(int a1, int a2, int a3, int a4, int a5, int a6) { f5(a1, a2, a3, a4, a5); f1(a6); }
    void g6(int a1, int a2, int a3, int a4, int a5, int a6) const { g5(a1, a2, a3, a4, a5); g1(a6); }

    void f7(int a1, int a2, int a3, int a4, int a5, int a6, int a7) { f6(a1, a2, a3, a4, a5, a6); f1(a7); }
    void 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); }

    void 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); }
    void 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); }
};

int detect_errors(bool x)
{
    if(x)
    {
        std::cerr << "no errors detected.\n";
        return 0;
    }
    else
    {
        std::cerr << "test failed.\n";
        return 1;
    }
}

using boost::shared_ptr;

int main()
{
    {
      X x;

      X const & rcx = x;
      X const * pcx = &x;

      shared_ptr<X> sp(new X);

      boost::mem_fn(&X::f0)(x);
      boost::mem_fn(&X::f0)(&x);
      boost::mem_fn(&X::f0)(sp);

      boost::mem_fn(&X::g0)(x);
      boost::mem_fn(&X::g0)(rcx);
      boost::mem_fn(&X::g0)(&x);
      boost::mem_fn(&X::g0)(pcx);
      boost::mem_fn(&X::g0)(sp);

      boost::mem_fn(&X::f1)(x, 1);
      boost::mem_fn(&X::f1)(&x, 1);
      boost::mem_fn(&X::f1)(sp, 1);

      boost::mem_fn(&X::g1)(x, 1);
      boost::mem_fn(&X::g1)(rcx, 1);
      boost::mem_fn(&X::g1)(&x, 1);
      boost::mem_fn(&X::g1)(pcx, 1);
      boost::mem_fn(&X::g1)(sp, 1);

      boost::mem_fn(&X::f2)(x, 1, 2);
      boost::mem_fn(&X::f2)(&x, 1, 2);
      boost::mem_fn(&X::f2)(sp, 1, 2);

      boost::mem_fn(&X::g2)(x, 1, 2);
      boost::mem_fn(&X::g2)(rcx, 1, 2);
      boost::mem_fn(&X::g2)(&x, 1, 2);
      boost::mem_fn(&X::g2)(pcx, 1, 2);
      boost::mem_fn(&X::g2)(sp, 1, 2);

      boost::mem_fn(&X::f3)(x, 1, 2, 3);
      boost::mem_fn(&X::f3)(&x, 1, 2, 3);
      boost::mem_fn(&X::f3)(sp, 1, 2, 3);

      boost::mem_fn(&X::g3)(x, 1, 2, 3);
      boost::mem_fn(&X::g3)(rcx, 1, 2, 3);
      boost::mem_fn(&X::g3)(&x, 1, 2, 3);
      boost::mem_fn(&X::g3)(pcx, 1, 2, 3);
      boost::mem_fn(&X::g3)(sp, 1, 2, 3);

      boost::mem_fn(&X::f4)(x, 1, 2, 3, 4);
      boost::mem_fn(&X::f4)(&x, 1, 2, 3, 4);
      boost::mem_fn(&X::f4)(sp, 1, 2, 3, 4);

      boost::mem_fn(&X::g4)(x, 1, 2, 3, 4);
      boost::mem_fn(&X::g4)(rcx, 1, 2, 3, 4);
      boost::mem_fn(&X::g4)(&x, 1, 2, 3, 4);
      boost::mem_fn(&X::g4)(pcx, 1, 2, 3, 4);
      boost::mem_fn(&X::g4)(sp, 1, 2, 3, 4);

      boost::mem_fn(&X::f5)(x, 1, 2, 3, 4, 5);
      boost::mem_fn(&X::f5)(&x, 1, 2, 3, 4, 5);
      boost::mem_fn(&X::f5)(sp, 1, 2, 3, 4, 5);

      boost::mem_fn(&X::g5)(x, 1, 2, 3, 4, 5);
      boost::mem_fn(&X::g5)(rcx, 1, 2, 3, 4, 5);
      boost::mem_fn(&X::g5)(&x, 1, 2, 3, 4, 5);
      boost::mem_fn(&X::g5)(pcx, 1, 2, 3, 4, 5);
      boost::mem_fn(&X::g5)(sp, 1, 2, 3, 4, 5);

      boost::mem_fn(&X::f6)(x, 1, 2, 3, 4, 5, 6);
      boost::mem_fn(&X::f6)(&x, 1, 2, 3, 4, 5, 6);
      boost::mem_fn(&X::f6)(sp, 1, 2, 3, 4, 5, 6);

      boost::mem_fn(&X::g6)(x, 1, 2, 3, 4, 5, 6);
      boost::mem_fn(&X::g6)(rcx, 1, 2, 3, 4, 5, 6);
      boost::mem_fn(&X::g6)(&x, 1, 2, 3, 4, 5, 6);
      boost::mem_fn(&X::g6)(pcx, 1, 2, 3, 4, 5, 6);
      boost::mem_fn(&X::g6)(sp, 1, 2, 3, 4, 5, 6);

      boost::mem_fn(&X::f7)(x, 1, 2, 3, 4, 5, 6, 7);
      boost::mem_fn(&X::f7)(&x, 1, 2, 3, 4, 5, 6, 7);
      boost::mem_fn(&X::f7)(sp, 1, 2, 3, 4, 5, 6, 7);

      boost::mem_fn(&X::g7)(x, 1, 2, 3, 4, 5, 6, 7);
      boost::mem_fn(&X::g7)(rcx, 1, 2, 3, 4, 5, 6, 7);
      boost::mem_fn(&X::g7)(&x, 1, 2, 3, 4, 5, 6, 7);
      boost::mem_fn(&X::g7)(pcx, 1, 2, 3, 4, 5, 6, 7);
      boost::mem_fn(&X::g7)(sp, 1, 2, 3, 4, 5, 6, 7);

      boost::mem_fn(&X::f8)(x, 1, 2, 3, 4, 5, 6, 7, 8);
      boost::mem_fn(&X::f8)(&x, 1, 2, 3, 4, 5, 6, 7, 8);
      boost::mem_fn(&X::f8)(sp, 1, 2, 3, 4, 5, 6, 7, 8);

      boost::mem_fn(&X::g8)(x, 1, 2, 3, 4, 5, 6, 7, 8);
      boost::mem_fn(&X::g8)(rcx, 1, 2, 3, 4, 5, 6, 7, 8);
      boost::mem_fn(&X::g8)(&x, 1, 2, 3, 4, 5, 6, 7, 8);
      boost::mem_fn(&X::g8)(pcx, 1, 2, 3, 4, 5, 6, 7, 8);
      boost::mem_fn(&X::g8)(sp, 1, 2, 3, 4, 5, 6, 7, 8);

      detect_errors(x.hash == 17610 && sp->hash == 2155);
    }

    {
      X x;

      X const & rcx = x;
      X const * pcx = &x;

      boost::shared_ptr<X> sp(new X);

      (fd::delegate<void (X &)>(&X::f0))(x);
      (fd::delegate<void (X *)>(&X::f0))(&x);
      (fd::delegate<void (shared_ptr<X>)>(&X::f0))(sp);

      (fd::delegate<void (X &)>(&X::g0))(x);
      (fd::delegate<void (X const &)>(&X::g0))(rcx);
      (fd::delegate<void (X *)>(&X::g0))(&x);
      (fd::delegate<void (X const *)>(&X::g0))(pcx);
      (fd::delegate<void (shared_ptr<X>)>(&X::g0))(sp);

      (fd::delegate<void (X &, int)>(&X::f1))(x, 1);
      (fd::delegate<void (X *, int)>(&X::f1))(&x, 1);
      (fd::delegate<void (shared_ptr<X>, int)>(&X::f1))(sp, 1);

      (fd::delegate<void (X &, int)>(&X::g1))(x, 1);
      (fd::delegate<void (X const &, int)>(&X::g1))(rcx, 1);
      (fd::delegate<void (X *, int)>(&X::g1))(&x, 1);
      (fd::delegate<void (X const *, int)>(&X::g1))(pcx, 1);
      (fd::delegate<void (shared_ptr<X>, int)>(&X::g1))(sp, 1);

      (fd::delegate<void (X &, int, int)>(&X::f2))(x, 1, 2);
      (fd::delegate<void (X *, int, int)>(&X::f2))(&x, 1, 2);
      (fd::delegate<void (shared_ptr<X>, int, int)>(&X::f2))(sp, 1, 2);

      (fd::delegate<void (X &, int, int)>(&X::g2))(x, 1, 2);
      (fd::delegate<void (X const &, int, int)>(&X::g2))(rcx, 1, 2);
      (fd::delegate<void (X *, int, int)>(&X::g2))(&x, 1, 2);
      (fd::delegate<void (X const *, int, int)>(&X::g2))(pcx, 1, 2);
      (fd::delegate<void (shared_ptr<X>, int, int)>(&X::g2))(sp, 1, 2);

      (fd::delegate<void (X &, int, int, int)>(&X::f3))(x, 1, 2, 3);
      (fd::delegate<void (X *, int, int, int)>(&X::f3))(&x, 1, 2, 3);
      (fd::delegate<void (shared_ptr<X>, int, int, int)>(&X::f3))(sp, 1, 2, 3);

      (fd::delegate<void (X &, int, int, int)>(&X::g3))(x, 1, 2, 3);
      (fd::delegate<void (X const &, int, int, int)>(&X::g3))(rcx, 1, 2, 3);
      (fd::delegate<void (X *, int, int, int)>(&X::g3))(&x, 1, 2, 3);
      (fd::delegate<void (X const *, int, int, int)>(&X::g3))(pcx, 1, 2, 3);
      (fd::delegate<void (shared_ptr<X>, int, int, int)>(&X::g3))(sp, 1, 2, 3);

      (fd::delegate<void (X &, int, int, int, int)>(&X::f4))(x, 1, 2, 3, 4);
      (fd::delegate<void (X *, int, int, int, int)>(&X::f4))(&x, 1, 2, 3, 4);
      (fd::delegate<void (shared_ptr<X>, int, int, int, int)>(&X::f4))(sp, 1, 2, 3, 4);

      (fd::delegate<void (X &, int, int, int, int)>(&X::g4))(x, 1, 2, 3, 4);
      (fd::delegate<void (X const &, int, int, int, int)>(&X::g4))(rcx, 1, 2, 3, 4);
      (fd::delegate<void (X *, int, int, int, int)>(&X::g4))(&x, 1, 2, 3, 4);
      (fd::delegate<void (X const *, int, int, int, int)>(&X::g4))(pcx, 1, 2, 3, 4);
      (fd::delegate<void (shared_ptr<X>, int, int, int, int)>(&X::g4))(sp, 1, 2, 3, 4);

      (fd::delegate<void (X &, int, int, int, int, int)>(&X::f5))(x, 1, 2, 3, 4, 5);
      (fd::delegate<void (X *, int, int, int, int, int)>(&X::f5))(&x, 1, 2, 3, 4, 5);
      (fd::delegate<void (shared_ptr<X>, int, int, int, int, int)>(&X::f5))(sp, 1, 2, 3, 4, 5);

      (fd::delegate<void (X &, int, int, int, int, int)>(&X::g5))(x, 1, 2, 3, 4, 5);
      (fd::delegate<void (X const &, int, int, int, int, int)>(&X::g5))(rcx, 1, 2, 3, 4, 5);
      (fd::delegate<void (X *, int, int, int, int, int)>(&X::g5))(&x, 1, 2, 3, 4, 5);
      (fd::delegate<void (X const *, int, int, int, int, int)>(&X::g5))(pcx, 1, 2, 3, 4, 5);
      (fd::delegate<void (shared_ptr<X>, int, int, int, int, int)>(&X::g5))(sp, 1, 2, 3, 4, 5);

      (fd::delegate<void (X &, int, int, int, int, int, int)>(&X::f6))(x, 1, 2, 3, 4, 5, 6);
      (fd::delegate<void (X *, int, int, int, int, int, int)>(&X::f6))(&x, 1, 2, 3, 4, 5, 6);
      (fd::delegate<void (shared_ptr<X>, int, int, int, int, int, int)>(&X::f6))(sp, 1, 2, 3, 4, 5, 6);

      (fd::delegate<void (X &, int, int, int, int, int, int)>(&X::g6))(x, 1, 2, 3, 4, 5, 6);
      (fd::delegate<void (X const &, int, int, int, int, int, int)>(&X::g6))(rcx, 1, 2, 3, 4, 5, 6);
      (fd::delegate<void (X *, int, int, int, int, int, int)>(&X::g6))(&x, 1, 2, 3, 4, 5, 6);
      (fd::delegate<void (X const *, int, int, int, int, int, int)>(&X::g6))(pcx, 1, 2, 3, 4, 5, 6);
      (fd::delegate<void (shared_ptr<X>, int, int, int, int, int, int)>(&X::g6))(sp, 1, 2, 3, 4, 5, 6);

      (fd::delegate<void (X &, int, int, int, int, int, int, int)>(&X::f7))(x, 1, 2, 3, 4, 5, 6, 7);
      (fd::delegate<void (X *, int, int, int, int, int, int, int)>(&X::f7))(&x, 1, 2, 3, 4, 5, 6, 7);
      (fd::delegate<void (shared_ptr<X>, int, int, int, int, int, int, int)>(&X::f7))(sp, 1, 2, 3, 4, 5, 6, 7);

      (fd::delegate<void (X &, int, int, int, int, int, int, int)>(&X::g7))(x, 1, 2, 3, 4, 5, 6, 7);
      (fd::delegate<void (X const &, int, int, int, int, int, int, int)>(&X::g7))(rcx, 1, 2, 3, 4, 5, 6, 7);
      (fd::delegate<void (X *, int, int, int, int, int, int, int)>(&X::g7))(&x, 1, 2, 3, 4, 5, 6, 7);
      (fd::delegate<void (X const *, int, int, int, int, int, int, int)>(&X::g7))(pcx, 1, 2, 3, 4, 5, 6, 7);
      (fd::delegate<void (shared_ptr<X>, int, int, int, int, int, int, int)>(&X::g7))(sp, 1, 2, 3, 4, 5, 6, 7);

      (fd::delegate<void (X &, int, int, int, int, int, int, int, int)>(&X::f8))(x, 1, 2, 3, 4, 5, 6, 7, 8);
      (fd::delegate<void (X *, int, int, int, int, int, int, int, int)>(&X::f8))(&x, 1, 2, 3, 4, 5, 6, 7, 8);
      (fd::delegate<void (shared_ptr<X>, int, int, int, int, int, int, int, int)>(&X::f8))(sp, 1, 2, 3, 4, 5, 6, 7, 8);

      (fd::delegate<void (X &, int, int, int, int, int, int, int, int)>(&X::g8))(x, 1, 2, 3, 4, 5, 6, 7, 8);
      (fd::delegate<void (X const &, int, int, int, int, int, int, int, int)>(&X::g8))(rcx, 1, 2, 3, 4, 5, 6, 7, 8);
      (fd::delegate<void (X *, int, int, int, int, int, int, int, int)>(&X::g8))(&x, 1, 2, 3, 4, 5, 6, 7, 8);
      (fd::delegate<void (X const *, int, int, int, int, int, int, int, int)>(&X::g8))(pcx, 1, 2, 3, 4, 5, 6, 7, 8);
      (fd::delegate<void (shared_ptr<X>, int, int, int, int, int, int, int, int)>(&X::g8))(sp, 1, 2, 3, 4, 5, 6, 7, 8);

      detect_errors(x.hash == 17610 && sp->hash == 2155);
    }
}