From 57777fb4243a2d388682ad80f9c4397499825cc0 Mon Sep 17 00:00:00 2001
From: Pat Thoyts <patthoyts@users.sourceforge.net>
Date: Fri, 11 Apr 2008 09:56:47 +0000
Subject: [PATCH] We need slightly different startup for a tclkit than for a
 stardll. Define KIT_DLL when building a stardll

git-svn-id: svn://svn.equi4.com/kitgen/trunk@4093 9e558909-932a-0410-a563-af77432da1eb
---
 kitInit.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/kitInit.c b/kitInit.c
index d791a73..3e96a97 100644
--- a/kitInit.c
+++ b/kitInit.c
@@ -227,12 +227,12 @@ TclKit_AppInit(Tcl_Interp *interp)
       	Tcl_DecrRefCount(evobjPtr);
     }
 
-#if 1 /* jcw's original code */
+#ifdef KIT_DLL
     TclSetPreInitScript(preInitCmd);
     if ((Tcl_EvalEx(interp, appInitCmd, -1, TCL_EVAL_GLOBAL) == TCL_ERROR)
            || (Tcl_Init(interp) == TCL_ERROR))
         goto error;
-#else /* what I am using */
+#else /* not a dll */
     TclSetPreInitScript(appInitCmd);
     if (Tcl_Init(interp) == TCL_ERROR)
         goto error;
-- 
2.23.0