Add a test for property throwing an exception

Author: e673

tests/CommandLine.Tests/CommandLine.Tests.csproj

@@ -61,6 +61,7 @@
     <Compile Include="Fakes\Options_With_Default_Set_To_Sequence.cs" />
     <Compile Include="Fakes\Options_With_Guid.cs" />
     <Compile Include="Fakes\Options_With_Option_And_Value_Of_String_Type.cs" />
+    <Compile Include="Fakes\Options_With_Property_Throwing_Exception.cs" />
     <Compile Include="Fakes\Options_With_SetName_That_Ends_With_Previous_SetName.cs" />
     <Compile Include="Fakes\Options_With_Shuffled_Index_Values.cs" />
     <Compile Include="Fakes\Options_With_Uri_And_SimpleType.cs" />

tests/CommandLine.Tests/Fakes/Options_With_Property_Throwing_Exception.cs

@@ -0,0 +1,29 @@
+using System;
+using System.Collections.Generic;
+using System.Linq;
+using System.Text;
+using System.Threading.Tasks;
+
+namespace CommandLine.Tests.Fakes
+{
+    class Options_With_Property_Throwing_Exception
+    {
+        private string optValue;
+
+        [Option('e')]
+        public string OptValue
+        {
+            get
+            {
+                return optValue;
+            }
+            set
+            {
+                if (value != "good")
+                    throw new ArgumentException("Invalid value, only accept 'good' value");
+
+                optValue = value;
+            }
+        }
+    }
+}

tests/CommandLine.Tests/Unit/Core/InstanceBuilderTests.cs

@@ -984,6 +984,23 @@ public void Parse_to_type_with_single_string_ctor_builds_up_correct_instance()
             // Teardown
         }
 
+        [Fact]
+        public void Parse_option_with_exception_thrown_from_setter_generates_SetValueExceptionError()
+        {
+            // Fixture setup
+            var expectedResult = new[] { new SetValueExceptionError(new NameInfo("e", ""), new ArgumentException(), "bad") };
+
+            // Exercize system 
+            var result = InvokeBuild<Options_With_Property_Throwing_Exception>(
+                new[] { "-e", "bad" });
+
+            // Verify outcome
+            ((NotParsed<Options_With_Property_Throwing_Exception>)result).Errors.ShouldBeEquivalentTo(expectedResult);
+
+            // Teardown
+        }
+
+
         [Theory]
         [InlineData(new[] { "--stringvalue", "x-" }, "x-")]
         [InlineData(new[] { "--stringvalue", "x--" }, "x--")]