From 8dd16025746bc3c8baa2f6361d17aead15a2d913 Mon Sep 17 00:00:00 2001
From: Will Schroeder <will.schroeder@kitware.com>
Date: Thu, 25 Jul 2002 16:25:39 -0400
Subject: [PATCH] fixed warning

---
 Source/cmVTKWrapTclCommand.cxx | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/Source/cmVTKWrapTclCommand.cxx b/Source/cmVTKWrapTclCommand.cxx
index 9c808b0e7..03e213ac0 100644
--- a/Source/cmVTKWrapTclCommand.cxx
+++ b/Source/cmVTKWrapTclCommand.cxx
@@ -237,7 +237,10 @@ bool cmVTKWrapTclCommand::WriteInit(const char *kitName,
   
   if (!strcmp(kitName,"Vtkcommontcl"))
     {
-    fprintf(fout,"int vtkCommand(ClientData cd, Tcl_Interp *interp,\n             int argc, char *argv[]);\n");
+    fprintf(fout,"extern \"C\" {\n"
+                 "  int vtkCommand(ClientData cd, Tcl_Interp *interp,\n"
+                 "                 int argc, char *argv[]);\n"
+                 "}\n");
     fprintf(fout,"\nTcl_HashTable vtkInstanceLookup;\n");
     fprintf(fout,"Tcl_HashTable vtkPointerLookup;\n");
     fprintf(fout,"Tcl_HashTable vtkCommandLookup;\n");