Added tests for Microsoft.VisualBasic.CompilerServices.Conversions #1…

src/Microsoft.VisualBasic/tests/ConversionsTests.cs

@@ -0,0 +1,81 @@
+// 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;
+using System.Collections.Generic;
+using Microsoft.VisualBasic.CompilerServices;
+using Xunit;
+
+namespace Microsoft.VisualBasic.Tests
+{
+    public class ConversionsTests
+    {
+        [Theory]
+        [InlineData("true", true)]
+        [InlineData("false", false)]
+        [InlineData("5", true)]
+        [InlineData("0", false)]
+        [InlineData("5.5", true)]
+        [InlineData("0.0", false)]
+        [InlineData("&h5", true)]
+        [InlineData("&h0", false)]
+        [InlineData("&o5", true)]
+        [InlineData("&o0", false)]
+        public void ToBoolean_String_ReturnsExpected(string str, bool expected)
+        {
+            Assert.Equal(expected, Conversions.ToBoolean(str));
+        }
+
+        [Theory]
+        [InlineData(null)]
+        [InlineData("yes")]
+        [InlineData("contoso")]
+        public void ToBoolean_String_ThrowsOnInvalidFormat(string str)
+        {
+            Assert.Throws<InvalidCastException>(() => Conversions.ToBoolean(str));
+        }
+
+        public static IEnumerable<object[]> ToBoolean_Object_ReturnsExpected_TestData()
+        {
+            yield return new object[] { null, false };
+            yield return new object[] { false, false };
+            yield return new object[] { true, true };
+            yield return new object[] { (sbyte)0, false };
+            yield return new object[] { (sbyte)42, true };
+            yield return new object[] { (byte)0, false };
+            yield return new object[] { (byte)42, true };
+            yield return new object[] { (System.Int16)0, false };
+            yield return new object[] { (System.Int16)42, true };
+            yield return new object[] { (System.UInt16)0, false };
+            yield return new object[] { (System.UInt16)42, true };
+            yield return new object[] { (System.Int32)0, false };
+            yield return new object[] { (System.Int32)42, true };
+            yield return new object[] { (System.UInt32)0, false };
+            yield return new object[] { (System.UInt32)42, true };
+            yield return new object[] { (System.Int64)0, false };
+            yield return new object[] { (System.Int64)42, true };
+            yield return new object[] { (System.UInt64)0, false };
+            yield return new object[] { (System.UInt64)42, true };
+            yield return new object[] { 0.0m, false };
+            yield return new object[] { 0.42m, true };
+            yield return new object[] { (float)0.0, false };
+            yield return new object[] { (float)0.42, true };
+            yield return new object[] { (double)0.0, false };
+            yield return new object[] { (double)0.42, true };
+        }
+
+        [Theory]
+        [MemberData(nameof(ToBoolean_Object_ReturnsExpected_TestData))]
+        public void ToBoolean_Object_ReturnsExpected(object obj, bool expected)
+        {
+            Assert.Equal(expected, Conversions.ToBoolean(obj));
+        }
+
+        [Fact]
+        public void ToBoolean_Object_ThrowsOn_List()
+        {
+            Assert.Throws<InvalidCastException>(() => Conversions.ToBoolean(new List<string>()));
+        }
+    }
+}

src/Microsoft.VisualBasic/tests/Microsoft.VisualBasic.Tests.csproj

@@ -7,6 +7,7 @@
   <PropertyGroup Condition="'$(Configuration)|$(Platform)' == 'netstandard-Debug|AnyCPU'" />
   <PropertyGroup Condition="'$(Configuration)|$(Platform)' == 'netstandard-Release|AnyCPU'" />
   <ItemGroup>
+    <Compile Include="ConversionsTests.cs" />
     <Compile Include="OperatorsTests.cs" />
     <Compile Include="UtilsTests.cs" />
     <Compile Include="StringsTests.cs" />
@@ -18,4 +19,4 @@
     <EmbeddedResource Include="Resources\$(AssemblyName).rd.xml" />
   </ItemGroup>
   <Import Project="$([MSBuild]::GetDirectoryNameOfFileAbove($(MSBuildThisFileDirectory), dir.targets))\dir.targets" />
-</Project>
+</Project>