1 files changed, 76 insertions, 0 deletions
diff --git a/ds9/parsers/viewsendparser.tac b/ds9/parsers/viewsendparser.tac
new file mode 100644
index 0000000..e39b556
--- /dev/null
+++ b/ds9/parsers/viewsendparser.tac
@@ -0,0 +1,76 @@
+%{
+%}
+
+#include coords.tin
+#include string.tin
+
+%start viewsend
+
+%token BUTTONS_
+%token COLORBAR_
+%token COLORBARNUMERICS_
+%token FILENAME_
+%token FRAME_
+%token GRAPH_
+%token HORIZONTAL_
+%token HORZGRAPH_
+%token INFO_
+%token KEYWORD_
+%token KEYVALUE_
+%token LAYOUT_
+%token LOWHIGH_
+%token MAGNIFIER_
+%token MINMAX_
+%token OBJECT_
+%token PANNER_
+%token UNITS_
+%token VERTGRAPH_
+%token VERTICAL_
+
+%%
+
+#include coords.trl
+
+viewsend :
+ | LAYOUT_ {ProcessSendCmdGet view layout}
+ | KEYVALUE_ {ProcessSendCmdGet view info,keyvalue}
+ | INFO_ {ProcessSendCmdYesNo view info}
+ | PANNER_ {ProcessSendCmdYesNo view panner}
+ | MAGNIFIER_ {ProcessSendCmdYesNo view magnifier}
+ | BUTTONS_ {ProcessSendCmdYesNo view buttons}
+ | COLORBAR_ {ProcessSendCmdYesNo view colorbar}
+# backward compatibility
+ | COLORBARNUMERICS_ {ProcessSendCmdYesNo colorbar numerics}
+ | GRAPH_ graph
+# backward compatibility
+ | HORZGRAPH_ {ProcessSendCmdYesNo view graph,horz}
+# backward compatibility
+ | VERTGRAPH_ {ProcessSendCmdYesNo view graph,graph}
+
+ | FILENAME_ {ProcessSendCmdYesNo view info,filename}
+ | OBJECT_ {ProcessSendCmdYesNo view info,object}
+ | KEYWORD_ {ProcessSendCmdYesNo view info,keyword}
+ | MINMAX_ {ProcessSendCmdYesNo view info,minmax}
+ | LOWHIGH_ {ProcessSendCmdYesNo view info,lowhigh}
+ | UNITS_ {ProcessSendCmdYesNo view info,bunit}
+
+ | coordsys {ProcessSendCmdYesNo view info,$1}
+ | wcssys {ProcessSendCmdYesNo view info,$1}
+
+ | FRAME_ {ProcessSendCmdYesNo view info,frame}
+ ;
+
+graph :
+ | HORIZONTAL_ {ProcessSendCmdYesNo view graph,horz}
+ | VERTICAL_ {ProcessSendCmdYesNo view graph,vert}
+ ;
+
+%%
+
+proc viewsend::yyerror {msg} {
+     variable yycnt
+     variable yy_current_buffer
+     variable index_
+
+     ParserError $msg $yycnt $yy_current_buffer $index_
+}