Changeset 4828 for branches/1.3/gui/apps

Timestamp:

Dec 9, 2014 5:29:52 PM (9 years ago)

Author:

dkearney

Message:

adding a -simulate flag to rappture command.

rappture -simulate <driverFile>

accepts a driver.xml file and silently runs a simulation, returning a run.xml file.

File:

• branches/1.3/gui/apps/launcher.tcl (modified) (2 diffs)

branches/1.3/gui/apps/launcher.tcl

@@ -84 +84 @@
                 }
             }
+            -simulate {
+                # accept a driver.xml file and simulate it
+                set driverxml [lindex $argv 0]
+                set argv [lrange $argv 1 end]
+                if {![file exists $driverxml]} {
+                    puts stderr "file not found: $driverxml"
+                    exit 1
+                }
+                package require Rappture
+                set langdir $Rappture::installdir
+                set mainscript [file join $langdir scripts simulate.tcl]
+                set reqpkgs ""
+                set alist "-driver $driverxml"
+                break
+            }
             default {
                 puts stderr "usage:"
@@ -89 +104 @@
                 puts stderr "  rappture -builder ?-tool toolFile?"
                 puts stderr "  rappture -tester ?-auto? ?-tool toolFile? ?-testdir directory?"
+                puts stderr "  rappture -simulate driverFile"
                 exit 1
             }