Mercurial > octave

changeset 1420:9ce9e4f1e5b5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1995-09-16 01:18:28 by jwe]
author jwe
date Sat, 16 Sep 1995 01:18:28 +0000
parents 0bdbc15a112b
children 3b77015d7f42
files src/lex.l
diffstat 1 files changed, 1 insertions(+), 6 deletions(-) [+]
line wrap: on
line diff
--- a/src/lex.l	Sat Sep 16 01:12:37 1995 +0000
+++ b/src/lex.l	Sat Sep 16 01:18:28 1995 +0000
@@ -20,7 +20,6 @@
 
 */
 
-%x HELP_FCN
 %s TEXT_FCN
 %s MATRIX
 
@@ -154,7 +153,6 @@
 // parser too.
 %}
 
-<HELP_FCN>{NL} |
 <TEXT_FCN>{NL} {
     BEGIN 0;
     current_input_column = 1;
@@ -184,7 +182,6 @@
     return handle_string (yytext[0], 1);
   }
 
-<HELP_FCN>[^ \t\n]*{S}*	|
 <TEXT_FCN>[^ \t\n\;\,]*{S}* {
     char *tok = strip_trailing_whitespace (yytext);
     TOK_PUSH_AND_RETURN (tok, TEXT);
@@ -1759,9 +1756,7 @@
     {
       BEGIN TEXT_FCN;
 
-      if (strcmp (tok, "help") == 0)
-	BEGIN HELP_FCN;
-      else if (strcmp (tok, "set") == 0)
+      if (strcmp (tok, "set") == 0)
 	doing_set = 1;
     }