summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--tests/src/CoreMangLib/cti/system/delegate/DelegateABI.csproj49
-rw-r--r--tests/src/CoreMangLib/cti/system/delegate/delegateabi.cs68
2 files changed, 117 insertions, 0 deletions
diff --git a/tests/src/CoreMangLib/cti/system/delegate/DelegateABI.csproj b/tests/src/CoreMangLib/cti/system/delegate/DelegateABI.csproj
new file mode 100644
index 0000000000..86ef37198c
--- /dev/null
+++ b/tests/src/CoreMangLib/cti/system/delegate/DelegateABI.csproj
@@ -0,0 +1,49 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Project ToolsVersion="12.0" DefaultTargets="Build" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+ <Import Project="$([MSBuild]::GetDirectoryNameOfFileAbove($(MSBuildThisFileDirectory), dir.props))\dir.props" />
+ <PropertyGroup>
+ <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+ <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+ <SchemaVersion>2.0</SchemaVersion>
+ <ProjectGuid>{95DFC527-4DC1-495E-97D7-E94EE1F7140D}</ProjectGuid>
+ <OutputType>Exe</OutputType>
+ <AppDesignerFolder>Properties</AppDesignerFolder>
+ <FileAlignment>512</FileAlignment>
+ <ProjectTypeGuids>{786C830F-07A1-408B-BD7F-6EE04809D6DB};{FAE04EC0-301F-11D3-BF4B-00C04F79EFBC}</ProjectTypeGuids>
+ <ReferencePath>$(ProgramFiles)\Common Files\microsoft shared\VSTT\11.0\UITestExtensionPackages</ReferencePath>
+ <SolutionDir Condition="$(SolutionDir) == '' Or $(SolutionDir) == '*Undefined*'">..\..\</SolutionDir>
+ <NuGetPackageImportStamp>7a9bfb7d</NuGetPackageImportStamp>
+ <AllowUnsafeBlocks>true</AllowUnsafeBlocks>
+ <ReferenceLocalMscorlib>false</ReferenceLocalMscorlib>
+ <CLRTestKind>BuildAndRun</CLRTestKind>
+ <CLRTestPriority>1</CLRTestPriority>
+ </PropertyGroup>
+ <!-- Default configurations to help VS understand the configurations -->
+ <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+ </PropertyGroup>
+ <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+ </PropertyGroup>
+ <ItemGroup>
+ <CodeAnalysisDependentAssemblyPaths Condition=" '$(VS100COMNTOOLS)' != '' " Include="$(VS100COMNTOOLS)..\IDE\PrivateAssemblies">
+ <Visible>False</Visible>
+ </CodeAnalysisDependentAssemblyPaths>
+ </ItemGroup>
+ <ItemGroup>
+ <!-- Add Compile Object Here -->
+ <Compile Include="delegateabi.cs" />
+ </ItemGroup>
+ <ItemGroup>
+ <None Include="app.config" />
+ <None Include="project.json" />
+ </ItemGroup>
+ <ItemGroup>
+ <Service Include="{82A7F48D-3B50-4B1E-B82E-3ADA8210C358}" />
+ </ItemGroup>
+ <ItemGroup>
+ <ProjectReference Include="../../../../Common/CoreCLRTestLibrary/CoreCLRTestLibrary.csproj" />
+ <ProjectReference Include="../../../../Common/CoreCLRTestLibrary/CoreCLRTestLibrary.csproj" />
+ </ItemGroup>
+ <Import Project="$([MSBuild]::GetDirectoryNameOfFileAbove($(MSBuildThisFileDirectory), dir.targets))\dir.targets" />
+ <PropertyGroup Condition=" '$(MsBuildProjectDirOverride)' != '' ">
+ </PropertyGroup>
+</Project>
diff --git a/tests/src/CoreMangLib/cti/system/delegate/delegateabi.cs b/tests/src/CoreMangLib/cti/system/delegate/delegateabi.cs
new file mode 100644
index 0000000000..e13ccafb8e
--- /dev/null
+++ b/tests/src/CoreMangLib/cti/system/delegate/delegateabi.cs
@@ -0,0 +1,68 @@
+// Licensed to the .NET Foundation under one or more agreements.
+// The .NET Foundation licenses this file to you under the MIT license.
+// See the LICENSE file in the project root for more information.
+
+using System;
+
+namespace ClassLibrary
+{
+ public class test
+ {
+ public delegate float FloatTest(float a);
+
+ static float testfloat(float a)
+ {
+ if(a != -1.1f)
+ {
+ throw new Exception();
+ }
+ return -2.2f;
+ }
+
+ public delegate int IntTest(int a);
+
+ static int testint(int a)
+ {
+ if(a != -1)
+ {
+ throw new Exception();
+ }
+ return -2;
+ }
+
+ static int Main(string[] args)
+ {
+ try
+ {
+ IntTest inttest = testint;
+ int r = inttest(-1);
+ if (r != -2)
+ {
+ Console.WriteLine("FAIL - int return value mismatch");
+ return 101;
+ }
+ }
+ catch (Exception)
+ {
+ Console.WriteLine("FAIL - int argument value mismatch");
+ return 102;
+ }
+ try
+ {
+ FloatTest floattest = testfloat;
+ float r = floattest(-1.1f);
+ if (r != -2.2f)
+ {
+ Console.WriteLine("FAIL - float return value mismatch");
+ return 103;
+ }
+ }
+ catch (Exception)
+ {
+ Console.WriteLine("FAIL - float argument value mismatch");
+ return 104;
+ }
+ return 100;
+ }
+ }
+}