github/semantic
1
1
Fork 0
mirror of https://github.com/github/semantic.git synced 2025-01-03 04:51:57 +03:00
Code Issues Projects Releases Wiki Activity

Formatting

Browse Source
This commit is contained in:
Rick Winfrey 2017-01-11 15:06:28 -08:00
parent 9d9e3e295f
commit 7dcab8f987
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
src/Language/Go.hs
View File

@ -107,8 +107,7 @@ termConstructor source sourceSpan name range children _ = case name of
children@[ty, _] -> case category (extract ty) of children@[ty, _] -> case category (extract ty) of
ArrayTy -> toImplicitArray children ArrayTy -> toImplicitArray children
DictionaryTy -> toMap children DictionaryTy -> toMap children
_ -> _ -> toStruct children
toStruct children
rest -> withRanges range Error rest $ S.Error rest rest -> withRanges range Error rest $ S.Error rest
toImplicitArray = \case toImplicitArray = \case
[ty, values] -> withCategory ArrayLiteral (S.Array (Just ty) (toList $ unwrap values)) [ty, values] -> withCategory ArrayLiteral (S.Array (Just ty) (toList $ unwrap values))