module Argo.Class.ToValue where

import qualified Argo.Class.HasCodec as HasCodec
import qualified Argo.Codec.Value as Codec
import qualified Argo.Json.Value as Value

toValue :: HasCodec.HasCodec a => a -> Value.Value
toValue :: a -> Value
toValue = Value a -> a -> Value
forall a. Value a -> a -> Value
Codec.encodeWith Value a
forall a. HasCodec a => Value a
HasCodec.codec