Polissage : CLI.Command.Balance : is_worth.
[comptalang.git] / lib / Hcompta / Amount / Quantity.hs
index f6ce5b5e66cc408b906f31e466e0ae8be76e2dd4..ba45caa6d9f5406011c1ef0dfd58e5e2ff20f2a8 100644 (file)
@@ -2,7 +2,6 @@
 {-# LANGUAGE DeriveDataTypeable #-}
 {-# LANGUAGE FlexibleInstances #-}
 {-# LANGUAGE StandaloneDeriving #-}
-{-# LANGUAGE TypeSynonymInstances #-}
 {-# OPTIONS_GHC -fno-warn-orphans #-}
 module Hcompta.Amount.Quantity where
 
@@ -42,7 +41,7 @@ is_zero = (== 0) . decimalMantissa
 
 #else
 representation = "Decimal"
-zero = fromInteger 0
+zero = 0
 
 round = Data.Decimal.roundTo