Tests

auduchinok · auduchinok · commit 6e285cfecff8 · 2023-04-10T13:50:18.000+02:00
diff --git a/tests/service/data/SyntaxTree/Expression/Lambda - Missing expr 01.fs b/tests/service/data/SyntaxTree/Expression/Lambda - Missing expr 01.fs
@@ -0,0 +1,3 @@
+module Module
+
+(fun _ -> )
diff --git a/tests/service/data/SyntaxTree/Expression/Lambda - Missing expr 01.fs.bsl b/tests/service/data/SyntaxTree/Expression/Lambda - Missing expr 01.fs.bsl
@@ -0,0 +1,25 @@
+ImplFile
+  (ParsedImplFileInput
+     ("/root/Expression/Lambda - Missing expr 01.fs", false,
+      QualifiedNameOfFile Module, [], [],
+      [SynModuleOrNamespace
+         ([Module], false, NamedModule,
+          [Expr
+             (Paren
+                (Lambda
+                   (false, false,
+                    SimplePats
+                      ([Id (_arg1, None, true, false, false, (3,5--3,6))],
+                       (3,5--3,6)),
+                    ArbitraryAfterError ("anonLambdaExpr2", (3,9--3,9)),
+                    Some
+                      ([Wild (3,5--3,6)],
+                       ArbitraryAfterError ("anonLambdaExpr2", (3,9--3,9))),
+                    (3,1--3,9), { ArrowRange = Some (3,7--3,9) }), (3,0--3,1),
+                 Some (3,10--3,11), (3,0--3,11)), (3,0--3,11))],
+          PreXmlDoc ((1,0), FSharp.Compiler.Xml.XmlDocCollector), [], None,
+          (1,0--3,11), { LeadingKeyword = Module (1,0--1,6) })], (true, true),
+      { ConditionalDirectives = []
+        CodeComments = [] }, set []))
+
+(3,1)-(3,9) parse error Missing function body
diff --git a/tests/service/data/SyntaxTree/Expression/Lambda - Missing expr 02.fs b/tests/service/data/SyntaxTree/Expression/Lambda - Missing expr 02.fs
@@ -0,0 +1,3 @@
+module Module
+
+fun _ ->
diff --git a/tests/service/data/SyntaxTree/Expression/Lambda - Missing expr 02.fs.bsl b/tests/service/data/SyntaxTree/Expression/Lambda - Missing expr 02.fs.bsl
@@ -0,0 +1,24 @@
+ImplFile
+  (ParsedImplFileInput
+     ("/root/Expression/Lambda - Missing expr 02.fs", false,
+      QualifiedNameOfFile Module, [], [],
+      [SynModuleOrNamespace
+         ([Module], false, NamedModule,
+          [Expr
+             (Lambda
+                (false, false,
+                 SimplePats
+                   ([Id (_arg1, None, true, false, false, (3,4--3,5))],
+                    (3,4--3,5)),
+                 ArbitraryAfterError ("anonLambdaExpr2", (3,8--3,8)),
+                 Some
+                   ([Wild (3,4--3,5)],
+                    ArbitraryAfterError ("anonLambdaExpr2", (3,8--3,8))),
+                 (3,0--3,8), { ArrowRange = Some (3,6--3,8) }), (3,0--3,8))],
+          PreXmlDoc ((1,0), FSharp.Compiler.Xml.XmlDocCollector), [], None,
+          (1,0--3,8), { LeadingKeyword = Module (1,0--1,6) })], (true, true),
+      { ConditionalDirectives = []
+        CodeComments = [] }, set []))
+
+(4,0)-(4,0) parse warning Possible incorrect indentation: this token is offside of context started at position (1:1). Try indenting this token further or using standard formatting conventions.
+(3,0)-(3,8) parse error Missing function body
diff --git a/tests/service/data/SyntaxTree/Expression/Lambda 01.fs b/tests/service/data/SyntaxTree/Expression/Lambda 01.fs
@@ -0,0 +1,3 @@
+module Module
+
+(fun _ -> ())
diff --git a/tests/service/data/SyntaxTree/Expression/Lambda 01.fs.bsl b/tests/service/data/SyntaxTree/Expression/Lambda 01.fs.bsl
@@ -0,0 +1,19 @@
+ImplFile
+  (ParsedImplFileInput
+     ("/root/Expression/Lambda 01.fs", false, QualifiedNameOfFile Module, [], [],
+      [SynModuleOrNamespace
+         ([Module], false, NamedModule,
+          [Expr
+             (Paren
+                (Lambda
+                   (false, false,
+                    SimplePats
+                      ([Id (_arg1, None, true, false, false, (3,5--3,6))],
+                       (3,5--3,6)), Const (Unit, (3,10--3,12)),
+                    Some ([Wild (3,5--3,6)], Const (Unit, (3,10--3,12))),
+                    (3,1--3,12), { ArrowRange = Some (3,7--3,9) }), (3,0--3,1),
+                 Some (3,12--3,13), (3,0--3,13)), (3,0--3,13))],
+          PreXmlDoc ((1,0), FSharp.Compiler.Xml.XmlDocCollector), [], None,
+          (1,0--3,13), { LeadingKeyword = Module (1,0--1,6) })], (true, true),
+      { ConditionalDirectives = []
+        CodeComments = [] }, set []))
diff --git a/tests/service/data/SyntaxTree/Expression/Lambda 02.fs b/tests/service/data/SyntaxTree/Expression/Lambda 02.fs
@@ -0,0 +1,3 @@
+module Module
+
+fun _ -> ()
diff --git a/tests/service/data/SyntaxTree/Expression/Lambda 02.fs.bsl b/tests/service/data/SyntaxTree/Expression/Lambda 02.fs.bsl
@@ -0,0 +1,17 @@
+ImplFile
+  (ParsedImplFileInput
+     ("/root/Expression/Lambda 02.fs", false, QualifiedNameOfFile Module, [], [],
+      [SynModuleOrNamespace
+         ([Module], false, NamedModule,
+          [Expr
+             (Lambda
+                (false, false,
+                 SimplePats
+                   ([Id (_arg1, None, true, false, false, (3,4--3,5))],
+                    (3,4--3,5)), Const (Unit, (3,9--3,11)),
+                 Some ([Wild (3,4--3,5)], Const (Unit, (3,9--3,11))),
+                 (3,0--3,11), { ArrowRange = Some (3,6--3,8) }), (3,0--3,11))],
+          PreXmlDoc ((1,0), FSharp.Compiler.Xml.XmlDocCollector), [], None,
+          (1,0--3,11), { LeadingKeyword = Module (1,0--1,6) })], (true, true),
+      { ConditionalDirectives = []
+        CodeComments = [] }, set []))
diff --git a/tests/service/data/SyntaxTree/Expression/List - Comprehension 01.fs b/tests/service/data/SyntaxTree/Expression/List - Comprehension 01.fs
@@ -0,0 +1,3 @@
+module Module
+
+[ for x in [] -> () ]
diff --git a/tests/service/data/SyntaxTree/Expression/List - Comprehension 01.fs.bsl b/tests/service/data/SyntaxTree/Expression/List - Comprehension 01.fs.bsl
@@ -0,0 +1,20 @@
+ImplFile
+  (ParsedImplFileInput
+     ("/root/Expression/List - Comprehension 01.fs", false,
+      QualifiedNameOfFile Module, [], [],
+      [SynModuleOrNamespace
+         ([Module], false, NamedModule,
+          [Expr
+             (ArrayOrListComputed
+                (false,
+                 ForEach
+                   (Yes (3,2--3,5), Yes (3,8--3,10), SeqExprOnly true, true,
+                    Named (SynIdent (x, None), false, None, (3,6--3,7)),
+                    ArrayOrList (false, [], (3,11--3,13)),
+                    YieldOrReturn
+                      ((true, false), Const (Unit, (3,17--3,19)), (3,14--3,19)),
+                    (3,2--3,19)), (3,0--3,21)), (3,0--3,21))],
+          PreXmlDoc ((1,0), FSharp.Compiler.Xml.XmlDocCollector), [], None,
+          (1,0--3,21), { LeadingKeyword = Module (1,0--1,6) })], (true, true),
+      { ConditionalDirectives = []
+        CodeComments = [] }, set []))
diff --git a/tests/service/data/SyntaxTree/Expression/List - Comprehension 02.fs b/tests/service/data/SyntaxTree/Expression/List - Comprehension 02.fs
@@ -0,0 +1,3 @@
+module Module
+
+[ for x in [] -> ]
diff --git a/tests/service/data/SyntaxTree/Expression/List - Comprehension 02.fs.bsl b/tests/service/data/SyntaxTree/Expression/List - Comprehension 02.fs.bsl
@@ -0,0 +1,24 @@
+ImplFile
+  (ParsedImplFileInput
+     ("/root/Expression/List - Comprehension 02.fs", false,
+      QualifiedNameOfFile Module, [], [],
+      [SynModuleOrNamespace
+         ([Module], false, NamedModule,
+          [Expr
+             (ArrayOrListComputed
+                (false,
+                 ForEach
+                   (Yes (3,2--3,5), Yes (3,8--3,10), SeqExprOnly true, true,
+                    Named (SynIdent (x, None), false, None, (3,6--3,7)),
+                    ArrayOrList (false, [], (3,11--3,13)),
+                    YieldOrReturn
+                      ((true, false),
+                       ArbitraryAfterError
+                         ("typedSequentialExprBlockR", (3,14--3,16)),
+                       (3,14--3,16)), (3,2--3,16)), (3,0--3,18)), (3,0--3,18))],
+          PreXmlDoc ((1,0), FSharp.Compiler.Xml.XmlDocCollector), [], None,
+          (1,0--3,18), { LeadingKeyword = Module (1,0--1,6) })], (true, true),
+      { ConditionalDirectives = []
+        CodeComments = [] }, set []))
+
+(3,17)-(3,18) parse error Incomplete structured construct at or before this point in expression
diff --git a/tests/service/data/SyntaxTree/Expression/Rarrow 01.fs b/tests/service/data/SyntaxTree/Expression/Rarrow 01.fs
@@ -0,0 +1,3 @@
+module Module
+
+-> 1
diff --git a/tests/service/data/SyntaxTree/Expression/Rarrow 01.fs.bsl b/tests/service/data/SyntaxTree/Expression/Rarrow 01.fs.bsl
@@ -0,0 +1,15 @@
+ImplFile
+  (ParsedImplFileInput
+     ("/root/Expression/Rarrow 01.fs", false, QualifiedNameOfFile Module, [], [],
+      [SynModuleOrNamespace
+         ([Module], false, NamedModule,
+          [Expr
+             (YieldOrReturn
+                ((true, true), Const (Int32 1, (3,3--3,4)), (3,0--3,4)),
+              (3,0--3,4))],
+          PreXmlDoc ((1,0), FSharp.Compiler.Xml.XmlDocCollector), [], None,
+          (1,0--3,4), { LeadingKeyword = Module (1,0--1,6) })], (true, true),
+      { ConditionalDirectives = []
+        CodeComments = [] }, set []))
+
+(3,0)-(3,4) parse error The use of '->' in sequence and computation expressions is limited to the form 'for pat in expr -> expr'. Use the syntax 'for ... in ... do ... yield...' to generate elements in more complex sequence expressions.
diff --git a/tests/service/data/SyntaxTree/Expression/Rarrow 02.fs b/tests/service/data/SyntaxTree/Expression/Rarrow 02.fs
@@ -0,0 +1,3 @@
+module Module
+
+->
diff --git a/tests/service/data/SyntaxTree/Expression/Rarrow 02.fs.bsl b/tests/service/data/SyntaxTree/Expression/Rarrow 02.fs.bsl
@@ -0,0 +1,17 @@
+ImplFile
+  (ParsedImplFileInput
+     ("/root/Expression/Rarrow 02.fs", false, QualifiedNameOfFile Module, [], [],
+      [SynModuleOrNamespace
+         ([Module], false, NamedModule,
+          [Expr
+             (YieldOrReturn
+                ((true, true),
+                 ArbitraryAfterError ("typedSequentialExprBlockR", (3,0--3,2)),
+                 (3,0--3,2)), (3,0--3,2))],
+          PreXmlDoc ((1,0), FSharp.Compiler.Xml.XmlDocCollector), [], None,
+          (1,0--3,2), { LeadingKeyword = Module (1,0--1,6) })], (true, true),
+      { ConditionalDirectives = []
+        CodeComments = [] }, set []))
+
+(3,0)-(3,2) parse error Incomplete structured construct at or before this point in expression
+(3,0)-(3,2) parse error The use of '->' in sequence and computation expressions is limited to the form 'for pat in expr -> expr'. Use the syntax 'for ... in ... do ... yield...' to generate elements in more complex sequence expressions.
diff --git a/tests/service/data/SyntaxTree/Expression/Rarrow 03.fs b/tests/service/data/SyntaxTree/Expression/Rarrow 03.fs
@@ -0,0 +1,3 @@
+module Module
+
+-> ->
diff --git a/tests/service/data/SyntaxTree/Expression/Rarrow 03.fs.bsl b/tests/service/data/SyntaxTree/Expression/Rarrow 03.fs.bsl
@@ -0,0 +1,21 @@
+ImplFile
+  (ParsedImplFileInput
+     ("/root/Expression/Rarrow 03.fs", false, QualifiedNameOfFile Module, [], [],
+      [SynModuleOrNamespace
+         ([Module], false, NamedModule,
+          [Expr
+             (YieldOrReturn
+                ((true, true),
+                 YieldOrReturn
+                   ((true, true),
+                    ArbitraryAfterError
+                      ("typedSequentialExprBlockR", (3,3--3,5)), (3,3--3,5)),
+                 (3,0--3,5)), (3,0--3,5))],
+          PreXmlDoc ((1,0), FSharp.Compiler.Xml.XmlDocCollector), [], None,
+          (1,0--3,5), { LeadingKeyword = Module (1,0--1,6) })], (true, true),
+      { ConditionalDirectives = []
+        CodeComments = [] }, set []))
+
+(3,0)-(3,5) parse error Incomplete structured construct at or before this point in expression
+(3,3)-(3,5) parse error The use of '->' in sequence and computation expressions is limited to the form 'for pat in expr -> expr'. Use the syntax 'for ... in ... do ... yield...' to generate elements in more complex sequence expressions.
+(3,0)-(3,5) parse error The use of '->' in sequence and computation expressions is limited to the form 'for pat in expr -> expr'. Use the syntax 'for ... in ... do ... yield...' to generate elements in more complex sequence expressions.
diff --git a/tests/service/data/SyntaxTree/Expression/Try with - Missing expr 01.fs b/tests/service/data/SyntaxTree/Expression/Try with - Missing expr 01.fs
@@ -0,0 +1,4 @@
+module Module
+
+try
+with _ -> ()
diff --git a/tests/service/data/SyntaxTree/Expression/Try with - Missing expr 01.fs.bsl b/tests/service/data/SyntaxTree/Expression/Try with - Missing expr 01.fs.bsl
@@ -0,0 +1,24 @@
+ImplFile
+  (ParsedImplFileInput
+     ("/root/Expression/Try with - Missing expr 01.fs", false,
+      QualifiedNameOfFile Module, [], [],
+      [SynModuleOrNamespace
+         ([Module], false, NamedModule,
+          [Expr
+             (TryWith
+                (ArbitraryAfterError ("typedSequentialExprBlockR", (3,0--3,3)),
+                 [SynMatchClause
+                    (Wild (4,5--4,6), None, Const (Unit, (4,10--4,12)),
+                     (4,5--4,12), Yes, { ArrowRange = Some (4,7--4,9)
+                                         BarRange = None })], (3,0--4,12),
+                 Yes (3,0--3,3), Yes (4,0--4,4),
+                 { TryKeyword = (3,0--3,3)
+                   TryToWithRange = (3,0--4,4)
+                   WithKeyword = (4,0--4,4)
+                   WithToEndRange = (4,0--4,12) }), (3,0--4,12))],
+          PreXmlDoc ((1,0), FSharp.Compiler.Xml.XmlDocCollector), [], None,
+          (1,0--4,12), { LeadingKeyword = Module (1,0--1,6) })], (true, true),
+      { ConditionalDirectives = []
+        CodeComments = [] }, set []))
+
+(4,0)-(4,4) parse error Incomplete structured construct at or before this point in expression
diff --git a/tests/service/data/SyntaxTree/Expression/Try with - Missing expr 02.fs b/tests/service/data/SyntaxTree/Expression/Try with - Missing expr 02.fs
@@ -0,0 +1,4 @@
+module Module
+
+try 
+with _ ->
diff --git a/tests/service/data/SyntaxTree/Expression/Try with - Missing expr 02.fs.bsl b/tests/service/data/SyntaxTree/Expression/Try with - Missing expr 02.fs.bsl
@@ -0,0 +1,27 @@
+ImplFile
+  (ParsedImplFileInput
+     ("/root/Expression/Try with - Missing expr 02.fs", false,
+      QualifiedNameOfFile Module, [], [],
+      [SynModuleOrNamespace
+         ([Module], false, NamedModule,
+          [Expr
+             (TryWith
+                (ArbitraryAfterError ("typedSequentialExprBlockR", (3,0--3,3)),
+                 [SynMatchClause
+                    (Wild (4,5--4,6), None,
+                     ArbitraryAfterError
+                       ("typedSequentialExprBlockR", (4,7--4,9)), (4,5--4,9),
+                     Yes, { ArrowRange = Some (4,7--4,9)
+                            BarRange = None })], (3,0--4,9), Yes (3,0--3,3),
+                 Yes (4,0--4,4), { TryKeyword = (3,0--3,3)
+                                   TryToWithRange = (3,0--4,4)
+                                   WithKeyword = (4,0--4,4)
+                                   WithToEndRange = (4,0--4,9) }), (3,0--4,9))],
+          PreXmlDoc ((1,0), FSharp.Compiler.Xml.XmlDocCollector), [], None,
+          (1,0--4,9), { LeadingKeyword = Module (1,0--1,6) })], (true, true),
+      { ConditionalDirectives = []
+        CodeComments = [] }, set []))
+
+(4,0)-(4,4) parse error Incomplete structured construct at or before this point in expression
+(4,0)-(4,9) parse warning Possible incorrect indentation: this token is offside of context started at position (3:1). Try indenting this token further or using standard formatting conventions.
+(4,0)-(4,9) parse error Incomplete structured construct at or before this point in pattern matching
diff --git a/tests/service/data/SyntaxTree/Expression/Try with - Missing expr 03.fs b/tests/service/data/SyntaxTree/Expression/Try with - Missing expr 03.fs
@@ -0,0 +1,3 @@
+module Module
+
+try 
diff --git a/tests/service/data/SyntaxTree/Expression/Try with - Missing expr 03.fs.bsl b/tests/service/data/SyntaxTree/Expression/Try with - Missing expr 03.fs.bsl
@@ -0,0 +1,22 @@
+ImplFile
+  (ParsedImplFileInput
+     ("/root/Expression/Try with - Missing expr 03.fs", false,
+      QualifiedNameOfFile Module, [], [],
+      [SynModuleOrNamespace
+         ([Module], false, NamedModule,
+          [Expr
+             (TryWith
+                (ArbitraryAfterError ("typedSequentialExprBlockR", (3,0--3,3)),
+                 [], (3,0--3,3), Yes (3,0--3,3), Yes (3,3--3,3),
+                 { TryKeyword = (3,0--3,3)
+                   TryToWithRange = (3,0--3,3)
+                   WithKeyword = (3,3--3,3)
+                   WithToEndRange = (3,0--3,3) }), (3,0--3,3))],
+          PreXmlDoc ((1,0), FSharp.Compiler.Xml.XmlDocCollector), [], None,
+          (1,0--3,3), { LeadingKeyword = Module (1,0--1,6) })], (true, true),
+      { ConditionalDirectives = []
+        CodeComments = [] }, set []))
+
+(4,0)-(4,0) parse warning Possible incorrect indentation: this token is offside of context started at position (3:1). Try indenting this token further or using standard formatting conventions.
+(4,0)-(4,0) parse error Incomplete structured construct at or before this point in expression
+(3,0)-(3,3) parse error Unexpected end of input in 'try' expression. Expected 'try <expr> with <rules>' or 'try <expr> finally <expr>'.
diff --git a/tests/service/data/SyntaxTree/Expression/Try with - Missing expr 04.fs b/tests/service/data/SyntaxTree/Expression/Try with - Missing expr 04.fs
@@ -0,0 +1,5 @@
+module Module
+
+try 
+
+let _ = ()
diff --git a/tests/service/data/SyntaxTree/Expression/Try with - Missing expr 04.fs.bsl b/tests/service/data/SyntaxTree/Expression/Try with - Missing expr 04.fs.bsl
@@ -0,0 +1,34 @@
+ImplFile
+  (ParsedImplFileInput
+     ("/root/Expression/Try with - Missing expr 04.fs", false,
+      QualifiedNameOfFile Module, [], [],
+      [SynModuleOrNamespace
+         ([Module], false, NamedModule,
+          [Expr
+             (TryWith
+                (LetOrUse
+                   (false, false,
+                    [SynBinding
+                       (None, Normal, false, false, [],
+                        PreXmlDoc ((5,0), FSharp.Compiler.Xml.XmlDocCollector),
+                        SynValData
+                          (None, SynValInfo ([], SynArgInfo ([], false, None)),
+                           None), Wild (5,4--5,5), None,
+                        Const (Unit, (5,8--5,10)), (5,4--5,5), Yes (5,0--5,10),
+                        { LeadingKeyword = Let (5,0--5,3)
+                          InlineKeyword = None
+                          EqualsRange = Some (5,6--5,7) })],
+                    ArbitraryAfterError ("seqExpr", (5,10--5,10)), (5,0--5,10),
+                    { InKeyword = None }), [], (3,0--5,10), Yes (3,0--3,3),
+                 Yes (5,10--5,10), { TryKeyword = (3,0--3,3)
+                                     TryToWithRange = (3,0--5,10)
+                                     WithKeyword = (5,10--5,10)
+                                     WithToEndRange = (3,0--5,10) }),
+              (3,0--5,10))],
+          PreXmlDoc ((1,0), FSharp.Compiler.Xml.XmlDocCollector), [], None,
+          (1,0--5,10), { LeadingKeyword = Module (1,0--1,6) })], (true, true),
+      { ConditionalDirectives = []
+        CodeComments = [] }, set []))
+
+(5,0)-(5,3) parse error The block following this 'let' is unfinished. Every code block is an expression and must have a result. 'let' cannot be the final code element in a block. Consider giving this block an explicit result.
+(6,0)-(6,0) parse error Incomplete structured construct at or before this point in expression. Expected 'finally', 'with' or other token.
diff --git a/tests/service/data/SyntaxTree/Expression/Try with - Missing expr 05.fs b/tests/service/data/SyntaxTree/Expression/Try with - Missing expr 05.fs
@@ -0,0 +1,6 @@
+module Module
+
+try 
+
+module Nested =
+    ()
diff --git a/tests/service/data/SyntaxTree/Expression/Try with - Missing expr 05.fs.bsl b/tests/service/data/SyntaxTree/Expression/Try with - Missing expr 05.fs.bsl
@@ -0,0 +1,21 @@
+ImplFile
+  (ParsedImplFileInput
+     ("/root/Expression/Try with - Missing expr 05.fs", false,
+      QualifiedNameOfFile Module, [], [],
+      [SynModuleOrNamespace
+         ([Module], false, NamedModule,
+          [Expr
+             (TryWith
+                (ArbitraryAfterError ("typedSequentialExprBlockR", (3,0--3,3)),
+                 [], (3,0--3,3), Yes (3,0--3,3), Yes (3,3--3,3),
+                 { TryKeyword = (3,0--3,3)
+                   TryToWithRange = (3,0--3,3)
+                   WithKeyword = (3,3--3,3)
+                   WithToEndRange = (3,0--3,3) }), (3,0--3,3))],
+          PreXmlDoc ((1,0), FSharp.Compiler.Xml.XmlDocCollector), [], None,
+          (1,0--3,3), { LeadingKeyword = Module (1,0--1,6) })], (true, true),
+      { ConditionalDirectives = []
+        CodeComments = [] }, set []))
+
+(5,0)-(5,6) parse error Incomplete structured construct at or before this point in expression
+(3,0)-(3,3) parse error Unexpected end of input in 'try' expression. Expected 'try <expr> with <rules>' or 'try <expr> finally <expr>'.
diff --git a/tests/service/data/SyntaxTree/Expression/Try with 01.fs b/tests/service/data/SyntaxTree/Expression/Try with 01.fs
diff --git a/tests/service/data/SyntaxTree/Expression/Try with 01.fs.bsl b/tests/service/data/SyntaxTree/Expression/Try with 01.fs.bsl
diff --git a/tests/service/data/SyntaxTree/MatchClause/Missing expr 01.fs b/tests/service/data/SyntaxTree/MatchClause/Missing expr 01.fs
diff --git a/tests/service/data/SyntaxTree/MatchClause/Missing expr 01.fs.bsl b/tests/service/data/SyntaxTree/MatchClause/Missing expr 01.fs.bsl
diff --git a/tests/service/data/SyntaxTree/MatchClause/Missing expr 02.fs b/tests/service/data/SyntaxTree/MatchClause/Missing expr 02.fs
diff --git a/tests/service/data/SyntaxTree/MatchClause/Missing expr 02.fs.bsl b/tests/service/data/SyntaxTree/MatchClause/Missing expr 02.fs.bsl
diff --git a/tests/service/data/SyntaxTree/MatchClause/Missing expr 03.fs b/tests/service/data/SyntaxTree/MatchClause/Missing expr 03.fs
diff --git a/tests/service/data/SyntaxTree/MatchClause/Missing expr 03.fs.bsl b/tests/service/data/SyntaxTree/MatchClause/Missing expr 03.fs.bsl
diff --git a/tests/service/data/SyntaxTree/MatchClause/Missing expr 04.fs b/tests/service/data/SyntaxTree/MatchClause/Missing expr 04.fs
diff --git a/tests/service/data/SyntaxTree/MatchClause/Missing expr 04.fs.bsl b/tests/service/data/SyntaxTree/MatchClause/Missing expr 04.fs.bsl

Original file line number	Diff line number	Diff line change
`@@ -0,0 +1,3 @@`
	`1`	`+module Module`
	`2`	`+`
	`3`	`+(fun _ -> ())`
Original file line number	Diff line number	Diff line change
`@@ -0,0 +1,3 @@`
	`1`	`+module Module`
	`2`	`+`
	`3`	`+[ for x in [] -> () ]`