@@ -1002,7 +1002,7 @@ proc parseIdentColonEquals(p: var TParser, flags: TDeclaredIdentFlags): PNode =
1002
1002
optInd (p, result )
1003
1003
addSon (result , parseExpr (p))
1004
1004
else :
1005
- addSon (result , newNodeP (nkEmpty, p) )
1005
+ addSon (result , p.emptyNode )
1006
1006
1007
1007
proc parseTuple (p: var TParser , indentAllowed = false ): PNode =
1008
1008
# | inlTupleDecl = 'tuple'
@@ -1899,11 +1899,17 @@ proc parseObjectCase(p: var TParser): PNode =
1899
1899
# | | IND{=} objectBranches)
1900
1900
result = newNodeP (nkRecCase, p)
1901
1901
getTokNoInd (p)
1902
- var a = newNodeP (nkIdentDefs, p)
1903
- addSon (a, identWithPragma (p))
1904
- eat (p, tkColon)
1905
- addSon (a, parseTypeDesc (p))
1906
- addSon (a, p.emptyNode)
1902
+ var a = parseIdentColonEquals (p, {withPragma})
1903
+ # var a = newNodeP(nkIdentDefs, p)
1904
+ # addSon(a, identWithPragma(p))
1905
+ # eat(p, tkColon)
1906
+ # addSon(a, parseTypeDesc(p))
1907
+ # if p.tok.tokType == tkEquals:
1908
+ # getTok(p)
1909
+ # optInd(p, result)
1910
+ # addSon(a, parseExpr(p))
1911
+ # else:
1912
+ # addSon(a, p.emptyNode)
1907
1913
addSon (result , a)
1908
1914
if p.tok.tokType == tkColon: getTok (p)
1909
1915
flexComment (p, result )
0 commit comments