Merge branch 'master' of github.com:forki/NaturalSpec

forki · Jul 31, 2012 · f77cc3b · f77cc3b
2 parents c9d5e1a + 8b82f66
commit f77cc3b
Show file tree

Hide file tree

Showing 2 changed files with 10 additions and 2 deletions.
diff --git a/src/app/NaturalSpec/Spec.fs b/src/app/NaturalSpec/Spec.fs
@@ -13,7 +13,7 @@ type Scenario =
 type Example = 
     class
         inherit TestCaseAttribute 
-        new (testParams:obj[]) =     { inherit TestCaseAttribute(testParams) }
+        new ([<ParamArray>] testParams:obj[]) = { inherit TestCaseAttribute(testParams) }
         new (given:obj,result:obj) = { inherit TestCaseAttribute(given,result) }
         new (p1:obj,p2:obj,p3:obj) = { inherit TestCaseAttribute(p1,p2,p3) }
         new (parameter:obj) =        { inherit TestCaseAttribute(parameter) }

diff --git a/src/test/Spec.NaturalSpec/SimpleTypes.fs b/src/test/Spec.NaturalSpec/SimpleTypes.fs
@@ -23,4 +23,12 @@ let ``3 + 0 should give 3``() =
 let ``Dividing by zero should fail``() =
   Given 10
     |> When dividing_by 0
-    |> Verify                              
+    |> Verify                              
+
+[<Example(1, 2, 3, 6)>]
+let ``1 + 2 + 3 should give 6``(x, y, z, expected) =
+  Given x
+    |> When adding y
+    |> When adding z
+    |> It should equal expected
+    |> Verify