Mercurial > octave

diff src/lex.l @ 1288:4acabfbdd381

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1995-04-28 20:23:04 by jwe]
author jwe
date Fri, 28 Apr 1995 20:31:13 +0000
parents cbdf7db98554
children 611d403c7f3d
line wrap: on
line diff
--- a/src/lex.l	Fri Apr 28 00:41:42 1995 +0000
+++ b/src/lex.l	Fri Apr 28 20:31:13 1995 +0000
@@ -186,9 +186,7 @@
 
 <HELP_FCN>[^ \t\n]*{S}*	|
 <TEXT_FCN>[^ \t\n\;\,]*{S}* {
-    static char *tok = 0;
-    delete [] tok;
-    tok = strip_trailing_whitespace (yytext);
+    char *tok = strip_trailing_whitespace (yytext);
     TOK_PUSH_AND_RETURN (tok, TEXT);
   }
 
@@ -403,9 +401,7 @@
 %}
 
 {IDENT}{S}* {
-    static char *tok = 0;
-    delete [] tok;
-    tok = strip_trailing_whitespace (yytext);
+    char *tok = strip_trailing_whitespace (yytext);
     int c = yytext[yyleng-1];
     int cont_is_spc = eat_continuation ();
     int spc_gobbled = (cont_is_spc || c == ' ' || c == '\t');