From 7dcab8f98720ee90cd5f6cf511c6a4bc762baad4 Mon Sep 17 00:00:00 2001 From: Rick Winfrey Date: Wed, 11 Jan 2017 15:06:28 -0800 Subject: [PATCH] Formatting --- src/Language/Go.hs | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/src/Language/Go.hs b/src/Language/Go.hs index 7a0979973..239113ecd 100644 --- a/src/Language/Go.hs +++ b/src/Language/Go.hs @@ -107,8 +107,7 @@ termConstructor source sourceSpan name range children _ = case name of children@[ty, _] -> case category (extract ty) of ArrayTy -> toImplicitArray children DictionaryTy -> toMap children - _ -> - toStruct children + _ -> toStruct children rest -> withRanges range Error rest $ S.Error rest toImplicitArray = \case [ty, values] -> withCategory ArrayLiteral (S.Array (Just ty) (toList $ unwrap values))