diff options
author | William Joye <wjoye@cfa.harvard.edu> | 2018-06-18 19:16:39 (GMT) |
---|---|---|
committer | William Joye <wjoye@cfa.harvard.edu> | 2018-06-18 19:16:39 (GMT) |
commit | 5f4cbb5973a88ddd0124660108f220bf297b69ba (patch) | |
tree | 030017201b449998a1db6ea56bedbc08606b1a5e /ds9/library/iis.tcl | |
parent | f503c9ee3374f07764864b5db1f8dc6eab10f43a (diff) | |
download | blt-5f4cbb5973a88ddd0124660108f220bf297b69ba.zip blt-5f4cbb5973a88ddd0124660108f220bf297b69ba.tar.gz blt-5f4cbb5973a88ddd0124660108f220bf297b69ba.tar.bz2 |
add ds9 iis send parser
Diffstat (limited to 'ds9/library/iis.tcl')
-rw-r--r-- | ds9/library/iis.tcl | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/ds9/library/iis.tcl b/ds9/library/iis.tcl index 091861d..837a6ed 100644 --- a/ds9/library/iis.tcl +++ b/ds9/library/iis.tcl @@ -375,6 +375,15 @@ proc IISCmd {filename {which {}}} { } proc ProcessSendIISCmd {proc id param {sock {}} {fn {}}} { + global parse + set parse(proc) $proc + set parse(id) $id + + iissend::YY_FLUSH_BUFFER + iissend::yy_scan_string $param + iissend::yyparse + return + global current switch -- [string tolower [lindex $param 0]] { |