From e7e3cedcbde855a2f22ee9eb830b62c45b543836 Mon Sep 17 00:00:00 2001
From: Steve Bennett <steveb@workware.net.au>
Date: Tue, 12 Jul 2011 09:02:32 +1000
Subject: Add tcl_platform(pathSeparator)

Tcl compatible.
Also move jimsh initialisation script into initjimsh.tcl

Signed-off-by: Steve Bennett <steveb@workware.net.au>
---
 make-bootstrap-jim | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'make-bootstrap-jim')

diff --git a/make-bootstrap-jim b/make-bootstrap-jim
index a7b81b2..2d8595f 100755
--- a/make-bootstrap-jim
+++ b/make-bootstrap-jim
@@ -40,7 +40,7 @@ EOF
 }
 
 cexts="aio readdir regexp file exec clock array"
-tclexts="bootstrap glob stdlib tclcompat"
+tclexts="bootstrap initjimsh glob stdlib tclcompat"
 
 # Note ordering
 allexts="bootstrap aio readdir glob regexp file exec clock array stdlib tclcompat"
@@ -62,11 +62,13 @@ cat <<EOF
 #if defined(__MINGW32__)
 #define TCL_PLATFORM_OS "mingw"
 #define TCL_PLATFORM_PLATFORM "windows"
+#define TCL_PLATFORM_PATH_SEPARATOR ";"
 #define HAVE_MKDIR_ONE_ARG
 #define HAVE_SYSTEM
 #else
 #define TCL_PLATFORM_OS "unknown"
 #define TCL_PLATFORM_PLATFORM "unix"
+#define TCL_PLATFORM_PATH_SEPARATOR ":"
 #define HAVE_VFORK
 #define HAVE_WAITPID
 #endif
-- 
cgit v1.1