Revision df8578fb htest/Test/Ganeti/HTools/Types.hs

b/htest/Test/Ganeti/HTools/Types.hs
106 106 
    istd <- genBiggerISpec imin
107 107 
    imax <- genBiggerISpec istd
108 108 
    num_tmpl <- choose (0, length allDiskTemplates)
109 
    dts  <- genUniquesList num_tmpl
109 
    dts  <- genUniquesList num_tmpl arbitrary
110 110 
    vcpu_ratio <- choose (1.0, maxVcpuRatio)
111 111 
    spindle_ratio <- choose (1.0, maxSpindleRatio)
112 112 
    return Types.IPolicy { Types.iPolicyMinSpec = imin

Also available in: Unified diff