Index: tcl/itcl2.0/tcl7.4/tclEnv.c
diff -c tcl/itcl2.0/tcl7.4/tclEnv.c:1.1 tcl/itcl2.0/tcl7.4/tclEnv.c:1.2
*** tcl/itcl2.0/tcl7.4/tclEnv.c:1.1	Thu May  9 12:51:33 1996
--- tcl/itcl2.0/tcl7.4/tclEnv.c	Tue Oct 22 14:32:48 1996
***************
*** 55,60 ****
--- 55,71 ----
  				 * original static state. */
  
  /*
+  * allan: 22.10.96: I hate to do this, but we just have to reset this 
+  * static variable or we can't use emacs unexec to generate a single
+  * binary. The variable has to be reset to the correct environment size. 
+  * Otherwise it thinks it has the environment it was compiled/created with...
+  */
+ void TclResetEnvironSize(int size)
+ {
+     environSize = size;
+ }
+ 
+ /*
   * Declarations for local procedures defined in this file:
   */