1
1
mirror of https://github.com/github/semantic.git synced 2024-12-19 21:01:35 +03:00

Implement eval for Alias so we don't eval the value twice

This commit is contained in:
joshvera 2019-01-23 17:52:28 -05:00
parent 1f3346012d
commit 52b698d9a2

View File

@ -126,6 +126,8 @@ toTuple :: Alias a -> (a, a)
toTuple Alias{..} = (aliasValue, aliasName)
instance Evaluatable Alias where
eval eval _ Alias{..} = eval aliasValue
ref _ ref Alias{..} = ref aliasValue
-- | Import declarations (symbols are added directly to the calling environment).
--