diff options
Diffstat (limited to 'gcc/testsuite/g++.old-deja/g++.brendan/ptolemy2.C')
-rw-r--r-- | gcc/testsuite/g++.old-deja/g++.brendan/ptolemy2.C | 69 |
1 files changed, 0 insertions, 69 deletions
diff --git a/gcc/testsuite/g++.old-deja/g++.brendan/ptolemy2.C b/gcc/testsuite/g++.old-deja/g++.brendan/ptolemy2.C deleted file mode 100644 index 58a10dcec90..00000000000 --- a/gcc/testsuite/g++.old-deja/g++.brendan/ptolemy2.C +++ /dev/null @@ -1,69 +0,0 @@ -// GROUPS passed ptolemy-bugs -#include <iostream.h> - -class PTcl { -public: - int dispatcher(int which,int argc,char** argv); - // fns in the table - int one(int argc, char** argv); - int two(int argc, char** argv); - int three(int argc, char** argv); -}; - -// An InterpFuncP is a pointer to an PTcl function that takes an argc-argv -// argument list and returns TCL_OK or TCL_ERROR. - -typedef int (PTcl::*InterpFuncP)(int,char**); - -struct InterpTableEntry { - char* name; - InterpFuncP func; -}; - -// Here is the function table and dispatcher function. -// These macros define entries for the table - -#define quote(x) #x -#define ENTRY(verb) { quote(verb), &PTcl::verb } - -static InterpTableEntry funcTable[] = { - ENTRY(one), - ENTRY(two), - ENTRY(three), - {0, 0} -}; - -int PTcl::dispatcher(int which, int argc, char** argv) { - return (this->*(funcTable[which].func))(argc, argv); -} - -void printargs(char** argv) { -// while (*argv) { -// cout << " " << *argv++; -// } -// cout << "\n"; -} - -int PTcl::one(int, char** argv) { - cout << "FAIL\n"; - printargs(argv); - return 0; -} - -int PTcl::two(int, char** argv) { - cout << "PASS\n"; - printargs(argv); - return 0; -} - -int PTcl::three(int, char** argv) { - cout << "FAIL\n"; - printargs(argv); - return 0; -} - -int main (int argc, char** argv) { - PTcl obj; - obj.dispatcher(1,argc,argv); - return 0; -} |