Mercurial > octave-nkf

diff src/lex.l @ 2042:31f4f775b8c6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1996-03-28 09:06:28 by jwe]
author jwe
date Thu, 28 Mar 1996 09:06:39 +0000
parents c2d20f365b84
children a75d2a5d6783
line wrap: on
line diff
--- a/src/lex.l	Thu Mar 28 01:50:17 1996 +0000
+++ b/src/lex.l	Thu Mar 28 09:06:39 1996 +0000
@@ -139,8 +139,8 @@
 
 D	[0-9]
 S	[ \t]
-NL	[\n]
-SNL	[ \t\n]
+NL	((\n)|(\r\n))
+SNL	({S}|{NL})
 EL	(\.\.\.)
 BS	(\\)
 CONT	({EL}|{BS})
@@ -576,7 +576,10 @@
 // eventually result in a parse error.
 %}
 
-.		{ TOK_RETURN (yytext[0]); }
+. {
+    error ("invalid character `%s' on input", undo_string_escape (yytext[0]));
+    TOK_RETURN (yytext[0]);
+}
 
 %%