ds9/parsers/string.fin


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

# Quoted STRING
\"[^\"]*\" {set yylval [string range $yytext 1 end-1]; return $STRING_}

# Quoted STRING
\'[^\']*\' {set yylval [string range $yytext 1 end-1]; return $STRING_}

# Quoted STRING
\{[^\}]*\} {set yylval [string range $yytext 1 end-1]; return $STRING_}

# STRING
\S+\S+ {set yylval $yytext; return $STRING_}

\s        # ignore whitespace

.	  {set yylval $yytext; return $yylval}