Update examples. Remove npm stuff from root

Author: cmditch

examples/ERC20.elm

@@ -18,190 +18,201 @@ module Contracts.ERC20 exposing
     , transferFrom
     )
 
-import Abi.Decode as AbiDecode exposing (abiDecode, andMap, data, toElmDecoder, topic)
-import Abi.Encode as AbiEncode exposing (Encoding(..), abiEncode)
+import Eth.Abi.Decode as D exposing (abiDecode, andMap, data, toElmDecoder, topic)
+import Eth.Abi.Encode as E exposing (Encoding(..), abiEncode)
 import BigInt exposing (BigInt)
 import Eth.Types exposing (..)
 import Eth.Utils as U
-import Json.Decode as Decode exposing (Decoder)
-import Json.Decode.Pipeline exposing (custom, decode)
+import Json.Decode as Decode exposing (Decoder, succeed)
+import Json.Decode.Pipeline exposing (custom)
 
 
 
 {-
 
-   This file was generated by https://github.com/cmditch/elm-ethereum-generator
+   This file was generated by https://github.com/cmditch/elm-ethereum-generator v3.0.0
+   Compatible with elm-ethereum v4.0.0
 
 -}
+-- allowance(address,address) function
 
 
-{-| "allowance(address,address)" function
--}
 allowance : Address -> Address -> Address -> Call BigInt
-allowance contractAddress owner spender =
+allowance contractAddress owner_ spender_ =
     { to = Just contractAddress
     , from = Nothing
     , gas = Nothing
     , gasPrice = Nothing
     , value = Nothing
-    , data = Just <| AbiEncode.functionCall "allowance(address,address)" [ AbiEncode.address owner, AbiEncode.address spender ]
+    , data = Just <| E.functionCall "dd62ed3e" [ E.address owner_, E.address spender_ ]
     , nonce = Nothing
-    , decoder = toElmDecoder AbiDecode.uint
+    , decoder = toElmDecoder D.uint
     }
 
 
-{-| "allowed(address,address)" function
--}
+-- allowed(address,address) function
+
+
 allowed : Address -> Address -> Address -> Call BigInt
-allowed contractAddress a b =
+allowed contractAddress a_ b_ =
     { to = Just contractAddress
     , from = Nothing
     , gas = Nothing
     , gasPrice = Nothing
     , value = Nothing
-    , data = Just <| AbiEncode.functionCall "allowed(address,address)" [ AbiEncode.address a, AbiEncode.address b ]
+    , data = Just <| E.functionCall "5c658165" [ E.address a_, E.address b_ ]
     , nonce = Nothing
-    , decoder = toElmDecoder AbiDecode.uint
+    , decoder = toElmDecoder D.uint
     }
 
 
-{-| "approve(address,uint256)" function
--}
+-- approve(address,uint256) function
+
+
 approve : Address -> Address -> BigInt -> Call Bool
-approve contractAddress spender value =
+approve contractAddress spender_ value_ =
     { to = Just contractAddress
     , from = Nothing
     , gas = Nothing
     , gasPrice = Nothing
     , value = Nothing
-    , data = Just <| AbiEncode.functionCall "approve(address,uint256)" [ AbiEncode.address spender, AbiEncode.uint value ]
+    , data = Just <| E.functionCall "095ea7b3" [ E.address spender_, E.uint value_ ]
     , nonce = Nothing
-    , decoder = toElmDecoder AbiDecode.bool
+    , decoder = toElmDecoder D.bool
     }
 
 
-{-| "balanceOf(address)" function
--}
+-- balanceOf(address) function
+
+
 balanceOf : Address -> Address -> Call BigInt
-balanceOf contractAddress owner =
+balanceOf contractAddress owner_ =
     { to = Just contractAddress
     , from = Nothing
     , gas = Nothing
     , gasPrice = Nothing
     , value = Nothing
-    , data = Just <| AbiEncode.functionCall "balanceOf(address)" [ AbiEncode.address owner ]
+    , data = Just <| E.functionCall "70a08231" [ E.address owner_ ]
     , nonce = Nothing
-    , decoder = toElmDecoder AbiDecode.uint
+    , decoder = toElmDecoder D.uint
     }
 
 
