diff options
Diffstat (limited to 'ds9/parsers/dssesoparser.tac')
-rw-r--r-- | ds9/parsers/dssesoparser.tac | 23 |
1 files changed, 13 insertions, 10 deletions
diff --git a/ds9/parsers/dssesoparser.tac b/ds9/parsers/dssesoparser.tac index 9a830f1..810990f 100644 --- a/ds9/parsers/dssesoparser.tac +++ b/ds9/parsers/dssesoparser.tac @@ -28,18 +28,21 @@ command : dsseso dsseso : {IMGSVRApply deso 1} | OPEN_ {} | CLOSE_ {ARDestroy deso} - | STRING_ {IMGSVRCmdName deso $1} - | NAME_ STRING_ {IMGSVRCmdName deso $2} - | SIZE_ numeric numeric sizeOpt {IMGSVRCmdSize deso $2 $3 $4} - | SAVE_ yesno {IMGSVRCmd deso save $2} - | FRAME_ frame {IMGSVRCmd deso mode $2} - | SURVEY_ survey {IMGSVRCmd deso survey $2} + | STRING_ {ProcessCmdSet deso name $1 "IMGSVRApply deso 1"} + | NAME_ CLEAR_ {ProcessCmdSet deso name {}} + | NAME_ STRING_ {ProcessCmdSet deso name $2 "IMGSVRApply deso 1"} + | SIZE_ numeric numeric sizeOpt + {ProcessCmdSet4 deso width $2 height $3 rformat $4 rformat,msg $4} + | SAVE_ yesno {ProcessCmdSet deso save $2} + | FRAME_ frame {ProcessCmdSet deso mode $2} + | SURVEY_ survey {ProcessCmdSet deso survey $2} | UPDATE_ update - | numeric numeric coordOpt {IMGSVRCmdCoord deso $1 $2 degrees} - | SEXSTR_ SEXSTR_ coordOpt {IMGSVRCmdCoord deso $1 $2 sexagesimal} - | COORD_ numeric numeric deg {IMGSVRCmdCoord deso $2 $3 $4} - | COORD_ SEXSTR_ SEXSTR_ sex {IMGSVRCmdCoord deso $2 $3 $4} + | numeric numeric deg {ProcessCmdSet4 deso x $1 y $2 skyformat $3 skyformat,msg $3 "IMGSVRApply deso 1"} + | SEXSTR_ SEXSTR_ sex {ProcessCmdSet4 deso x $1 y $2 skyformat $3 skyformat,msg $3 "IMGSVRApply deso 1"} + # backward compatibility + | COORD_ numeric numeric deg {ProcessCmdSet4 deso x $2 y $3 skyformat $4 skyformat,msg $4 "IMGSVRApply deso 1"} + | COORD_ SEXSTR_ SEXSTR_ sex {ProcessCmdSet4 deso x $2 y $3 skyformat $4 skyformat,msg $4 "IMGSVRApply deso 1"} ; update : FRAME_ {IMGSVRCmdUpdate deso} |