mirror of
https://github.com/bsima/haskell-urbit-api.git
synced 2024-08-17 22:10:55 +03:00
add note to test
This commit is contained in:
parent
809cf8cbb0
commit
0fa5ac2461
8
test.hs
8
test.hs
@ -49,8 +49,14 @@ main = do
|
||||
testing "ack" $
|
||||
ack sess ship 1 >> return True
|
||||
|
||||
-- These tests are basically just checking that a connection happens and
|
||||
-- doesn't throw, I need to pull in async in order to check for more
|
||||
-- correctness. Ideally: subscribe, send a message, then read the message to
|
||||
-- ensure its the same as the one sent. But maybe this is already tested in
|
||||
-- urbit core?
|
||||
|
||||
testing "subscribe" $ do
|
||||
s <- subscribe sess ship "/mailbox/~/~zod/mc" Data.Conduit.Binary.sinkLbs
|
||||
_ <- subscribe sess ship "/mailbox/~/~zod/mc" Data.Conduit.Binary.sinkLbs
|
||||
return True
|
||||
|
||||
fakezod :: Text -> Ship
|
||||
|
Loading…
Reference in New Issue
Block a user