[commit: packages/haskeline] master: Merge branch 'master' into bump-lower-dep (3600181)
git at git.haskell.org
git at git.haskell.org
Tue Dec 13 19:21:57 UTC 2016
Repository : ssh://git@git.haskell.org/haskeline
On branch : master
Link : http://git.haskell.org/packages/haskeline.git/commitdiff/3600181d0a5f10a8cfc64155f5b5ae86aa769cd9
>---------------------------------------------------------------
commit 3600181d0a5f10a8cfc64155f5b5ae86aa769cd9
Merge: a89ecc1 cec24a1
Author: Judah Jacobson <judah.jacobson at gmail.com>
Date: Sun Apr 24 09:50:02 2016 -0700
Merge branch 'master' into bump-lower-dep
Conflicts:
README.md
System/Console/Haskeline/Backend/Posix.hsc
haskeline.cabal
>---------------------------------------------------------------
3600181d0a5f10a8cfc64155f5b5ae86aa769cd9
README.md | 2 +-
System/Console/Haskeline.hs | 11 +++++++++
System/Console/Haskeline/Backend/Posix.hsc | 11 +++++----
System/Console/Haskeline/Backend/Win32.hsc | 26 ++++++++++----------
System/Console/Haskeline/Emacs.hs | 2 +-
System/Console/Haskeline/RunCommand.hs | 8 +++++++
System/Console/Haskeline/Term.hs | 38 +++++++++++++++++++++++-------
haskeline.cabal | 1 +
8 files changed, 72 insertions(+), 27 deletions(-)
diff --cc System/Console/Haskeline/Backend/Posix.hsc
index 0271a7f,c83d28b..865c095
--- a/System/Console/Haskeline/Backend/Posix.hsc
+++ b/System/Console/Haskeline/Backend/Posix.hsc
@@@ -284,23 -279,29 +284,26 @@@ posixRunTerm :
posixRunTerm hs layoutGetters keys wrapGetEvent evalBackend = do
ch <- newChan
fileRT <- posixFileRunTerm hs
- (enc,dec) <- newEncoders
return fileRT
- { closeTerm = closeTerm fileRT
- , termOps = Left TermOps
+ { termOps = Left TermOps
{ getLayout = tryGetLayouts layoutGetters
, withGetEvent = wrapGetEvent
- . withPosixGetEvent ch hs dec
+ . withPosixGetEvent ch hs
keys
, saveUnusedKeys = saveKeys ch
- , evalTerm =
- mapEvalTerm (runPosixT hs) lift evalBackend
+ , evalTerm = mapEvalTerm
- (runPosixT enc hs)
- (lift . lift)
- evalBackend
++ (runPosixT hs) lift evalBackend
+ , externalPrint = writeChan ch . ExternalPrint
}
+ , closeTerm = do
+ flushEventQueue (putStrOut fileRT) ch
+ closeTerm fileRT
}
-type PosixT m = ReaderT Encoder (ReaderT Handles m)
+type PosixT m = ReaderT Handles m
-runPosixT :: Monad m => Encoder -> Handles -> PosixT m a -> m a
-runPosixT enc h = runReaderT' h . runReaderT' enc
+runPosixT :: Monad m => Handles -> PosixT m a -> m a
+runPosixT h = runReaderT' h
fileRunTerm :: Handle -> IO RunTerm
fileRunTerm h_in = posixFileRunTerm Handles
diff --cc haskeline.cabal
index b5478ca,ea41164..af32974
--- a/haskeline.cabal
+++ b/haskeline.cabal
@@@ -16,8 -16,9 +16,9 @@@ Description
Haskell programs.
.
Haskeline runs both on POSIX-compatible systems and on Windows.
-Homepage: https://github.com/judah/haskeline
+Homepage: http://trac.haskell.org/haskeline
+ Bug-Reports: https://github.com/judah/haskeline/issues
-Stability: Experimental
+Stability: Stable
Build-Type: Custom
extra-source-files: examples/Test.hs Changelog
More information about the ghc-commits
mailing list