LGTM, thanks.
On Tue, Sep 24, 2013 at 2:22 PM, Jose A. Lopes <[email protected]> wrote: > Add 'buildVersion' which calculates Ganeti versions and it is the > Haskell counterpart of 'BuildVersion' in 'lib/constants.py'. > > Signed-off-by: Jose A. Lopes <[email protected]> > --- > src/Ganeti/ConstantUtils.hs | 6 ++++++ > 1 file changed, 6 insertions(+) > > diff --git a/src/Ganeti/ConstantUtils.hs b/src/Ganeti/ConstantUtils.hs > index 493cd61..b14ab7f 100644 > --- a/src/Ganeti/ConstantUtils.hs > +++ b/src/Ganeti/ConstantUtils.hs > @@ -101,3 +101,9 @@ priorityNormal = 0 > > priorityHigh :: Int > priorityHigh = -10 > + > +-- | Calculates int version number from major, minor and revision > +-- numbers. > +buildVersion :: Int -> Int -> Int -> Int > +buildVersion major minor revision = > + 1000000 * major + 10000 * minor + 1 * revision > -- > 1.8.4 > > -- Thomas Thrainer | Software Engineer | [email protected] | Google Germany GmbH Dienerstr. 12 80331 München Registergericht und -nummer: Hamburg, HRB 86891 Sitz der Gesellschaft: Hamburg Geschäftsführer: Graham Law, Christine Elizabeth Flores
