web3 0.5.1.0 → 0.5.2.0

raw patch · 4 files changed

+18/−3 lines, 4 filesdep ~web3

Dependency ranges changed: web3

Files

• src/Network/Ethereum/Web3.hs +1/−0
• src/Network/Ethereum/Web3/Contract.hs +10/−0
• src/Network/Ethereum/Web3/Encoding/Bytes.hs +5/−1
• web3.cabal +2/−2

@@ -29,6 +29,7 @@   , EventAction(..)   , Event(..)   , Method(..)+  , NoMethod(..)   , nopay   -- ** Ethereum data types   , BytesN(..)

@@ -29,6 +29,7 @@     EventAction(..)   , Method(..)   , Event(..)+  , NoMethod(..)   , nopay   ) where @@ -146,3 +147,12 @@ nopay :: Wei {-# INLINE nopay #-} nopay = 0++-- | Dummy method for sending transaction without method call+data NoMethod = NoMethod++instance ABIEncoding NoMethod where+    fromDataParser = return NoMethod+    toDataBuilder  = const ""++instance Method NoMethod

@@ -25,8 +25,8 @@ import Network.Ethereum.Web3.Encoding.Internal import Network.Ethereum.Web3.Encoding import GHC.TypeLits (KnownNat, Nat, natVal)+import Data.Monoid (Monoid(..), (<>)) import Data.ByteArray (Bytes)-import Data.Monoid ((<>))  import Debug.Trace @@ -62,6 +62,10 @@ -- | Dynamic length byte array newtype BytesD = BytesD { unBytesD :: Bytes }   deriving (Eq, Ord)++instance Monoid BytesD where+    mempty = BytesD mempty+    mappend (BytesD a) (BytesD b) = BytesD (mappend a b)  instance EncodingType BytesD where     typeName  = const "bytes[]"

@@ -1,5 +1,5 @@ name: web3-version: 0.5.1.0+version: 0.5.2.0 cabal-version: >=1.10 build-type: Simple license: BSD3@@ -64,7 +64,7 @@         base >=4.9.0.0 && <4.10,         memory ==0.13.*,         text >=1.2.2.1 && <1.3,-        web3 >=0.5.1.0 && <0.6+        web3 >=0.5.2.0 && <0.6     default-language: Haskell2010     default-extensions: OverloadedStrings     hs-source-dirs: test