ERR: Fix for borland in generated code. vtkCommand is ambiguously both a function and a class.

This commit is contained in:
Brad King 2002-09-06 18:05:06 -04:00
parent 2905892334
commit a4eebcb5b1

View File

@ -249,6 +249,10 @@ bool cmVTKWrapTclCommand::WriteInit(const char *kitName,
fprintf(fout,"\nTcl_HashTable vtkInstanceLookup;\n");
fprintf(fout,"Tcl_HashTable vtkPointerLookup;\n");
fprintf(fout,"Tcl_HashTable vtkCommandLookup;\n");
fprintf(fout,"int vtkCommandForward(ClientData cd, Tcl_Interp *interp,\n"
" int argc, char *argv[]){\n"
" return vtkCommand(cd, interp, argc, argv);\n"
"}\n");
}
else
{
@ -308,7 +312,7 @@ bool cmVTKWrapTclCommand::WriteInit(const char *kitName,
/* create special vtkCommand command */
fprintf(fout," Tcl_CreateCommand(interp,(char *) \"vtkCommand\",\n"
" reinterpret_cast<vtkTclCommandType>(vtkCommand),\n"
" reinterpret_cast<vtkTclCommandType>(vtkCommandForward),\n"
" (ClientData *)NULL, NULL);\n\n");
}