summaryrefslogtreecommitdiff
path: root/dviware/quicspool/libqmsquery/qmsopclex.l
diff options
context:
space:
mode:
Diffstat (limited to 'dviware/quicspool/libqmsquery/qmsopclex.l')
-rw-r--r--dviware/quicspool/libqmsquery/qmsopclex.l28
1 files changed, 28 insertions, 0 deletions
diff --git a/dviware/quicspool/libqmsquery/qmsopclex.l b/dviware/quicspool/libqmsquery/qmsopclex.l
new file mode 100644
index 0000000000..e35f4b137c
--- /dev/null
+++ b/dviware/quicspool/libqmsquery/qmsopclex.l
@@ -0,0 +1,28 @@
+/* $Header: qmsopclex.l,v 1.1 88/01/15 12:19:11 simpson Rel $
+%{
+/*
+$Log: qmsopclex.l,v $
+ * Revision 1.1 88/01/15 12:19:11 simpson
+ * initial release
+ *
+ * Revision 0.1 87/12/11 21:34:46 simpson
+ * beta test
+ *
+*/
+#undef input
+#define input() (((yytchar=yysptr>yysbuf?U(*--yysptr):timedgetc(_Ifp)) \
+ ==10?(yylineno++, yytchar):yytchar)==EOF?0:yytchar)
+%}
+integer [0-9]+
+%%
+OC[1-5]: {
+ yylval.i = yytext[2] - '0';
+ return OC;
+ }
+{integer} {
+ yylval.i = atoi(yytext);
+ return INTEGER;
+ }
+\, return yytext[0];
+NONE return NONE;
+\r\n return ENDLINE;