PL/Tcl: Fix compiler warnings with Tcl 8.6
authorPeter Eisentraut <peter_e@gmx.net>
Fri, 1 Feb 2013 03:08:53 +0000 (22:08 -0500)
committerPeter Eisentraut <peter_e@gmx.net>
Fri, 1 Feb 2013 03:08:53 +0000 (22:08 -0500)
Some constification was added in the Tcl APIs, so add the modifiers in
PL/Tcl as well.

src/pl/tcl/pltcl.c

index d329e9def813b18ac8f9262e4203354892db143d..c4d5fa170007ad573012a98b80f8560e6edaa8cc 100644 (file)
 #define CONST84
 #endif
 
+/* ... and for Tcl 8.6. */
+#ifndef CONST86
+#define CONST86
+#endif
+
 #include "access/htup_details.h"
 #include "access/xact.h"
 #include "catalog/pg_proc.h"
@@ -259,7 +264,7 @@ pltcl_FinalizeNotifier(ClientData clientData)
 }
 
 static void
-pltcl_SetTimer(Tcl_Time *timePtr)
+pltcl_SetTimer(CONST86 Tcl_Time *timePtr)
 {
 }
 
@@ -285,7 +290,7 @@ pltcl_ServiceModeHook(int mode)
 }
 
 static int
-pltcl_WaitForEvent(Tcl_Time *timePtr)
+pltcl_WaitForEvent(CONST86 Tcl_Time *timePtr)
 {
        return 0;
 }