diff options
Diffstat (limited to 'ds9/library/grid.tcl')
| -rw-r--r-- | ds9/library/grid.tcl | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/ds9/library/grid.tcl b/ds9/library/grid.tcl index 083127d..139f24b 100644 --- a/ds9/library/grid.tcl +++ b/ds9/library/grid.tcl @@ -1138,6 +1138,16 @@ proc GridBackup {ch which} { proc ProcessGridCmd {varname iname} { upvar $varname var + upvar $iname ii + + grid::YY_FLUSH_BUFFER + grid::yy_scan_string [lrange $var $ii end] + grid::yyparse + incr ii [expr $grid::yycnt-1] +} + +proc oProcessGridCmd {varname iname} { + upvar $varname var upvar $iname i global grid |