Skip to content

Commit 4ac95de

Browse files
committed
fantomas
1 parent df22591 commit 4ac95de

File tree

1 file changed

+1
-2
lines changed

1 file changed

+1
-2
lines changed

src/Compiler/Checking/Expressions/CheckComputationExpressions.fs

Lines changed: 1 addition & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -2010,8 +2010,7 @@ let rec TryTranslateComputationExpression
20102010
(letRhsExpr :: [ for SynBinding(expr = andExpr) in andBangBindings -> andExpr ])
20112011
|> List.map (fun expr -> mkSourceExprConditional isFromSource expr ceenv.sourceMethInfo ceenv.builderValName)
20122012

2013-
let pats =
2014-
letPat :: [ for binding in andBangBindings -> mkTypedHeadPat binding ]
2013+
let pats = letPat :: [ for binding in andBangBindings -> mkTypedHeadPat binding ]
20152014

20162015
let sourcesRange = sources |> List.map (fun e -> e.Range) |> List.reduce unionRanges
20172016

0 commit comments

Comments
 (0)