Psi/Record: fix for private constructors (#1009)

Author: DedSec256

ReSharper.FSharp/src/FSharp/FSharp.Psi/src/Impl/DeclaredElement/CompilerGenerated/FSharpGeneratedConstructor.cs

@@ -20,6 +20,8 @@ public override DeclaredElementType GetElementType() =>
 
     public override IType ReturnType => PredefinedType.Void;
 
+    public override AccessRights GetAccessRights() =>
+      ContainingType.GetRepresentationAccessRights();
 
     public bool IsDefault => false;
     public bool IsParameterless => false;

ReSharper.FSharp/test/data/cache/csharpResolve/Records 09 - Private representation.cs

@@ -2,7 +2,7 @@
 {
   public Class1()
   {
-    var r = new Module.R(1);
+    Module.R r = new Module.R(1);
     var field = r.Field;
   }
 }

ReSharper.FSharp/test/data/cache/csharpResolve/Records 09 - Private representation.gold

@@ -2,12 +2,13 @@
 {
   public Class1()
   {
-    var r = new Module.R(1);
-    var field = r.|Field|(0);
+    Module.R r = new Module.|R|(0)(1);
+    var field = r.|Field|(1);
   }
 }
 
 ---------------------------------------------------------
-(0): ReSharper Underlined Error Highlighting: Cannot access internal property 'Field' here
+(0): ReSharper Underlined Error Highlighting: Cannot access internal constructor 'R(int)' here
+(1): ReSharper Underlined Error Highlighting: Cannot access internal property 'Field' here
 M:Module.R.#ctor(System.Int32)
 P:Module.R.Field