summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorsuresh <suresh>1998-07-01 14:53:20 (GMT)
committersuresh <suresh>1998-07-01 14:53:20 (GMT)
commite00df2e46ecfb6872608e2cb3d482fb10d4e32ef (patch)
tree3ebff5f2907ae72844f411d1d3a7fa002fa226b3
parentc68f9173d1be5c1bc8338183ad3f9e1498df85f7 (diff)
downloadtcl-e00df2e46ecfb6872608e2cb3d482fb10d4e32ef.zip
tcl-e00df2e46ecfb6872608e2cb3d482fb10d4e32ef.tar.gz
tcl-e00df2e46ecfb6872608e2cb3d482fb10d4e32ef.tar.bz2
Added extern definition of variable 'tclAlternateInitScript' which is defined
in the file(s) "<platform>/tcl<platform>Init.c".
-rw-r--r--generic/tclInt.h9
1 files changed, 9 insertions, 0 deletions
diff --git a/generic/tclInt.h b/generic/tclInt.h
index 83fd3d9..749ea1b 100644
--- a/generic/tclInt.h
+++ b/generic/tclInt.h
@@ -1242,6 +1242,15 @@ extern long tclObjsFreed;
extern char * tclEmptyStringRep;
/*
+ * A pointer to a string that holds an alternate initialization script to the
+ * built-in initialization script defined in the file "generic/tclInitScript.h".
+ * The Tcl_Init() routine will evaluate this script if it contains a non-NULL
+ * value.
+ */
+
+extern char * tclAlternateInitScript;
+
+/*
*----------------------------------------------------------------
* Procedures shared among Tcl modules but not used by the outside
* world: