Changeset 745 for trunk/gui/scripts/analyzer.tcl

Timestamp:

May 18, 2007 11:55:33 AM (17 years ago)

Author:

mmc

Message:

Fix for a problem loading structures that showed up in the MOSFET tool.
Complex structures were taking really long to run because "reset" kept
getting called again and again. It is now called once, after idle.

File:

• trunk/gui/scripts/analyzer.tcl (modified) (3 diffs)

trunk/gui/scripts/analyzer.tcl

@@ -51 +51 @@
 
     public method simulate {args}
-    public method reset {}
+    public method reset {{when -eventually}}
     public method load {file}
     public method clear {}
@@ -406 +406 @@
 
 # ----------------------------------------------------------------------
-# USAGE: reset
+# USAGE: reset ?-eventually|-now?
 #
 # Used to reset the analyzer whenever the input to a simulation has
@@ -413 +413 @@
 # to "auto", the simulation is invoked immediately.
 # ----------------------------------------------------------------------
-itcl::body Rappture::Analyzer::reset {} {
+itcl::body Rappture::Analyzer::reset {{when -eventually}} {
+    if {$when == "-eventually"} {
+        after cancel [list catch [itcl::code $this reset -now]]
+        after idle [list catch [itcl::code $this reset -now]]
+        return
+    }
+
     # check to see if simulation is really needed
     $_tool sync