From: Matthew Fernandez <matthew.fernandez@gmail.com>
Date: Fri, 6 May 2022 00:21:52 +0000 (-0700)
Subject: tclpkg: mark 'gdCmd' static
X-Git-Tag: 4.0.0~41^2~3
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=4c98a27cc0c4f249ad791e52f9472907f111e8d8;p=graphviz

tclpkg: mark 'gdCmd' static

This function is not used outside of its containing file.
---

diff --git a/tclpkg/gdtclft/gdtclft.c b/tclpkg/gdtclft/gdtclft.c
index 87cbb71d9..36cfa1623 100644
--- a/tclpkg/gdtclft/gdtclft.c
+++ b/tclpkg/gdtclft/gdtclft.c
@@ -339,10 +339,8 @@ static int tclGd_GetColor(Tcl_Interp * interp, Tcl_Obj * obj, int *color)
  * 		in copying from srcw x srch to destw x desth.
  * 
  */
-int
-gdCmd(ClientData clientData, Tcl_Interp * interp,
-      int argc, Tcl_Obj * CONST objv[])
-{
+static int gdCmd(ClientData clientData, Tcl_Interp *interp, int argc,
+                 Tcl_Obj *CONST objv[]) {
     unsigned int argi;
     size_t subi;
     /* Check for subcommand. */