-
-
Notifications
You must be signed in to change notification settings - Fork 0
/
status.ex
44 lines (36 loc) · 1002 Bytes
/
status.ex
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
defmodule Icon.Schema.Types.Transaction.Status do
@moduledoc """
This module defines a transaction status.
"""
use Icon.Schema.Type
@typedoc """
A transaction status.
"""
@type t() :: :success | :failure
@spec load(any()) :: {:ok, t()} | :error
@impl Icon.Schema.Type
def load(0), do: load(:failure)
def load(1), do: load(:success)
def load(value) when value in [:success, :failure], do: {:ok, value}
def load("0x" <> _ = value) do
with {:ok, value} <- Icon.Schema.Types.Integer.load(value) do
load(value)
end
end
def load(_) do
:error
end
@spec dump(any()) :: {:ok, binary()} | :error
@impl Icon.Schema.Type
def dump(value)
def dump(:failure), do: dump(0)
def dump(:success), do: dump(1)
def dump(0), do: Icon.Schema.Types.Integer.dump(0)
def dump(1), do: Icon.Schema.Types.Integer.dump(1)
def dump("0x" <> _ = value) do
with {:ok, loaded} <- load(value) do
dump(loaded)
end
end
def dump(_), do: :error
end