Skip to content

Commit 95180ae

Browse files
edgarfgpedgarfgp
committed
Add SyntaxTree tests
1 parent 28cf61f commit 95180ae

File tree

4 files changed

+155
-0
lines changed

4 files changed

+155
-0
lines changed

‎tests/service/data/SyntaxTree/Expression/AnonymousRecords-07.fs

Lines changed: 10 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,10 @@
1+
module Module
2+
3+
{|a=1<m> |}
4+
5+
{|a=1<m>|}
6+
7+
{| a=1<m>|}
8+
9+
{| a=1<m> |}
10+

‎tests/service/data/SyntaxTree/Expression/AnonymousRecords-07.fs.bsl

Lines changed: 54 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,54 @@
1+
ImplFile
2+
(ParsedImplFileInput
3+
("/root/Expression/AnonymousRecords-07.fs", false,
4+
QualifiedNameOfFile Module, [], [],
5+
[SynModuleOrNamespace
6+
([Module], false, NamedModule,
7+
[Expr
8+
(AnonRecd
9+
(false, None,
10+
[(SynLongIdent ([a], [], [None]), Some (3,3--3,4),
11+
Const
12+
(Measure
13+
(Int32 1, (3,4--3,5),
14+
Seq ([Named ([m], (3,6--3,7))], (3,6--3,7)),
15+
{ LessRange = (3,5--3,6)
16+
GreaterRange = (3,7--3,8) }), (3,4--3,8)))],
17+
(3,0--3,11), { OpeningBraceRange = (3,0--3,2) }), (3,0--3,11));
18+
Expr
19+
(AnonRecd
20+
(false, None,
21+
[(SynLongIdent ([a], [], [None]), Some (5,3--5,4),
22+
Const
23+
(Measure
24+
(Int32 1, (5,4--5,5),
25+
Seq ([Named ([m], (5,6--5,7))], (5,6--5,7)),
26+
{ LessRange = (5,5--5,6)
27+
GreaterRange = (5,7--5,8) }), (5,4--5,8)))],
28+
(5,0--5,10), { OpeningBraceRange = (5,0--5,2) }), (5,0--5,10));
29+
Expr
30+
(AnonRecd
31+
(false, None,
32+
[(SynLongIdent ([a], [], [None]), Some (7,4--7,5),
33+
Const
34+
(Measure
35+
(Int32 1, (7,5--7,6),
36+
Seq ([Named ([m], (7,7--7,8))], (7,7--7,8)),
37+
{ LessRange = (7,6--7,7)
38+
GreaterRange = (7,8--7,9) }), (7,5--7,9)))],
39+
(7,0--7,11), { OpeningBraceRange = (7,0--7,2) }), (7,0--7,11));
40+
Expr
41+
(AnonRecd
42+
(false, None,
43+
[(SynLongIdent ([a], [], [None]), Some (9,4--9,5),
44+
Const
45+
(Measure
46+
(Int32 1, (9,5--9,6),
47+
Seq ([Named ([m], (9,7--9,8))], (9,7--9,8)),
48+
{ LessRange = (9,6--9,7)
49+
GreaterRange = (9,8--9,9) }), (9,5--9,9)))],
50+
(9,0--9,12), { OpeningBraceRange = (9,0--9,2) }), (9,0--9,12))],
51+
PreXmlDoc ((1,0), FSharp.Compiler.Xml.XmlDocCollector), [], None,
52+
(1,0--9,12), { LeadingKeyword = Module (1,0--1,6) })], (true, true),
53+
{ ConditionalDirectives = []
54+
CodeComments = [] }, set []))

‎tests/service/data/SyntaxTree/Expression/AnonymousRecords-08.fs

Lines changed: 9 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,9 @@
1+
module Module
2+
3+
{|a=1<m>; b=2<m> |}
4+
5+
{|a=1<m>; b=2<m>|}
6+
7+
{| a=1<m>; b=2<m>|}
8+
9+
{| a=1<m>; b=2<m> |}

‎tests/service/data/SyntaxTree/Expression/AnonymousRecords-08.fs.bsl

