mirror of
https://github.com/github/semantic.git
synced 2024-12-01 09:15:01 +03:00
We don’t actually need Trace
here.
This commit is contained in:
parent
992cb0a404
commit
7eec6d7d88
@ -37,7 +37,6 @@ evaluate
|
|||||||
. runValueError
|
. runValueError
|
||||||
. runEnvironmentError
|
. runEnvironmentError
|
||||||
. runAddressError
|
. runAddressError
|
||||||
. runIgnoringTrace
|
|
||||||
. runAllocator @Precise @_ @Val
|
. runAllocator @Precise @_ @Val
|
||||||
. (>>= deref . snd)
|
. (>>= deref . snd)
|
||||||
. runEnv lowerBound
|
. runEnv lowerBound
|
||||||
@ -53,7 +52,6 @@ newtype SpecEff a = SpecEff
|
|||||||
, Exc (Return Precise)
|
, Exc (Return Precise)
|
||||||
, Env Precise
|
, Env Precise
|
||||||
, Allocator Precise Val
|
, Allocator Precise Val
|
||||||
, Trace
|
|
||||||
, Resumable (AddressError Precise Val)
|
, Resumable (AddressError Precise Val)
|
||||||
, Resumable (EnvironmentError Precise)
|
, Resumable (EnvironmentError Precise)
|
||||||
, Resumable (ValueError Precise SpecEff)
|
, Resumable (ValueError Precise SpecEff)
|
||||||
|
Loading…
Reference in New Issue
Block a user