Read actions for Strict text in scope by default.
This commit is contained in:
+1
-1
@@ -9,7 +9,7 @@ module Base (
|
|||||||
($!),
|
($!),
|
||||||
) where
|
) where
|
||||||
|
|
||||||
-- Glorious Glashgow Haskell Compiler
|
-- Glorious Glasgow Haskell Compiler
|
||||||
#if defined(__GLASGOW_HASKELL__) && ( __GLASGOW_HASKELL__ >= 600 )
|
#if defined(__GLASGOW_HASKELL__) && ( __GLASGOW_HASKELL__ >= 600 )
|
||||||
|
|
||||||
-- Base GHC types
|
-- Base GHC types
|
||||||
|
|||||||
+13
-7
@@ -31,16 +31,16 @@ import Conv as X
|
|||||||
import Panic as X
|
import Panic as X
|
||||||
|
|
||||||
import Base as Base hiding (
|
import Base as Base hiding (
|
||||||
putStr
|
putStr -- Overriden by Show.putStr
|
||||||
, putStrLn
|
, putStrLn -- Overriden by Show.putStrLn
|
||||||
, print
|
, print -- Overriden by Protolude.print
|
||||||
, show
|
, show -- Overriden by Protolude.show
|
||||||
, error
|
, error -- Overriden by Debug.error
|
||||||
, undefined
|
, undefined -- Overriden by Debug.undefined
|
||||||
)
|
)
|
||||||
import qualified Base as PBase
|
import qualified Base as PBase
|
||||||
|
|
||||||
-- Used for 'show'
|
-- Used for 'show', not exported.
|
||||||
import Data.String (String)
|
import Data.String (String)
|
||||||
|
|
||||||
-- Maybe'ized version of partial functions
|
-- Maybe'ized version of partial functions
|
||||||
@@ -276,6 +276,12 @@ import Data.Text as X (Text)
|
|||||||
import qualified Data.Text.Lazy
|
import qualified Data.Text.Lazy
|
||||||
import qualified Data.Text.IO
|
import qualified Data.Text.IO
|
||||||
|
|
||||||
|
import Data.Text.IO as X (
|
||||||
|
getLine
|
||||||
|
, getContents
|
||||||
|
, interact
|
||||||
|
)
|
||||||
|
|
||||||
import Data.Text.Lazy (
|
import Data.Text.Lazy (
|
||||||
toStrict
|
toStrict
|
||||||
, fromStrict
|
, fromStrict
|
||||||
|
|||||||
Reference in New Issue
Block a user