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

Int, not Int64.

Browse Source
This commit is contained in:
Rob Rix 2019-10-10 15:38:42 -04:00
parent c2764b76b6
commit 5f7ecbdd04
No known key found for this signature in database
GPG Key ID: F188A01508EA1CF7
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -13,7 +13,6 @@ module Control.Effect.Readline
) where
import Control.Effect.Carrier
import Data.Int
import Data.String
import Data.Text.Prettyprint.Doc
import Data.Text.Prettyprint.Doc.Render.Terminal
@ -39,7 +38,7 @@ println :: (Carrier sig m, Member Readline sig) => Doc AnsiStyle -> m ()
println s = print s >> print "\n"
newtype Line = Line Int64
newtype Line = Line Int
increment :: Line -> Line
increment (Line n) = Line (n + 1)