dnsmanager-webclient/src/App/Type/GenericSerialization.purs

7 lines
212 B
Plaintext

module App.Type.GenericSerialization where
import Prelude (show, class Show, (<<<))
import Data.String (toLower)
generic_serialization :: forall a. Show a => a -> String
generic_serialization = toLower <<< show