github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2024-12-22 06:11:49 +03:00
Code Issues Projects Releases Wiki Activity

WildcardImport docs

Browse Source
This commit is contained in:
Timothy Clem 2018-03-07 08:33:36 -08:00
parent e830105a02
commit 5f5aa907cb
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/Data/Syntax/Declaration.hs
View File

@ -253,10 +253,10 @@ instance Evaluatable Import where
symbols = Map.fromList xs symbols = Map.fromList xs
directInsert k v rest = maybe rest (\symAlias -> envInsert symAlias v <$> rest) (Map.lookup k symbols) directInsert k v rest = maybe rest (\symAlias -> envInsert symAlias v <$> rest) (Map.lookup k symbols)
-- | A wildcard import -- | A wildcard import (all symbols are added directly to the calling env)
-- --
-- Import a module updating the importing environments. -- Import a module updating the importing environments.
data WildcardImport a = WildcardImport { wildcardImportFrom :: !a, wildcardImportSymbol :: !a } data WildcardImport a = WildcardImport { wildcardImportFrom :: !a, wildcardImportToken :: !a }
deriving (Diffable, Eq, Foldable, Functor, GAlign, Generic1, Mergeable, Ord, Show, Traversable, FreeVariables1) deriving (Diffable, Eq, Foldable, Functor, GAlign, Generic1, Mergeable, Ord, Show, Traversable, FreeVariables1)
instance Eq1 WildcardImport where liftEq = genericLiftEq instance Eq1 WildcardImport where liftEq = genericLiftEq