Skip to content

Commit 6d1d1d9

Browse files
authored
Parser: report error on missing first item in tuple expressions (#15999)
1 parent 5338449 commit 6d1d1d9

File tree

3 files changed

+5
-0
lines changed

3 files changed

+5
-0
lines changed

src/Compiler/pars.fsy

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -5173,6 +5173,7 @@ parenExpr:
51735173
{ let mComma = rhs parseState 2
51745174
let mLparen = rhs parseState 1
51755175
let mRparen = rhs parseState 3
5176+
reportParseErrorAt mComma (FSComp.SR.parsExpectingExpression ())
51765177
let errorExpr = arbExpr ("tupleExpr3", mComma.EndRange)
51775178
let mTuple = unionRanges mComma $3.Range
51785179
let tupleExpr =

tests/service/data/SyntaxTree/Expression/Tuple - Missing item 02.fs.bsl

Lines changed: 2 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -15,3 +15,5 @@ ImplFile
1515
(1,0--3,4), { LeadingKeyword = Module (1,0--1,6) })], (true, true),
1616
{ ConditionalDirectives = []
1717
CodeComments = [] }, set []))
18+
19+
(3,1)-(3,2) parse error Expecting expression

tests/service/data/SyntaxTree/Expression/Tuple - Missing item 03.fs.bsl

Lines changed: 2 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -15,3 +15,5 @@ ImplFile
1515
(1,0--3,6), { LeadingKeyword = Module (1,0--1,6) })], (true, true),
1616
{ ConditionalDirectives = []
1717
CodeComments = [] }, set []))
18+
19+
(3,1)-(3,2) parse error Expecting expression

0 commit comments

Comments
 (0)