-- SPDX-FileCopyrightText: 2022 Serokell <https://serokell.io/>
--
-- SPDX-License-Identifier: MPL-2.0

-- | Set of basic rendering modes, where 'Show' is treated as
-- the primary way to render data.
module Text.Interpolation.Nyan.RModes.Show where

import Fmt (build)

import Text.Interpolation.Nyan.Core

-- | Default render mode.
rmode' :: Show a => RMode a
rmode' :: RMode a
rmode' = (a -> Builder) -> RMode a
forall a. (a -> Builder) -> RMode a
RMode ((a -> Builder) -> RMode a) -> (a -> Builder) -> RMode a
forall a b. (a -> b) -> a -> b
$ String -> Builder
forall p. Buildable p => p -> Builder
build (String -> Builder) -> (a -> String) -> a -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
. a -> String
forall a. Show a => a -> String
show