A few more slide improvements
This commit is contained in:
parent
7d94018ebd
commit
b7375a048f
1 changed files with 4 additions and 1 deletions
|
@ -345,11 +345,14 @@ catchS (StateT f) onErr = StateT $ \s ->
|
|||
f s `catch` (flip runStateT s . onErr)
|
||||
```
|
||||
|
||||
No updated state is available from main action, since an exception was
|
||||
thrown. This is safe!
|
||||
|
||||
----
|
||||
|
||||
## Finally a problem
|
||||
|
||||
Loses state updates from g:
|
||||
Loses state updates in `g`:
|
||||
|
||||
```haskell
|
||||
finallyS (StateT f) (StateT g) = StateT $ \s ->
|
||||
|
|
Loading…
Reference in a new issue