From 49f9627a8d5c818dac4ab2fe7015130954722a77 Mon Sep 17 00:00:00 2001
From: Iustin Pop <iustin@google.com>
Date: Thu, 20 May 2010 11:05:57 +0200
Subject: [PATCH] Change some test constants
First, we reduce the max size of the disks, since Int on 32bits will
overflow for big simulated clusters. This is a real issue, that will
need fixing in real life, but for now we just "silence" this test.
Second, we increase the amount of time a test is allowed to run,
otherwise on slower computers some tests might time-out.
---
Ganeti/HTools/QC.hs | 4 ++--
test.hs | 2 +-
2 files changed, 3 insertions(+), 3 deletions(-)
diff --git a/Ganeti/HTools/QC.hs b/Ganeti/HTools/QC.hs
index 0085f3cb6..6c7f4ce72 100644
--- a/Ganeti/HTools/QC.hs
+++ b/Ganeti/HTools/QC.hs
@@ -52,9 +52,9 @@ import qualified Ganeti.HTools.Utils as Utils
maxMem :: Int
maxMem = 1024 * 1024
--- | Maximum disk (1PiB, somewhat random value)
+-- | Maximum disk (8TiB, somewhat random value)
maxDsk :: Int
-maxDsk = 1024 * 1024 * 1024
+maxDsk = 1024 * 1024 * 8
-- | Max CPUs (1024, somewhat random value)
maxCpu :: Int
diff --git a/test.hs b/test.hs
index 421b30056..8fffa99ad 100644
--- a/test.hs
+++ b/test.hs
@@ -36,7 +36,7 @@ import Ganeti.HTools.QC
options :: TestOptions
options = TestOptions
{ no_of_tests = 500
- , length_of_tests = 5
+ , length_of_tests = 10
, debug_tests = False }
--
GitLab