Skip to content

F
fsharp

dotNET Platform / fsharp
大约 1 年 前同步成功

通知 0
Star 1
Fork 0
F
fsharp

体验新版 GitCode，发现更多精彩内容 >>

提交 ba25fba6 编写于 作者: D Don Syme
浏览文件
操作

Merge commit '8c6588a9' into feature/ext

上级 61806240 8c6588a9
隐藏空白更改
内联 并排
Showing with 2 addition and 2 deletion
src/fsharp/service/ServiceParseTreeWalk.fs
浏览文件 @ ba25fba6
...@@ -461,7 +461,7 @@ module SyntaxTraversal = ...@@ -461,7 +461,7 @@ module SyntaxTraversal =
| SynExpr.Match (expr=synExpr; clauses=synMatchClauseList) -> | SynExpr.Match (expr=synExpr; clauses=synMatchClauseList) ->
[yield dive synExpr synExpr.Range traverseSynExpr [yield dive synExpr synExpr.Range traverseSynExpr
yield! synMatchClauseList |> List.map (fun x -> dive x x.RangeOfGuardAndRhs (traverseSynMatchClause path))] yield! synMatchClauseList |> List.map (fun x -> dive x x.Range (traverseSynMatchClause path))]
|> pick expr |> pick expr
| SynExpr.Do (synExpr, _range) -> traverseSynExpr synExpr | SynExpr.Do (synExpr, _range) -> traverseSynExpr synExpr
...@@ -608,7 +608,7 @@ module SyntaxTraversal = ...@@ -608,7 +608,7 @@ module SyntaxTraversal =
| SynExpr.MatchBang (expr=synExpr; clauses=synMatchClauseList) -> | SynExpr.MatchBang (expr=synExpr; clauses=synMatchClauseList) ->
[yield dive synExpr synExpr.Range traverseSynExpr [yield dive synExpr synExpr.Range traverseSynExpr
yield! synMatchClauseList |> List.map (fun x -> dive x x.RangeOfGuardAndRhs (traverseSynMatchClause path))] yield! synMatchClauseList |> List.map (fun x -> dive x x.Range (traverseSynMatchClause path))]
|> pick expr |> pick expr
| SynExpr.DoBang (synExpr, _range) -> traverseSynExpr synExpr | SynExpr.DoBang (synExpr, _range) -> traverseSynExpr synExpr
......
Markdown is supported
0% 或 .
You are about to add 0 people to the discussion. Proceed with caution.
先完成此消息的编辑！
想要评论请 注册 或