-{-| "balances(address)" function
--}
+-- balances(address) function
+
+
 balances : Address -> Address -> Call BigInt
-balances contractAddress a =
+balances contractAddress a_ =
     { to = Just contractAddress
     , from = Nothing
     , gas = Nothing
     , gasPrice = Nothing
     , value = Nothing
-    , data = Just <| AbiEncode.functionCall "balances(address)" [ AbiEncode.address a ]
+    , data = Just <| E.functionCall "27e235e3" [ E.address a_ ]
     , nonce = Nothing
-    , decoder = toElmDecoder AbiDecode.uint
+    , decoder = toElmDecoder D.uint
     }
 
 
-{-| "decimals()" function
--}
+-- decimals() function
+
+
 decimals : Address -> Call BigInt
 decimals contractAddress =
     { to = Just contractAddress
     , from = Nothing
     , gas = Nothing
     , gasPrice = Nothing
     , value = Nothing
-    , data = Just <| AbiEncode.functionCall "decimals()" []
+    , data = Just <| E.functionCall "313ce567" []
     , nonce = Nothing
-    , decoder = toElmDecoder AbiDecode.uint
+    , decoder = toElmDecoder D.uint
     }
 
 
-{-| "name()" function
--}
+-- name() function
+
+
 name : Address -> Call String
 name contractAddress =
     { to = Just contractAddress
     , from = Nothing
     , gas = Nothing
     , gasPrice = Nothing
     , value = Nothing
-    , data = Just <| AbiEncode.functionCall "name()" []
+    , data = Just <| E.functionCall "06fdde03" []
     , nonce = Nothing
-    , decoder = toElmDecoder AbiDecode.string
+    , decoder = toElmDecoder D.string
     }
 
 
-{-| "symbol()" function
--}
+-- symbol() function
+
+
 symbol : Address -> Call String
 symbol contractAddress =
     { to = Just contractAddress
     , from = Nothing
     , gas = Nothing
     , gasPrice = Nothing
     , value = Nothing
-    , data = Just <| AbiEncode.functionCall "symbol()" []
+    , data = Just <| E.functionCall "95d89b41" []
     , nonce = Nothing
-    , decoder = toElmDecoder AbiDecode.string
+    , decoder = toElmDecoder D.string
     }
 
 
-{-| "totalSupply()" function
--}
+-- totalSupply() function
+
+
 totalSupply : Address -> Call BigInt
 totalSupply contractAddress =
     { to = Just contractAddress
     , from = Nothing
     , gas = Nothing
     , gasPrice = Nothing
     , value = Nothing
-    , data = Just <| AbiEncode.functionCall "totalSupply()" []
+    , data = Just <| E.functionCall "18160ddd" []
     , nonce = Nothing
-    , decoder = toElmDecoder AbiDecode.uint
+    , decoder = toElmDecoder D.uint
     }
 
 
-{-| "transfer(address,uint256)" function
--}
+-- transfer(address,uint256) function
+
+
 transfer : Address -> Address -> BigInt -> Call Bool
-transfer contractAddress to value =
+transfer contractAddress to_ value_ =
     { to = Just contractAddress
     , from = Nothing
     , gas = Nothing
     , gasPrice = Nothing
     , value = Nothing
-    , data = Just <| AbiEncode.functionCall "transfer(address,uint256)" [ AbiEncode.address to, AbiEncode.uint value ]
+    , data = Just <| E.functionCall "a9059cbb" [ E.address to_, E.uint value_ ]
     , nonce = Nothing
-    , decoder = toElmDecoder AbiDecode.bool
+    , decoder = toElmDecoder D.bool
     }
 
 
