Fixed regex match for DIRECTIVE_VAL.

svn path=/trunk/yasm/; revision=17
This commit is contained in:
Peter Johnson 2001-05-20 08:39:48 +00:00
parent bc2b7f3194
commit 4c34b9b6d7
4 changed files with 8 additions and 8 deletions

View file

@ -1,4 +1,4 @@
/* $Id: token.l.in,v 1.2 2001/05/20 08:35:18 peter Exp $
/* $Id: token.l.in,v 1.3 2001/05/20 08:39:48 peter Exp $
* Main lexer
*
* Copyright (C) 2001 Peter Johnson
@ -94,7 +94,7 @@ WS [ \t\r]
return DIRECTIVE_NAME;
}
/* everything printable except for ' ', '[' and ']'. */
<DIRECTIVE2>[!-Z\^-~]+ {
<DIRECTIVE2>[!-@a-z\\^-`{|}~]+ {
yylval.str_val = strdup(yytext);
if(!yylval.str_val)
Fatal(FATAL_NOMEM);

View file

@ -1,4 +1,4 @@
/* $Id: token.l.in,v 1.2 2001/05/20 08:35:18 peter Exp $
/* $Id: token.l.in,v 1.3 2001/05/20 08:39:48 peter Exp $
* Main lexer
*
* Copyright (C) 2001 Peter Johnson
@ -94,7 +94,7 @@ WS [ \t\r]
return DIRECTIVE_NAME;
}
/* everything printable except for ' ', '[' and ']'. */
<DIRECTIVE2>[!-Z\^-~]+ {
<DIRECTIVE2>[!-@a-z\\^-`{|}~]+ {
yylval.str_val = strdup(yytext);
if(!yylval.str_val)
Fatal(FATAL_NOMEM);

View file

@ -1,4 +1,4 @@
/* $Id: token.l,v 1.2 2001/05/20 08:35:18 peter Exp $
/* $Id: token.l,v 1.3 2001/05/20 08:39:48 peter Exp $
* Main lexer
*
* Copyright (C) 2001 Peter Johnson
@ -94,7 +94,7 @@ WS [ \t\r]
return DIRECTIVE_NAME;
}
/* everything printable except for ' ', '[' and ']'. */
<DIRECTIVE2>[!-Z\^-~]+ {
<DIRECTIVE2>[!-@a-z\\^-`{|}~]+ {
yylval.str_val = strdup(yytext);
if(!yylval.str_val)
Fatal(FATAL_NOMEM);

View file

@ -1,4 +1,4 @@
/* $Id: token.l.in,v 1.2 2001/05/20 08:35:18 peter Exp $
/* $Id: token.l.in,v 1.3 2001/05/20 08:39:48 peter Exp $
* Main lexer
*
* Copyright (C) 2001 Peter Johnson
@ -94,7 +94,7 @@ WS [ \t\r]
return DIRECTIVE_NAME;
}
/* everything printable except for ' ', '[' and ']'. */
<DIRECTIVE2>[!-Z\^-~]+ {
<DIRECTIVE2>[!-@a-z\\^-`{|}~]+ {
yylval.str_val = strdup(yytext);
if(!yylval.str_val)
Fatal(FATAL_NOMEM);