From 5f5aa907cb4cf88c3cba271a96e3f0dc5c9e3d24 Mon Sep 17 00:00:00 2001 From: Timothy Clem Date: Wed, 7 Mar 2018 08:33:36 -0800 Subject: [PATCH] WildcardImport docs --- src/Data/Syntax/Declaration.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/Data/Syntax/Declaration.hs b/src/Data/Syntax/Declaration.hs index e29555c7b..f50a59a3c 100644 --- a/src/Data/Syntax/Declaration.hs +++ b/src/Data/Syntax/Declaration.hs @@ -253,10 +253,10 @@ instance Evaluatable Import where symbols = Map.fromList xs 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. -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) instance Eq1 WildcardImport where liftEq = genericLiftEq