Skip to content
Projects
Groups
Snippets
Help
Loading...
Help
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
G
gargantext-ihaskell
Project
Project
Details
Activity
Releases
Cycle Analytics
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Charts
Issues
0
Issues
0
List
Board
Labels
Milestones
Merge Requests
0
Merge Requests
0
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Charts
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Charts
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
gargantext
gargantext-ihaskell
Commits
c5d9d43c
Commit
c5d9d43c
authored
Aug 03, 2019
by
Vaibhav Sagar
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
ipython-kernel: fix warnings
parent
a8931ad7
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
3 additions
and
3 deletions
+3
-3
Parser.hs
ipython-kernel/src/IHaskell/IPython/Message/Parser.hs
+1
-1
ZeroMQ.hs
ipython-kernel/src/IHaskell/IPython/ZeroMQ.hs
+2
-2
No files found.
ipython-kernel/src/IHaskell/IPython/Message/Parser.hs
View file @
c5d9d43c
...
@@ -15,7 +15,7 @@ import Data.ByteString hiding (unpack)
...
@@ -15,7 +15,7 @@ import Data.ByteString hiding (unpack)
import
qualified
Data.ByteString.Lazy
as
Lazy
import
qualified
Data.ByteString.Lazy
as
Lazy
import
Data.HashMap.Strict
as
HM
import
Data.HashMap.Strict
as
HM
import
Data.Maybe
(
fromMaybe
)
import
Data.Maybe
(
fromMaybe
)
import
Data.Text
(
Text
,
unpack
)
import
Data.Text
(
unpack
)
import
Debug.Trace
import
Debug.Trace
import
IHaskell.IPython.Types
import
IHaskell.IPython.Types
...
...
ipython-kernel/src/IHaskell/IPython/ZeroMQ.hs
View file @
c5d9d43c
...
@@ -194,9 +194,9 @@ serveStdin profile = do
...
@@ -194,9 +194,9 @@ serveStdin profile = do
-- | Serve on a given sock in a separate thread. Bind the sock in the | given context and then
-- | Serve on a given sock in a separate thread. Bind the sock in the | given context and then
-- loop the provided action, which should listen | on the sock and respond to any events.
-- loop the provided action, which should listen | on the sock and respond to any events.
serveSocket
::
SocketType
a
=>
Context
->
a
->
IP
->
Port
->
(
Socket
a
->
IO
b
)
->
IO
()
serveSocket
::
SocketType
a
=>
Context
->
a
->
IP
->
Port
->
(
Socket
a
->
IO
b
)
->
IO
()
serveSocket
ctxt
socketType
ip
port
action
=
void
$
serveSocket
ctxt
socketType
ip
Address
port
action
=
void
$
withSocket
ctxt
socketType
$
\
sock
->
do
withSocket
ctxt
socketType
$
\
sock
->
do
bind
sock
$
"tcp://"
++
ip
++
":"
++
show
port
bind
sock
$
"tcp://"
++
ip
Address
++
":"
++
show
port
forever
$
action
sock
forever
$
action
sock
-- | Listener on the heartbeat port. Echoes back any data it was sent.
-- | Listener on the heartbeat port. Echoes back any data it was sent.
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment