1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23
// Build don't link: // GROUPS passed ptolemy-bugs class Tcl_Interp; class PTcl { public: PTcl(Tcl_Interp* interp = 0); ~PTcl(); int alias(int argc,char** argv); }; typedef int (PTcl::*InterpFuncP)(int,char**); struct InterpTableEntry { char* name; InterpFuncP func; }; static InterpTableEntry funcTable[] = { { "alias" , &PTcl::alias } , 0, 0 };