diff --git a/src/Elm/Parser/Expression.elm b/src/Elm/Parser/Expression.elm index 1a4c5ad4..414d9f79 100644 --- a/src/Elm/Parser/Expression.elm +++ b/src/Elm/Parser/Expression.elm @@ -569,8 +569,8 @@ letDestructuringDeclaration = } ) Patterns.patternNotDirectlyComposing + (Layout.maybeLayoutUntilIgnored ParserFast.symbol "=") Layout.maybeLayout - (ParserFast.symbolFollowedBy "=" Layout.maybeLayout) expression diff --git a/src/Elm/Parser/Modules.elm b/src/Elm/Parser/Modules.elm index 1d8c2c1c..997659cf 100644 --- a/src/Elm/Parser/Modules.elm +++ b/src/Elm/Parser/Modules.elm @@ -105,8 +105,10 @@ effectModuleDefinition = ) } ) - (ParserFast.keywordFollowedBy "effect" Layout.maybeLayout) - (ParserFast.keywordFollowedBy "module" Layout.maybeLayout) + (ParserFast.keywordFollowedBy "effect" + (Layout.maybeLayoutUntilIgnored ParserFast.keyword "module") + ) + Layout.maybeLayout moduleName Layout.maybeLayout effectWhereClauses @@ -151,8 +153,10 @@ portModuleDefinition = (PortModule { moduleName = moduleName, exposingList = exposingList.syntax }) } ) - (ParserFast.keywordFollowedBy "port" Layout.maybeLayout) - (ParserFast.keywordFollowedBy "module" Layout.maybeLayout) + (ParserFast.keywordFollowedBy "port" + (Layout.maybeLayoutUntilIgnored ParserFast.keyword "module") + ) + Layout.maybeLayout moduleName Layout.maybeLayout exposeDefinition