Click here to Skip to main content
15,881,089 members
Articles / Programming Languages / C++

Fast C++ Delegate: Boost.Function 'drop-in' replacement and multicast

Rate me:
Please Sign up or sign in to vote.
4.86/5 (51 votes)
1 Jun 200733 min read 291.3K   1.9K   110  
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<> + __fastcall (member functions)
//  , modified from mem_fn_fastcall_test.cpp - a test for boost::mem_fn.hpp + __fastcall
//
//  Copyright (c) 2002 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)
//

#define BOOST_MEM_FN_ENABLE_FASTCALL

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

#define FD_MEM_FN_ENABLE_FASTCALL

#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 __fastcall f0() { f1(17); }
    void __fastcall g0() const { g1(17); }

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

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

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

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

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

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

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

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

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;

      shared_ptr<X> sp(new X);

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

By viewing downloads associated with this article you agree to the Terms of Service and the article's licence.

If a file you wish to view isn't highlighted, and is a text file (not binary), please let us know and we'll add colourisation support for it.

License

This article has no explicit license attached to it but may contain usage terms in the article text or the download files themselves. If in doubt please contact the author via the discussion board below.

A list of licenses authors might use can be found here


Written By
Other
Canada Canada
This member has not yet provided a Biography. Assume it's interesting and varied, and probably something to do with programming.

Comments and Discussions