blob: 74c47b0729b160b91d2c017896c737e48c965171 (
plain)
1
2
3
4
5
6
7
8
9
|
module Decoder.Helpers exposing (todo)
import Json.Decode as D exposing (Decoder)
import Json.Encode
import Lib
todo =
D.map (\val -> Lib.todo ("The expression " ++ Json.Encode.encode 0 val ++ " is not yet supported")) D.value
|