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

…4344

src/Microsoft.VisualBasic/tests/ConversionsTests.cs

@@ -0,0 +1,41 @@
+// 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 System.Globalization;
+using System.Linq;
+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("yes")]
+        [InlineData("contoso")]
+        public void ToBoolean_String_ThrowsOnInvalidFormat(string str)
+        {
+            Assert.Throws<InvalidCastException>(() => Conversions.ToBoolean(str));
+        }
+
+    }
+}

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>