methods_v.h

cpptcl library for ns2

};

template <class C, typename R, typename T1, typename T2, typename T3,
     typename T4, typename T5>
class method6<C, R, T1, T2, T3, T4, T5, object const &>
     : public object_cmd_base
{
     typedef object const & T6;
     typedef R (C::*mem_type)(T1, T2, T3, T4, T5, T6);
     typedef R (C::*cmem_type)(T1, T2, T3, T4, T5, T6) const;
     enum { var_start = 7 };
     
public:
     method6(mem_type f) : f_(f), cmem_(false) {}
     method6(cmem_type f) : cf_(f), cmem_(true) {}
     
     virtual void invoke(void *pv, Tcl_Interp *interp,
          int objc, Tcl_Obj * CONST objv[], policies const &pol)
     {
          C *p = static_cast<C*>(pv);

          object t6 = get_var_params(interp, objc, objv, var_start, pol);

          if (cmem_)
          {
               dispatch<R>::template do_dispatch<T1, T2, T3, T4, T5, T6>(
                    interp, boost::bind(cf_, p, _1, _2, _3, _4, _5, _6),
                    tcl_cast<T1>::from(interp, objv[2]),
                    tcl_cast<T2>::from(interp, objv[3]),
                    tcl_cast<T3>::from(interp, objv[4]),
                    tcl_cast<T4>::from(interp, objv[5]),
                    tcl_cast<T5>::from(interp, objv[6]),
                    t6);
          }
          else
          {
               dispatch<R>::template do_dispatch<T1, T2, T3, T4, T5, T6>(
                    interp, boost::bind(f_, p, _1, _2, _3, _4, _5, _6),
                    tcl_cast<T1>::from(interp, objv[2]),
                    tcl_cast<T2>::from(interp, objv[3]),
                    tcl_cast<T3>::from(interp, objv[4]),
                    tcl_cast<T4>::from(interp, objv[5]),
                    tcl_cast<T5>::from(interp, objv[6]),
                    t6);
          }
     }

private:
     mem_type f_;
     cmem_type cf_;
     bool cmem_;
};

template <class C, typename R, typename T1, typename T2, typename T3,
     typename T4, typename T5, typename T6>
class method7<C, R, T1, T2, T3, T4, T5, T6, object const &>
     : public object_cmd_base
{
     typedef object const & T7;
     typedef R (C::*mem_type)(T1, T2, T3, T4, T5, T6, T7);
     typedef R (C::*cmem_type)(T1, T2, T3, T4, T5, T6, T7) const;
     enum { var_start = 8 };
     
public:
     method7(mem_type f) : f_(f), cmem_(false) {}
     method7(cmem_type f) : cf_(f), cmem_(true) {}
     
     virtual void invoke(void *pv, Tcl_Interp *interp,
          int objc, Tcl_Obj * CONST objv[], policies const &pol)
     {
          C *p = static_cast<C*>(pv);

          object t7 = get_var_params(interp, objc, objv, var_start, pol);

          if (cmem_)
          {
               dispatch<R>::template do_dispatch<T1, T2, T3, T4, T5, T6, T7>(
                    interp, boost::bind(cf_, p, _1, _2, _3, _4, _5, _6, _7),
                    tcl_cast<T1>::from(interp, objv[2]),
                    tcl_cast<T2>::from(interp, objv[3]),
                    tcl_cast<T3>::from(interp, objv[4]),
                    tcl_cast<T4>::from(interp, objv[5]),
                    tcl_cast<T5>::from(interp, objv[6]),
                    tcl_cast<T6>::from(interp, objv[7]),
                    t7);
          }
          else
          {
               dispatch<R>::template do_dispatch<T1, T2, T3, T4, T5, T6, T7>(
                    interp, boost::bind(f_, p, _1, _2, _3, _4, _5, _6, _7),
                    tcl_cast<T1>::from(interp, objv[2]),
                    tcl_cast<T2>::from(interp, objv[3]),
                    tcl_cast<T3>::from(interp, objv[4]),
                    tcl_cast<T4>::from(interp, objv[5]),
                    tcl_cast<T5>::from(interp, objv[6]),
                    tcl_cast<T6>::from(interp, objv[7]),
                    t7);
          }
     }

private:
     mem_type f_;
     cmem_type cf_;
     bool cmem_;
};

template <class C, typename R, typename T1, typename T2, typename T3,
     typename T4, typename T5, typename T6, typename T7>
