Added qualifiers for int32, int64, and nativeint.

git-svn-id: https://godirepo.camlcity.org/svn/lib-xstrp4/trunk@11 56444827-45db-0310-81c6-95464f7ca4c4

xstrp4_here_lexer.mll

-(* $Id: xstrp4_here_lexer.mll,v 1.1 1999/07/18 16:42:39 gerd Exp $
+(* $Id: xstrp4_here_lexer.mll,v 1.2 2002/08/15 23:33:26 gerd Exp $
  * ----------------------------------------------------------------------
  *
  *)
@@ -25,7 +25,9 @@ let format = '%'
              [ '0' '-' ' ' ]*    (* no more modifiers are supported by Ocaml *)
              ['0'-'9']* 
              ( '.' ['0'-'9']* )?
-	     [ 'd' 'i' 'u' 'x' 'X' 's' 'c' 'f' 'e' 'E' 'g' 'G' 'b' 'a' 't' ]
+	     ( ( ['L' 'l' 'n'] [ 'd' 'i' 'u' 'x' 'X' 'o' ])
+	       | [ 'd' 'i' 'u' 'x' 'X' 's' 'c' 'f' 'e' 'E' 'g' 'G' 'b' 'a' 't' ]
+	     )
 
 rule token = parse
     '$' ( ucletter acletter* '.' )* lcletter acletter*
@@ -84,6 +86,9 @@ and value_identifier = parse
  * History:
  * 
  * $Log: xstrp4_here_lexer.mll,v $
+ * Revision 1.2  2002/08/15 23:33:26  gerd
+ * 	Added qualifiers for int32, int64, and nativeint.
+ *
  * Revision 1.1  1999/07/18 16:42:39  gerd
  * 	Initial revision.
  *