src/Blessings/String.hs


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21

{-# LANGUAGE FlexibleInstances #-}
{-# OPTIONS_GHC -fno-warn-orphans #-}

module Blessings.String
    ( module Blessings
    ) where

import Blessings
import Blessings.Internal
import qualified Data.List as L


instance Blessable String where
  length = L.length
  drop = L.drop
  take = L.take
  splitAt = L.splitAt
  break = L.break
  intercalate = L.intercalate
  fromWord8 = Prelude.show
  show = Prelude.show