1
1
mirror of https://github.com/github/semantic.git synced 2024-12-20 21:31:48 +03:00

Use an empty graph when resuming a load error

This commit is contained in:
joshvera 2018-09-13 17:41:45 -04:00
parent 82db9f805e
commit f902cac04f

View File

@ -40,6 +40,7 @@ import Data.Abstract.Evaluatable
import Data.Abstract.Module
import qualified Data.Abstract.ModuleTable as ModuleTable
import Data.Abstract.Package as Package
import qualified Data.Abstract.ScopeGraph as ScopeGraph
import Data.Abstract.Value.Abstract as Abstract
import Data.Abstract.Value.Concrete as Concrete
(Value, ValueError (..), runBoolean, runFunction, runValueErrorWith)
@ -354,7 +355,7 @@ resumingLoadError :: ( Applicative (m address value effects)
=> m address value (Resumable (BaseError (LoadError address)) ': effects) a
-> m address value effects a
resumingLoadError = runLoadErrorWith (\ baseError -> traceError "LoadError" baseError *> case baseErrorException baseError of
ModuleNotFoundError _ -> pure (undefined, (lowerBound, hole)))
ModuleNotFoundError _ -> pure (ScopeGraph.emptyGraph, (lowerBound, hole)))
resumingEvalError :: ( Applicative (m effects)
, Effectful m