Adding a regression test covering an interface method with a function pointer parameter

Author: tannergooding

test/Mono.Linker.Tests.Cases/FunctionPointers/CanCompileInterfaceWithFunctionPointerParameter.cs

@@ -0,0 +1,37 @@
+// Licensed to the .NET Foundation under one or more agreements.
+// The .NET Foundation licenses this file to you under the MIT license.
+
+using Mono.Linker.Tests.Cases.Expectations.Assertions;
+using Mono.Linker.Tests.Cases.Expectations.Metadata;
+
+namespace Mono.Linker.Tests.Cases.FunctionPointers
+{
+	[SetupCompileArgument ("/unsafe")]
+	unsafe class CanCompileInterfaceWithFunctionPointerParameter
+	{
+		public static void Main()
+		{
+			new CanCompileInterfaceWithFunctionPointerParameter.B ().Method (null);
+		}
+
+		[KeptMember (".ctor()")]
+		class B : I
+		{
+			public void Unused (delegate* unmanaged<void> fnptr)
+			{
+			}
+
+			[Kept]
+			public void Method (delegate* unmanaged<void> fnptr)
+			{
+			}
+		}
+
+		interface I
+		{
+			void Unused (delegate* unmanaged<void> fnptr);
+
+			void Method (delegate* unmanaged<void> fnptr);
+		}
+	}
+}

test/Mono.Linker.Tests.Cases/FunctionPointers/CanCompileMethodWithFunctionPointerParameter.cs

@@ -0,0 +1,30 @@
+// Licensed to the .NET Foundation under one or more agreements.
+// The .NET Foundation licenses this file to you under the MIT license.
+
+using Mono.Linker.Tests.Cases.Expectations.Assertions;
+using Mono.Linker.Tests.Cases.Expectations.Metadata;
+
+namespace Mono.Linker.Tests.Cases.FunctionPointers
+{
+	[SetupCompileArgument ("/unsafe")]
+	unsafe class CanCompileMethodWithFunctionPointerParameter
+	{
+		public static void Main()
+		{
+			new CanCompileMethodWithFunctionPointerParameter.B ().Method (null);
+		}
+
+		[KeptMember (".ctor()")]
+		class B
+		{
+			public void Unused (delegate* unmanaged<void> fnptr)
+			{
+			}
+
+			[Kept]
+			public void Method (delegate* unmanaged<void> fnptr)
+			{
+			}
+		}
+	}
+}

test/Mono.Linker.Tests/TestCases/TestDatabase.cs

@@ -86,6 +86,11 @@ public static IEnumerable<TestCaseData> FeatureSettingsTests ()
 			return NUnitCasesBySuiteName ("FeatureSettings");
 		}
 
+		public static IEnumerable<TestCaseData> FunctionPointersTests ()
+		{
+			return NUnitCasesBySuiteName ("FunctionPointers");
+		}
+
 		public static IEnumerable<TestCaseData> GenericsTests ()
 		{
 			return NUnitCasesBySuiteName ("Generics");

test/Mono.Linker.Tests/TestCases/TestSuites.cs

@@ -103,6 +103,12 @@ public void FeatureSettingsTests (TestCase testCase)
 			Run (testCase);
 		}
 
+		[TestCaseSource (typeof (TestDatabase), nameof (TestDatabase.FunctionPointersTests))]
+		public void FunctionPointerTests (TestCase testCase)
+		{
+			Run (testCase);
+		}
+
 		[TestCaseSource (typeof (TestDatabase), nameof (TestDatabase.GenericsTests))]
 		public void GenericsTests (TestCase testCase)
 		{