From 50eba7c70e2d665ecb30510700338e784228439b Mon Sep 17 00:00:00 2001
From: das <das>
Date: Thu, 16 Mar 2006 09:56:46 +0000
Subject: missing statics revealed by 'make checkexports'

---
 generic/tclObj.c  | 4 ++--
 generic/tclProc.c | 4 ++--
 2 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/generic/tclObj.c b/generic/tclObj.c
index 2f59828..0522c17 100644
--- a/generic/tclObj.c
+++ b/generic/tclObj.c
@@ -12,7 +12,7 @@
  * See the file "license.terms" for information on usage and redistribution of
  * this file, and for a DISCLAIMER OF ALL WARRANTIES.
  *
- * RCS: @(#) $Id: tclObj.c,v 1.105 2006/03/10 17:05:06 dgp Exp $
+ * RCS: @(#) $Id: tclObj.c,v 1.106 2006/03/16 09:56:46 das Exp $
  */
 
 #include "tclInt.h"
@@ -214,7 +214,7 @@ static int		SetCmdNameFromAny(Tcl_Interp *interp, Tcl_Obj *objPtr);
  * implementations.
  */
 
-Tcl_ObjType oldBooleanType = {
+static Tcl_ObjType oldBooleanType = {
     "boolean",				/* name */
     NULL,				/* freeIntRepProc */
     NULL,				/* dupIntRepProc */
diff --git a/generic/tclProc.c b/generic/tclProc.c
index beb3d48..227c4fc 100644
--- a/generic/tclProc.c
+++ b/generic/tclProc.c
@@ -11,7 +11,7 @@
  * See the file "license.terms" for information on usage and redistribution of
  * this file, and for a DISCLAIMER OF ALL WARRANTIES.
  *
- * RCS: @(#) $Id: tclProc.c,v 1.88 2006/03/10 19:49:14 msofer Exp $
+ * RCS: @(#) $Id: tclProc.c,v 1.89 2006/03/16 09:56:46 das Exp $
  */
 
 #include "tclInt.h"
@@ -76,7 +76,7 @@ static Tcl_ObjType levelReferenceType = {
  * will execute within.
  */
 
-Tcl_ObjType lambdaType = {
+static Tcl_ObjType lambdaType = {
     "lambdaExpr",		/* name */
     FreeLambdaInternalRep,	/* freeIntRepProc */
     DupLambdaInternalRep,	/* dupIntRepProc */
-- 
cgit v0.12