[Pkg-libvirt-commits] [libguestfs] 210/384: mllib: fix JSON_tests

[Hilko Bengen]

This is an automated email from the git hooks/post-receive script.

bengen pushed a commit to branch experimental
in repository libguestfs.

commit d0a2ba40c8f8aa610dc4a30ee0b2cdde0187682f
Author: Pino Toscano <ptoscano at redhat.com>
Date:   Mon Jan 26 16:34:59 2015 +0100

    mllib: fix JSON_tests
    
    Properly write int64 values, so they are handled correctly also on 32bit
    architectures.
---
 mllib/JSON_tests.ml | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/mllib/JSON_tests.ml b/mllib/JSON_tests.ml
index ea91f7d..fa37171 100644
--- a/mllib/JSON_tests.ml
+++ b/mllib/JSON_tests.ml
@@ -168,7 +168,7 @@ let test_builder () =
         "os-version", JSON.String "phony-debian";
         "full-name", JSON.String "Phony Debian";
         "arch", JSON.String "x86_64";
-        "size", JSON.Int64 (Int64.of_int 536870912);
+        "size", JSON.Int64 536870912_L;
         "notes", JSON.Dict [
           "C", JSON.String "Phony Debian look-alike used for testing.";
         ];
@@ -178,7 +178,7 @@ let test_builder () =
         "os-version", JSON.String "phony-fedora";
         "full-name", JSON.String "Phony Fedora";
         "arch", JSON.String "x86_64";
-        "size", JSON.Int64 (Int64.of_int 1073741824);
+        "size", JSON.Int64 1073741824_L;
         "notes", JSON.Dict [
           "C", JSON.String "Phony Fedora look-alike used for testing.";
         ];

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-libvirt/libguestfs.git