summaryrefslogtreecommitdiffstats
path: root/ds9/parsers/skyviewparser.tac
diff options
context:
space:
mode:
authorWilliam Joye <wjoye@cfa.harvard.edu>2018-06-06 18:07:24 (GMT)
committerWilliam Joye <wjoye@cfa.harvard.edu>2018-06-06 18:07:24 (GMT)
commit8e62e66228010ae69109692ecf8ddeba4bfc979f (patch)
treeffdc35c19d69fe337fd94526b711e8987d363bc9 /ds9/parsers/skyviewparser.tac
parent2a954e3b3b7fa383a1f4ccd3c0f97118097a1e19 (diff)
downloadblt-8e62e66228010ae69109692ecf8ddeba4bfc979f.zip
blt-8e62e66228010ae69109692ecf8ddeba4bfc979f.tar.gz
blt-8e62e66228010ae69109692ecf8ddeba4bfc979f.tar.bz2
update ds9 parsers
Diffstat (limited to 'ds9/parsers/skyviewparser.tac')
-rw-r--r--ds9/parsers/skyviewparser.tac25
1 files changed, 14 insertions, 11 deletions
diff --git a/ds9/parsers/skyviewparser.tac b/ds9/parsers/skyviewparser.tac
index e44ffe2..fecc723 100644
--- a/ds9/parsers/skyviewparser.tac
+++ b/ds9/parsers/skyviewparser.tac
@@ -25,19 +25,22 @@ command : skyview
skyview : {IMGSVRApply dskyview 1}
| OPEN_ {}
| CLOSE_ {ARDestroy dskyview}
- | STRING_ {IMGSVRCmdName dskyview $1}
- | NAME_ STRING_ {IMGSVRCmdName dskyview $2}
- | SIZE_ numeric numeric sizeOpt {IMGSVRCmdSize dskyview $2 $3 $4}
- | PIXELS_ numeric numeric {IMGSVRCmdPixels dskyview $2 $3}
- | SAVE_ yesno {IMGSVRCmd dskyview save $2}
- | FRAME_ frame {IMGSVRCmd dskyview mode $2}
- | SURVEY_ STRING_ {IMGSVRCmd dskyview survey $2}
+ | STRING_ {ProcessCmdSet dskyview name $1 "IMGSVRApply dskyview 1"}
+ | NAME_ CLEAR_ {ProcessCmdSet dskyview name {}}
+ | NAME_ STRING_ {ProcessCmdSet dskyview name $2 "IMGSVRApply dskyview 1"}
+ | SIZE_ numeric numeric sizeOpt
+ {ProcessCmdSet4 dskyview width $2 height $3 rformat $4 rformat,msg $4}
+ | PIXELS_ numeric numeric {ProcessCmdSet2 dskyview width,pixels $2 height,pixels $3}
+ | SAVE_ yesno {ProcessCmdSet dskyview save $2}
+ | FRAME_ frame {ProcessCmdSet dskyview mode $2}
+ | SURVEY_ STRING_ {ProcessCmdSet dskyview survey $2}
| UPDATE_ update
- | numeric numeric coordOpt {IMGSVRCmdCoord dskyview $1 $2 degrees}
- | SEXSTR_ SEXSTR_ coordOpt {IMGSVRCmdCoord dskyview $1 $2 sexagesimal}
- | COORD_ numeric numeric deg {IMGSVRCmdCoord dskyview $2 $3 $4}
- | COORD_ SEXSTR_ SEXSTR_ sex {IMGSVRCmdCoord dskyview $2 $3 $4}
+ | numeric numeric deg {ProcessCmdSet4 dskyview x $1 y $2 skyformat $3 skyformat,msg $3 "IMGSVRApply dskyview 1"}
+ | SEXSTR_ SEXSTR_ sex {ProcessCmdSet4 dskyview x $1 y $2 skyformat $3 skyformat,msg $3 "IMGSVRApply dskyview 1"}
+ # backward compatibility
+ | COORD_ numeric numeric deg {ProcessCmdSet4 dskyview x $2 y $3 skyformat $4 skyformat,msg $4 "IMGSVRApply dskyview 1"}
+ | COORD_ SEXSTR_ SEXSTR_ sex {ProcessCmdSet4 dskyview x $2 y $3 skyformat $4 skyformat,msg $4 "IMGSVRApply dskyview 1"}
;
update : FRAME_ {IMGSVRCmdUpdate dskyview}