Skip to content

Commit e5b5efd

Browse files
committed
fantomas
1 parent 45ad26f commit e5b5efd

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
@@ -2012,8 +2012,7 @@ let rec TryTranslateComputationExpression
20122012
(letRhsExpr :: [ for SynBinding(expr = andExpr) in andBangBindings -> andExpr ])
20132013
|> List.map (fun expr -> mkSourceExprConditional isFromSource expr ceenv.sourceMethInfo ceenv.builderValName)
20142014

2015-
let pats =
2016-
letPat :: [ for binding in andBangBindings -> mkTypedHeadPat binding ]
2015+
let pats = letPat :: [ for binding in andBangBindings -> mkTypedHeadPat binding ]
20172016

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

0 commit comments

Comments
 (0)