mirror of
https://github.com/github/semantic.git
synced 2025-01-05 05:58:34 +03:00
Fix lint
This commit is contained in:
parent
1af0ea0534
commit
8d5f0bb549
@ -328,7 +328,7 @@ instance Declarations1 Assignment where
|
||||
|
||||
instance Evaluatable Assignment where
|
||||
eval eval ref Assignment{..} = do
|
||||
(lhsName, relation) <- case (declaredName assignmentTarget) of
|
||||
(lhsName, relation) <- case declaredName assignmentTarget of
|
||||
Just name -> pure (name, Default)
|
||||
_ -> gensym >>= \name -> pure (name, Gensym)
|
||||
maybeSlot <- maybeLookupDeclaration (Declaration lhsName)
|
||||
|
Loading…
Reference in New Issue
Block a user