urbit/shrub
1
1
Fork 0
mirror of https://github.com/urbit/shrub.git synced 2024-12-20 09:21:42 +03:00
Code Issues Packages Projects Releases Wiki Activity

king: ames: add stderr when sending before having turfs

Browse Source
This commit is contained in:
pilfer-pandex 2020-07-30 15:47:38 -07:00
parent 5e65abcb7a
commit 1691c984dd
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
pkg/hs/urbit-king/lib/Urbit/Vere/Ames.hs
View File

@ -229,7 +229,7 @@ ames env who isFake enqueueEv stderr = (initialEvents, runAmes)
NewtEfSend (_id, ()) dest (MkBytes bs) -> do NewtEfSend (_id, ()) dest (MkBytes bs) -> do
atomically (readTVar aTurfs) >>= \case atomically (readTVar aTurfs) >>= \case
Nothing -> pure () Nothing -> stderr "ames: send before turfs" >> pure ()
Just turfs -> sendPacket drv mode dest bs Just turfs -> sendPacket drv mode dest bs
sendPacket :: AmesDrv -> NetworkMode -> AmesDest -> ByteString -> RIO e () sendPacket :: AmesDrv -> NetworkMode -> AmesDest -> ByteString -> RIO e ()