[compiler] Preserve primary ctor after adding clipper ctor

Author: dimitrakokkali

src/Compiler/src/Compiler/XSharpCodeAnalysis/Parser/XSharpTreeTransformationCore.cs

@@ -3107,7 +3107,7 @@ public override void ExitClass_([NotNull] XP.Class_Context context)
                         classOrStructKeyword: SyntaxFactory.MakeToken(SyntaxKind.ClassKeyword),
                         identifier: context.Id.Get<SyntaxToken>(),
                         typeParameterList: getTypeParameters(context.TypeParameters),
-                        parameterList: primeParam, // TODO nvk
+                        parameterList: primeParam,
                         baseList: _syntaxFactory.BaseList(SyntaxFactory.ColonToken, baseTypes),
                         constraintClauses: getTypeConstraints(context._ConstraintsClauses),
                         openBraceToken: SyntaxFactory.OpenBraceToken,
@@ -3123,7 +3123,7 @@ public override void ExitClass_([NotNull] XP.Class_Context context)
                    keyword: SyntaxFactory.MakeToken(SyntaxKind.ClassKeyword),
                    identifier: context.Id.Get<SyntaxToken>(),
                    typeParameterList: getTypeParameters(context.TypeParameters),
-                   parameterList: primeParam, // TODO nvk
+                   parameterList: primeParam,
                    baseList: _syntaxFactory.BaseList(SyntaxFactory.ColonToken, baseTypes),
                    constraintClauses: getTypeConstraints(context._ConstraintsClauses),
                    openBraceToken: SyntaxFactory.OpenBraceToken,
@@ -3223,7 +3223,7 @@ public override void ExitStructure_([NotNull] XP.Structure_Context context)
                         classOrStructKeyword: SyntaxFactory.MakeToken(SyntaxKind.StructKeyword),
                         identifier: context.Id.Get<SyntaxToken>(),
                         typeParameterList: getTypeParameters(context.TypeParameters),
-                        parameterList: primeParam, // TODO nvk
+                        parameterList: primeParam,
                         baseList: _syntaxFactory.BaseList(SyntaxFactory.ColonToken, baseTypes),
                         constraintClauses: getTypeConstraints(context._ConstraintsClauses),
                         openBraceToken: SyntaxFactory.OpenBraceToken,
@@ -3239,7 +3239,7 @@ public override void ExitStructure_([NotNull] XP.Structure_Context context)
                     keyword: SyntaxFactory.MakeToken(SyntaxKind.StructKeyword),
                     identifier: context.Id.Get<SyntaxToken>(),
                     typeParameterList: getTypeParameters(context.TypeParameters),
-                    parameterList: primeParam, // TODO nvk
+                    parameterList: primeParam,
                     baseList: _syntaxFactory.BaseList(SyntaxFactory.ColonToken, baseTypes),
                     constraintClauses: getTypeConstraints(context._ConstraintsClauses),
                     openBraceToken: SyntaxFactory.OpenBraceToken,

src/Compiler/src/Compiler/XSharpCodeAnalysis/Parser/XSharpTreeTransformationRT.cs

@@ -1707,7 +1707,7 @@ protected ClassDeclarationSyntax GenerateDefaultClipperCtor(ClassDeclarationSynt
                         classdecl.Keyword,
                         classdecl.Identifier,
                         classdecl.TypeParameterList,
-                        null, // TODO nvk
+                        classdecl.ParameterList,
                         classdecl.BaseList,
                         classdecl.ConstraintClauses,
                         classdecl.OpenBraceToken,