Changeset 4828 for branches/1.3


Ignore:
Timestamp:
Dec 9, 2014 5:29:52 PM (10 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.

Location:
branches/1.3
Files:
1 added
2 edited

Legend:

Unmodified
Added
Removed

  • branches/1.3/gui/apps/launcher.tcl

    r4513 r4828  
    8484                }
    8585            }
     86            -simulate {
     87                # accept a driver.xml file and simulate it
     88                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 1
     93                }
     94                package require Rappture
     95                set langdir $Rappture::installdir
     96                set mainscript [file join $langdir scripts simulate.tcl]
     97                set reqpkgs ""
     98                set alist "-driver $driverxml"
     99                break
     100            }
    86101            default {
    87102                puts stderr "usage:"
    … …  
    89104                puts stderr "  rappture -builder ?-tool toolFile?"
    90105                puts stderr "  rappture -tester ?-auto? ?-tool toolFile? ?-testdir directory?"
     106                puts stderr "  rappture -simulate driverFile"
    91107                exit 1
    92108            }

  • branches/1.3/lang/tcl/scripts/Makefile.in

    r4514 r4828  
    4545                $(srcdir)/resources.tcl \
    4646                $(srcdir)/result.tcl \
     47                $(srcdir)/simulate.tcl \
    4748                $(srcdir)/task.tcl \
    4849                $(srcdir)/units.tcl \
Note: See TracChangeset for help on using the changeset viewer.