Fix a bug in the lexer: the definition of TK_STRING (used when

including files) was wrong (well, at least, too restrictive, numbers
were forbidden in file names...).

src/lexer.mll

@@ -107,7 +107,7 @@ let token_code tk = (
                 | TK_ICONST    lxm -> ("TK_ICONT" , lxm)
                 | TK_IDENT     lxm -> ("TK_IDENT" , lxm)
                 | TK_LONGIDENT lxm -> ("TK_LONGIDENT" , lxm)
-                | TK_STRING    lxm -> ("TK_STRING" , lxm)
+                | TK_STRING  lxm -> ("TK_STRING" , lxm)
                 | TK_IF        lxm -> ("TK_IF" , lxm)
                 | TK_IMPL      lxm -> ("TK_IMPL" , lxm)
                 | TK_INT       lxm -> ("TK_INT" , lxm)
@@ -245,7 +245,7 @@ rule lexer = parse
                 }
 
 (* une chaine quelconque *)
-        | "\""   ['A'-'Z' '(' ')' '$' '/' 'a'-'z' '.' '-' '_'] * "\""
+         | "\""  [^ '\"']* "\""
             { 
                         let lxm = Lxm.make_string lexbuf in
                           TK_STRING (lxm)