##########################################################################
##                                                                      ##
##  I N T E R S T E L L A R   C O N S O L E   Exec Iscserv              ##
##                                                                      ##
##            Copyright (C) 2025- Misato Observatory, Wakayama, Japan   ##
##                                                                      ##
##  This software is available under the GPL (General Public License)   ##
##                                                                      ##
##########################################################################

set v [info patchlevel]
puts "Tcl version is $v."

set this_pid [pid]

catch {exec taskkill /F /im tclsh.exe /fi "PID ne $this_pid" 2>@1} ret

after 1000

exec -ignorestderr cmd.exe /c start /min tclsh.exe iscserv.tcl 8091 &

