Changeset 4849 for branches/1.3/gui/apps
- Timestamp:
- Dec 11, 2014 7:35:35 PM (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/1.3/gui/apps/launcher.tcl
r4828 r4849 84 84 } 85 85 } 86 -simulate {87 # accept a driver.xml file and simulate it88 set driverxml [lindex $argv 0]89 set argv [lrange $argv 1 end]90 if {![file exists $driverxml]} {91 puts stderr "file not found: $driverxml"92 exit 193 }94 package require Rappture95 set langdir $Rappture::installdir96 set mainscript [file join $langdir scripts simulate.tcl]97 set reqpkgs ""98 set alist "-driver $driverxml"99 break100 }101 86 default { 102 87 puts stderr "usage:" … … 104 89 puts stderr " rappture -builder ?-tool toolFile?" 105 90 puts stderr " rappture -tester ?-auto? ?-tool toolFile? ?-testdir directory?" 106 puts stderr " rappture -simulate driverFile"107 91 exit 1 108 92 }
Note: See TracChangeset
for help on using the changeset viewer.