Lines changed: 82 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,82 @@
1+
ImplFile
2+
(ParsedImplFileInput
3+
("/root/Expression/AnonymousRecords-08.fs", false,
4+
QualifiedNameOfFile Module, [], [],
5+
[SynModuleOrNamespace
6+
([Module], false, NamedModule,
7+
[Expr
8+
(AnonRecd
9+
(false, None,
10+
[(SynLongIdent ([a], [], [None]), Some (3,3--3,4),
11+
Const
12+
(Measure
13+
(Int32 1, (3,4--3,5),
14+
Seq ([Named ([m], (3,6--3,7))], (3,6--3,7)),
15+
{ LessRange = (3,5--3,6)
16+
GreaterRange = (3,7--3,8) }), (3,4--3,8)));
17+
(SynLongIdent ([b], [], [None]), Some (3,11--3,12),
18+
Const
19+
(Measure
20+
(Int32 2, (3,12--3,13),
21+
Seq ([Named ([m], (3,14--3,15))], (3,14--3,15)),
22+
{ LessRange = (3,13--3,14)
23+
GreaterRange = (3,15--3,16) }), (3,12--3,16)))],
24+
(3,0--3,19), { OpeningBraceRange = (3,0--3,2) }), (3,0--3,19));
25+
Expr
26+
(AnonRecd
27+
(false, None,
28+
[(SynLongIdent ([a], [], [None]), Some (5,3--5,4),
29+
Const
30+
(Measure
31+
(Int32 1, (5,4--5,5),
32+
Seq ([Named ([m], (5,6--5,7))], (5,6--5,7)),
33+
{ LessRange = (5,5--5,6)
34+
GreaterRange = (5,7--5,8) }), (5,4--5,8)));
35+
(SynLongIdent ([b], [], [None]), Some (5,11--5,12),
36+
Const
37+
(Measure
38+
(Int32 2, (5,12--5,13),
39+
Seq ([Named ([m], (5,14--5,15))], (5,14--5,15)),
40+
{ LessRange = (5,13--5,14)
41+
GreaterRange = (5,15--5,16) }), (5,12--5,16)))],
42+
(5,0--5,18), { OpeningBraceRange = (5,0--5,2) }), (5,0--5,18));
43+
Expr
44+
(AnonRecd
45+
(false, None,
46+
[(SynLongIdent ([a], [], [None]), Some (7,4--7,5),
47+
Const
48+
(Measure
49+
(Int32 1, (7,5--7,6),
50+
Seq ([Named ([m], (7,7--7,8))], (7,7--7,8)),
51+
{ LessRange = (7,6--7,7)
52+
GreaterRange = (7,8--7,9) }), (7,5--7,9)));
53+
(SynLongIdent ([b], [], [None]), Some (7,12--7,13),
54+
Const
55+
(Measure
56+
(Int32 2, (7,13--7,14),
57+
Seq ([Named ([m], (7,15--7,16))], (7,15--7,16)),
58+
{ LessRange = (7,14--7,15)
59+
GreaterRange = (7,16--7,17) }), (7,13--7,17)))],
60+
(7,0--7,19), { OpeningBraceRange = (7,0--7,2) }), (7,0--7,19));
61+
Expr
62+
(AnonRecd
63+
(false, None,
64+
[(SynLongIdent ([a], [], [None]), Some (9,4--9,5),
65+
Const
66+
(Measure
67+
(Int32 1, (9,5--9,6),
68+
Seq ([Named ([m], (9,7--9,8))], (9,7--9,8)),
69+
{ LessRange = (9,6--9,7)
70+
GreaterRange = (9,8--9,9) }), (9,5--9,9)));
71+
(SynLongIdent ([b], [], [None]), Some (9,12--9,13),
72+
Const
73+
(Measure
74+
(Int32 2, (9,13--9,14),
75+
Seq ([Named ([m], (9,15--9,16))], (9,15--9,16)),
76+
{ LessRange = (9,14--9,15)
77+
GreaterRange = (9,16--9,17) }), (9,13--9,17)))],
78+
(9,0--9,20), { OpeningBraceRange = (9,0--9,2) }), (9,0--9,20))],
79+
PreXmlDoc ((1,0), FSharp.Compiler.Xml.XmlDocCollector), [], None,
80+
(1,0--9,20), { LeadingKeyword = Module (1,0--1,6) })], (true, true),
81+
{ ConditionalDirectives = []
82+
CodeComments = [] }, set []))

0 commit comments

Comments
 (0)