-{-| "transferFrom(address,address,uint256)" function
--}
+-- transferFrom(address,address,uint256) function
+
+
 transferFrom : Address -> Address -> Address -> BigInt -> Call Bool
-transferFrom contractAddress from to value =
+transferFrom contractAddress from_ to_ value_ =
     { to = Just contractAddress
     , from = Nothing
     , gas = Nothing
     , gasPrice = Nothing
     , value = Nothing
-    , data = Just <| AbiEncode.functionCall "transferFrom(address,address,uint256)" [ AbiEncode.address from, AbiEncode.address to, AbiEncode.uint value ]
+    , data = Just <| E.functionCall "23b872dd" [ E.address from_, E.address to_, E.uint value_ ]
     , nonce = Nothing
-    , decoder = toElmDecoder AbiDecode.bool
+    , decoder = toElmDecoder D.bool
     }
 
 
-{-| "Approval(address,address,uint256)" event
--}
+-- Approval(address,address,uint256) event
+
+
 type alias Approval =
     { owner : Address
     , spender : Address
@@ -210,28 +221,29 @@ type alias Approval =
 
 
 approvalEvent : Address -> Maybe Address -> Maybe Address -> LogFilter
-approvalEvent contractAddress owner spender =
+approvalEvent contractAddress owner_ spender_ = 
     { fromBlock = LatestBlock
     , toBlock = LatestBlock
     , address = contractAddress
-    , topics =
-        [ Just <| U.keccak256 "Approval(address,address,uint256)"
-        , Maybe.map (abiEncode << AbiEncode.address) owner
-        , Maybe.map (abiEncode << AbiEncode.address) spender
+    , topics = 
+        [ Just <| U.unsafeToHex "8c5be1e5ebec7d5bd14f71427d1e84f3dd0314c0f7b2291e5b200ac8c7c3b925"
+        , Maybe.map (abiEncode << E.address) owner_
+        , Maybe.map (abiEncode << E.address) spender_
         ]
     }
 
 
 approvalDecoder : Decoder Approval
-approvalDecoder =
-    decode Approval
-        |> custom (topic 1 AbiDecode.address)
-        |> custom (topic 2 AbiDecode.address)
-        |> custom (data 0 AbiDecode.uint)
+approvalDecoder = 
+    Decode.succeed Approval
+        |> custom (topic 1 D.address)
+        |> custom (topic 2 D.address)
+        |> custom (data 0 D.uint)
+
+
+-- Transfer(address,address,uint256) event
 
 
-{-| "Transfer(address,address,uint256)" event
--}
 type alias Transfer =
     { from : Address
     , to : Address
@@ -240,21 +252,23 @@ type alias Transfer =
 
 
 transferEvent : Address -> Maybe Address -> Maybe Address -> LogFilter
-transferEvent contractAddress from to =
+transferEvent contractAddress from_ to_ = 
     { fromBlock = LatestBlock
     , toBlock = LatestBlock
     , address = contractAddress
-    , topics =
-        [ Just <| U.keccak256 "Transfer(address,address,uint256)"
-        , Maybe.map (abiEncode << AbiEncode.address) from
-        , Maybe.map (abiEncode << AbiEncode.address) to
+    , topics = 
+        [ Just <| U.unsafeToHex "ddf252ad1be2c89b69c2b068fc378daa952ba7f163c4a11628f55a4df523b3ef"
+        , Maybe.map (abiEncode << E.address) from_
+        , Maybe.map (abiEncode << E.address) to_
         ]
     }
 
 
 transferDecoder : Decoder Transfer
-transferDecoder =
-    decode Transfer
-        |> custom (topic 1 AbiDecode.address)
-        |> custom (topic 2 AbiDecode.address)
-        |> custom (data 0 AbiDecode.uint)
+transferDecoder = 
+    Decode.succeed Transfer
+        |> custom (topic 1 D.address)
+        |> custom (topic 2 D.address)
+        |> custom (data 0 D.uint)
+
+