class method8<C, R, T1, T2, T3, T4, T5, T6, T7, object const &>
     : public object_cmd_base
{
     typedef object const & T8;
     typedef R (C::*mem_type)(T1, T2, T3, T4, T5, T6, T7, T8);
     typedef R (C::*cmem_type)(T1, T2, T3, T4, T5, T6, T7, T8) const;
     enum { var_start = 9 };
     
public:
     method8(mem_type f) : f_(f), cmem_(false) {}
     method8(cmem_type f) : cf_(f), cmem_(true) {}
     
     virtual void invoke(void *pv, Tcl_Interp *interp,
          int objc, Tcl_Obj * CONST objv[], policies const &pol)
     {
          C *p = static_cast<C*>(pv);

          object t8 = get_var_params(interp, objc, objv, var_start, pol);

          if (cmem_)
          {
               dispatch<R>::template do_dispatch<
                    T1, T2, T3, T4, T5, T6, T7, T8>(
                    interp, boost::bind(cf_, p,
                         _1, _2, _3, _4, _5, _6, _7, _8),
                    tcl_cast<T1>::from(interp, objv[2]),
                    tcl_cast<T2>::from(interp, objv[3]),
                    tcl_cast<T3>::from(interp, objv[4]),
                    tcl_cast<T4>::from(interp, objv[5]),
                    tcl_cast<T5>::from(interp, objv[6]),
                    tcl_cast<T6>::from(interp, objv[7]),
                    tcl_cast<T7>::from(interp, objv[8]),
                    t8);
          }
          else
          {
               dispatch<R>::template do_dispatch<
                    T1, T2, T3, T4, T5, T6, T7, T8>(
                    interp, boost::bind(f_, p,
                         _1, _2, _3, _4, _5, _6, _7, _8),
                    tcl_cast<T1>::from(interp, objv[2]),
                    tcl_cast<T2>::from(interp, objv[3]),
                    tcl_cast<T3>::from(interp, objv[4]),
                    tcl_cast<T4>::from(interp, objv[5]),
                    tcl_cast<T5>::from(interp, objv[6]),
                    tcl_cast<T6>::from(interp, objv[7]),
                    tcl_cast<T7>::from(interp, objv[8]),
                    t8);
          }
     }

private:
     mem_type f_;
     cmem_type cf_;
     bool cmem_;
};

template <class C, typename R, typename T1, typename T2, typename T3,
     typename T4, typename T5, typename T6, typename T7, typename T8>
class method9<C, R, T1, T2, T3, T4, T5, T6, T7, T8, object const &>
     : public object_cmd_base
{
     typedef object const & T9;
     typedef R (C::*mem_type)(T1, T2, T3, T4, T5, T6, T7, T8, T9);
     typedef R (C::*cmem_type)(T1, T2, T3, T4, T5, T6, T7, T8, T9) const;
     enum { var_start = 10 };
     
public:
     method9(mem_type f) : f_(f), cmem_(false) {}
     method9(cmem_type f) : cf_(f), cmem_(true) {}
     
     virtual void invoke(void *pv, Tcl_Interp *interp,
          int objc, Tcl_Obj * CONST objv[], policies const &pol)
     {
          C *p = static_cast<C*>(pv);

          object t9 = get_var_params(interp, objc, objv, var_start, pol);

          if (cmem_)
          {
               dispatch<R>::template do_dispatch<
                    T1, T2, T3, T4, T5, T6, T7, T8, T9>(
                    interp, boost::bind(cf_, p,
                         _1, _2, _3, _4, _5, _6, _7, _8, _9),
                    tcl_cast<T1>::from(interp, objv[2]),
                    tcl_cast<T2>::from(interp, objv[3]),
                    tcl_cast<T3>::from(interp, objv[4]),
                    tcl_cast<T4>::from(interp, objv[5]),
                    tcl_cast<T5>::from(interp, objv[6]),
                    tcl_cast<T6>::from(interp, objv[7]),
                    tcl_cast<T7>::from(interp, objv[8]),
                    tcl_cast<T8>::from(interp, objv[9]),
                    t9);
          }
          else
          {
               dispatch<R>::template do_dispatch<
                    T1, T2, T3, T4, T5, T6, T7, T8, T9>(
                    interp, boost::bind(f_, p,
                         _1, _2, _3, _4, _5, _6, _7, _8, _9),
                    tcl_cast<T1>::from(interp, objv[2]),
                    tcl_cast<T2>::from(interp, objv[3]),
                    tcl_cast<T3>::from(interp, objv[4]),
                    tcl_cast<T4>::from(interp, objv[5]),
                    tcl_cast<T5>::from(interp, objv[6]),
                    tcl_cast<T6>::from(interp, objv[7]),
                    tcl_cast<T7>::from(interp, objv[8]),
                    tcl_cast<T8>::from(interp, objv[9]),
                    t9);
          }
     }

private:
     mem_type f_;
     cmem_type cf_;
     bool cmem_;
};