1
1
mirror of https://github.com/github/semantic.git synced 2024-12-29 18:06:14 +03:00

Just say empty.

This commit is contained in:
Rob Rix 2018-04-25 16:58:25 -04:00
parent 028c94e4ec
commit 90e9fbb708

View File

@ -74,7 +74,7 @@ instance ( Ord location
= interpret
. runEvaluating
. raiseHandler
( flip runState (EvaluatorState empty empty empty empty empty empty empty)
( flip runState empty -- State (EvaluatorState location term value)
. flip runReader empty -- Reader (Environment location value)
. flip runReader empty -- Reader (ModuleTable [Module term])
. flip runReader empty -- Reader (SomeOrigin term)