github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2024-11-28 01:47:01 +03:00
Code Issues Projects Releases Wiki Activity

🔥 println.

Browse Source
This commit is contained in:
Rob Rix 2019-10-10 16:10:24 -04:00
parent 45de2f56a6
commit 2e61978b98
No known key found for this signature in database
GPG Key ID: F188A01508EA1CF7
1 changed files with 0 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
semantic-core/src/Control/Effect/Readline.hs
View File

@ -4,7 +4,6 @@ module Control.Effect.Readline
Readline (..)
, prompt
, print
, println
-- * Re-exports
, Carrier
) where
@ -29,6 +28,3 @@ prompt p = send (Prompt p (curry pure))
print :: (Carrier sig m, Member Readline sig) => Doc AnsiStyle -> m ()
print s = send (Print s (pure ()))
println :: (Carrier sig m, Member Readline sig) => Doc AnsiStyle -> m ()
println s = print s >> print "\n"