voidlizard
/
hbs2
mirror of https://github.com/voidlizard/hbs2
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

maybe no-respawn on STM exception fixed

This commit is contained in:
Dmitry Zuikov 2023-11-14 05:38:34 +03:00
parent e107c318c3
commit fc52fabbf9
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
hbs2-peer/app/PeerMain.hs
View File

@ -571,7 +571,7 @@ runPeer :: forall e s . ( e ~ L4Proto
, HasStorage (PeerM e IO)
)=> PeerOpts -> IO ()
runPeer opts = U.handle (\e -> myException e
runPeer opts = Exception.handle (\e -> myException e
>> performGC
>> respawn opts
) $ runResourceT do