Only synthesize <Clone>$ for record proxies w/o target

Author: stakx

src/Castle.Core/DynamicProxy/Generators/BaseClassProxyGenerator.cs

@@ -41,6 +41,8 @@ protected BaseClassProxyGenerator(ModuleScope scope, Type targetType, Type[] int
 
 		protected abstract ProxyTargetAccessorContributor GetProxyTargetAccessorContributor();
 
+		protected abstract RecordCloningContributor? GetRecordCloningContributor(INamingScope namingScope);
+
 		protected sealed override Type GenerateType(string name, INamingScope namingScope)
 		{
 			IEnumerable<ITypeContributor> contributors;
@@ -192,7 +194,11 @@ private IEnumerable<Type> GetTypeImplementerMapping(out IEnumerable<ITypeContrib
 			}
 #endif
 
-			contributorsList.Add(new RecordCloningContributor(targetType, namingScope));
+			var recordCloningContributor = GetRecordCloningContributor(namingScope);
+			if (recordCloningContributor != null)
+			{
+				contributorsList.Add(recordCloningContributor);
+			}
 
 			var proxyTargetAccessorContributor = GetProxyTargetAccessorContributor();
 			contributorsList.Add(proxyTargetAccessorContributor);

src/Castle.Core/DynamicProxy/Generators/ClassProxyGenerator.cs

@@ -54,5 +54,10 @@ protected override ProxyTargetAccessorContributor GetProxyTargetAccessorContribu
 				getTarget: () => ThisExpression.Instance,
 				targetType);
 		}
+
+		protected override RecordCloningContributor GetRecordCloningContributor(INamingScope namingScope)
+		{
+			return new RecordCloningContributor(targetType, namingScope);
+		}
 	}
 }

src/Castle.Core/DynamicProxy/Generators/ClassProxyWithTargetGenerator.cs

@@ -69,6 +69,11 @@ protected override ProxyTargetAccessorContributor GetProxyTargetAccessorContribu
 				targetType);
 		}
 
+		protected override RecordCloningContributor GetRecordCloningContributor(INamingScope namingScope)
+		{
+			return null;
+		}
+
 		private void CreateTargetField(ClassEmitter emitter)
 		{
 			targetField = emitter.CreateField("__target", targetType);