Mercurial > octave-nkf

changeset 576:33d622a12de8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1994-08-02 03:42:35 by jwe]
author jwe
date Tue, 02 Aug 1994 03:42:35 +0000
parents 6ed31b2e297a
children 91e2164fb1b2
files src/lex.l
diffstat 1 files changed, 5 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/src/lex.l	Mon Aug 01 02:17:05 1994 +0000
+++ b/src/lex.l	Tue Aug 02 03:42:35 1994 +0000
@@ -54,6 +54,7 @@
 #include "error.h"
 #include "utils.h"
 #include "tree.h"
+#include "tree-misc.h"
 #include "tree-plot.h"
 #include "tree-const.h"
 #include "y.tab.h"
@@ -1131,7 +1132,7 @@
 
   int in_comment = 1;
   int len = 0;
-  int c;
+  int c = 0;
 
   while ((c = yyinput ()) != EOF)
     {
@@ -1166,6 +1167,9 @@
 
  done:
 
+  if (c)
+    yyunput (c, yytext);
+
   help_buf[len] =  '\0';
 }