Updated MANIFEST
[virt-df.git] / lib / diskimage_lvm2_lexer.mll
index 0a791b2..21136dc 100644 (file)
@@ -82,7 +82,7 @@ rule token = parse
   (* integers *)
   | ('-'? digit+) as i
       {
-       let i = Int64.of_string i in
+       let i = Int63.of_string i in
        INT i
       }