diff --git a/alliance/src/mbk/src/mvl_scomp_l.l b/alliance/src/mbk/src/mvl_scomp_l.l
index b80e25f9..a5c0b251 100644
--- a/alliance/src/mbk/src/mvl_scomp_l.l
+++ b/alliance/src/mbk/src/mvl_scomp_l.l
@@ -264,7 +264,7 @@ base_specifier	  	  (B|b|O|o|X|x)
 \/									{
 			return(Slash);
 									}
-{letter}(_?{letter_or_digit})* 						{
+{letter}(_|{letter_or_digit})* 						{
 			int itoken;
 
 			itoken = search (yytext);