diff options
Diffstat (limited to 'ds9/parsers/sourceparser.tac')
-rw-r--r-- | ds9/parsers/sourceparser.tac | 25 |
1 files changed, 25 insertions, 0 deletions
diff --git a/ds9/parsers/sourceparser.tac b/ds9/parsers/sourceparser.tac new file mode 100644 index 0000000..4ae5b8a --- /dev/null +++ b/ds9/parsers/sourceparser.tac @@ -0,0 +1,25 @@ +%{ +%} + +#include string.tin + +%start command + +%% + +command : source + | source {yyclearin; YYACCEPT} STRING_ + ; + +source : STRING_ {SourceCmd $1} + ; + +%% + +proc source::yyerror {msg} { + variable yycnt + variable yy_current_buffer + variable index_ + + ParserError $msg $yycnt $yy_current_buffer $index_ +} |