Changeset 76a56bf in tol
- Timestamp:
- Dec 5, 2010, 3:36:24 PM (16 years ago)
- Branches:
- 1941-docker-image-to-test, devel, master
- Children:
- 02aa1f2
- Parents:
- 4e9b5ad
- File:
-
- 1 edited
-
tolsh/tolsh.vfs/lib/app-tolsh/tolsh.tcl (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
tolsh/tolsh.vfs/lib/app-tolsh/tolsh.tcl
r4e9b5ad r76a56bf 269 269 } 270 270 271 #puts "starkit = [namespace exist ::starkit]" 272 #puts "topdir = [file dir $starkit::topdir]" 273 #puts "info script = [info script]" 274 #puts "starkit::startup = [starkit::startup]" 275 #puts "[ info commands starkit::* ]" 276 #puts "argv0 = $argv0" 277 271 278 proc ::tolsh::setup_pkg { pkg } { 272 279 if {[lsearch [package names] $pkg]==-1} { … … 460 467 461 468 puts "::tolsh::clone" 462 set tolsh [info nameofexecutable] 463 puts "exec shared" 464 exec $tolsh -shared & 469 set tolsh [list [info nameofexecutable] ] 470 if { $starkit::tolsh_mode ne "starpack" } { 471 lappend tolsh $::argv0 472 } 473 eval exec $tolsh -shared & 465 474 after 5000 ;# wait for data sharing are created by 'shared' 466 475 puts "exec slave" 467 e xec $tolsh -slave $options(server,port) &476 eval exec $tolsh -slave $options(server,port) & 468 477 } 469 478
Note: See TracChangeset
for help on using the changeset viewer.
