summaryrefslogtreecommitdiff
path: root/scan.l
diff options
context:
space:
mode:
authorVern Paxson <vern@ee.lbl.gov>1988-05-08 20:07:29 +0000
committerVern Paxson <vern@ee.lbl.gov>1988-05-08 20:07:29 +0000
commit5fa802e597f944e411179df9f4c3f7e9f9bcb292 (patch)
tree0b8d167df99653dbc532cf19b1ff7d127215a7e8 /scan.l
parent32fe716b3738f3305606140d5676d5376e22c277 (diff)
RCS header
removed \^ from ESCSEQ
Diffstat (limited to 'scan.l')
-rw-r--r--scan.l11
1 files changed, 8 insertions, 3 deletions
diff --git a/scan.l b/scan.l
index 0482d50..88c2d22 100644
--- a/scan.l
+++ b/scan.l
@@ -16,6 +16,11 @@
#include "flexdef.h"
#include "parse.h"
+#ifndef lint
+static char rcsid[] =
+ "@(#) $Header$ (LBL)";
+#endif
+
#define ACTION_ECHO fprintf( temp_action_file, "%s", yytext )
#define MARK_END_OF_PROLOG fprintf( temp_action_file, "%%%% end of prolog\n" );
@@ -48,7 +53,7 @@ NAME [a-z_][a-z_0-9]*
SCNAME {NAME}
-ESCSEQ \\([^^\n]|"^".|0[0-9]{1,3})
+ESCSEQ \\([^\n]|0[0-9]{1,3})
%%
static int bracelevel, didadef;
@@ -266,7 +271,7 @@ ESCSEQ \\([^^\n]|"^".|0[0-9]{1,3})
<CCL>-/[^\]\n] return ( '-' );
<CCL>[^\]\n] RETURNCHAR;
-<CCL>"]" BEGIN(SECT2); return ( ']' );
+<CCL>"]" BEGIN(SECT2); return ( ']' );
<NUM>[0-9]+ {
@@ -365,7 +370,7 @@ ESCSEQ \\([^^\n]|"^".|0[0-9]{1,3})
YY_DO_BEFORE_SCAN; /* recover from setting up yytext */
#ifdef FLEX_FAST_SKEL
- fputs( yy_c_buf_p + 1, stdout );
+ fputs( yy_cp + 1, stdout );
#else
yy_ch_buf[yy_e_buf_p + 1] = '\0';