diff options
author | William Joye <wjoye@cfa.harvard.edu> | 2018-03-02 23:02:36 (GMT) |
---|---|---|
committer | William Joye <wjoye@cfa.harvard.edu> | 2018-03-02 23:02:36 (GMT) |
commit | a0458d71bf7875ac52952810693213c2ef7585dd (patch) | |
tree | a352f5d2250dfe35b08eac8c3f33847d0d4c2273 /ds9/parsers/zoomlex.fcl | |
parent | cc194ebc389108dc1cf02ee4500e0bb0106f36cd (diff) | |
download | blt-a0458d71bf7875ac52952810693213c2ef7585dd.zip blt-a0458d71bf7875ac52952810693213c2ef7585dd.tar.gz blt-a0458d71bf7875ac52952810693213c2ef7585dd.tar.bz2 |
add ds9 parsers
Diffstat (limited to 'ds9/parsers/zoomlex.fcl')
-rw-r--r-- | ds9/parsers/zoomlex.fcl | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/ds9/parsers/zoomlex.fcl b/ds9/parsers/zoomlex.fcl index 79ff034..11244ed 100644 --- a/ds9/parsers/zoomlex.fcl +++ b/ds9/parsers/zoomlex.fcl @@ -23,27 +23,27 @@ out {return $zoom::OUT_} to {return $zoom::TO_} # INT -[+-]?{D}+ {set zoom::yylval $yytext; return $zoom::INT_} +[+-]?{D}+ {set yylval $yytext; return $zoom::INT_} # REAL [+-]?{D}+"."?({E})? | -[+-]?{D}*"."{D}+({E})? {set zoom::yylval $yytext; return $zoom::REAL_} +[+-]?{D}*"."{D}+({E})? {set yylval $yytext; return $zoom::REAL_} # Quoted STRING -\"[^\"]*\" {set zoom::yylval [string range $yytext 1 end-1]; return $zoom::STRING_} +\"[^\"]*\" {set yylval [string range $yytext 1 end-1]; return $zoom::STRING_} # Quoted STRING -\'[^\']*\' {set zoom::yylval [string range $yytext 1 end-1]; return $zoom::STRING_} +\'[^\']*\' {set yylval [string range $yytext 1 end-1]; return $zoom::STRING_} # Quoted STRING -\{[^\}]*\} {set zoom::yylval [string range $yytext 1 end-1]; return $zoom::STRING_} +\{[^\}]*\} {set yylval [string range $yytext 1 end-1]; return $zoom::STRING_} # STRING -\S+\S+ {set zoom::yylval $yytext; return $zoom::STRING_} +\S+\S+ {set yylval $yytext; return $zoom::STRING_} \s # ignore whitespace -. {set zoom::yylval $yytext; return $zoom::yylval} +. {set yylval $yytext; return $yylval} %% |