aboutsummaryrefslogtreecommitdiff
path: root/gcc/testsuite/g++.old-deja/g++.brendan/ptolemy2.C
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/testsuite/g++.old-deja/g++.brendan/ptolemy2.C')
-rw-r--r--gcc/testsuite/g++.old-deja/g++.brendan/ptolemy2.C70
1 files changed, 1 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
index ca9c21c2814..c141c7c16da 100644
--- a/gcc/testsuite/g++.old-deja/g++.brendan/ptolemy2.C
+++ b/gcc/testsuite/g++.old-deja/g++.brendan/ptolemy2.C
@@ -1,69 +1 @@
-// 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;
-}
-
-main (int argc, char** argv) {
- PTcl obj;
- obj.dispatcher(1,argc,argv);
- return 0;
-}
+int main (int argc, char** argv) {