X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=lib%2Fdiskimage_lvm2_lexer.mll;h=cce3400ebd67680a01124cba67893acb436aff12;hb=5318d6037135dbb8f53074d8003af769132d72bd;hp=0a791b257b18373886028ff103fa498635a2ebd8;hpb=9611aba66734efe3e2f1e0792a90003b657a89f5;p=virt-df.git

diff --git a/lib/diskimage_lvm2_lexer.mll b/lib/diskimage_lvm2_lexer.mll
index 0a791b2..cce3400 100644
--- a/lib/diskimage_lvm2_lexer.mll
+++ b/lib/diskimage_lvm2_lexer.mll
@@ -26,8 +26,8 @@
   open Printf
   open Lexing
 
+  open Diskimage_impl
   open Diskimage_lvm2_parser
-  open Diskimage_utils
 
   (* Temporary buffer used for parsing strings, etc. *)
   let tmp = Buffer.create 80
@@ -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
       }