mirrors/IHaskell
1
0
Fork 0
mirror of https://github.com/IHaskell/IHaskell.git synced 2025-04-16 19:36:06 +00:00
Code Issues Packages Projects Releases Wiki Activity

Update IHaskell kernel for MessageHeader mhBuffers

Browse Source
This commit is contained in:
James Brock 2020-02-28 01:43:55 +09:00
parent 8c43d47f09
commit 28dd8276a9
2 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
main/Main.hs
View File

@ -221,7 +221,7 @@ createReplyHeader parent = do
err = error $ "No reply for message " ++ show (mhMsgType parent)
return $ MessageHeader (mhIdentifiers parent) (Just parent) mempty
newMessageId (mhSessionId parent) (mhUsername parent) repType
newMessageId (mhSessionId parent) (mhUsername parent) repType []
-- | Compute a reply to a message.
replyTo :: ZeroMQInterface -> Message -> MessageHeader -> KernelState -> Interpreter (KernelState, Message)

1
src/IHaskell/IPython/Stdin.hs
View File

@ -94,6 +94,7 @@ getInputLine dir = do
. readMay <$> readFile fpath
let hdr = MessageHeader (mhIdentifiers parentHdr) (Just parentHdr) mempty
uuid (mhSessionId parentHdr) (mhUsername parentHdr) InputRequestMessage
[]
let msg = RequestInput hdr ""
writeChan req msg