ds9/parsers/xpafirstlex.fcl


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25

#tab xpaparser.tab.tcl

%{
%}

#include defs.fin

%%

close	    {return $CLOSE_}
connect	    {return $CONNECT_}
disconnect  {return $DISCONNECT_}
inet	    {return $INET_}
info	    {return $INFO_}
local	    {return $LOCAL_}
localhost   {return $LOCALHOST_}
noxpans	    {return $NOXPANS_}
tcl	    {return $TCL_}
unix	    {return $UNIX_}

#include yesno.fin
#include string.fin
#include ws.fin

%%