Bump version to 1.0.28

ed-ilyin · Jun 8, 2017 · 5f993de · 5f993de
1 parent 1d2ac96
commit 5f993de
Show file tree

Hide file tree

Showing 3 changed files with 31 additions and 5 deletions.
diff --git a/RELEASE_NOTES.md b/RELEASE_NOTES.md
@@ -1,4 +1,7 @@
-### 1.0.27 - May 12 2017
+### 1.0.28 - June 8 2017
+* Adds Decode.map9
+
+#### 1.0.27 - May 12 2017
 * Adds Decode.map8
 
 #### 1.0.26 - May 12 2017

diff --git a/src/EdIlyin.FSharp.Elm.Core/AssemblyInfo.fs b/src/EdIlyin.FSharp.Elm.Core/AssemblyInfo.fs
@@ -5,15 +5,15 @@ open System.Reflection
 [<assembly: AssemblyTitleAttribute("EdIlyin.FSharp.Elm.Core")>]
 [<assembly: AssemblyProductAttribute("EdIlyin.FSharp.Elm.Core")>]
 [<assembly: AssemblyDescriptionAttribute("Brings to the F# Elm language core package modules like Json.Encode, Json.Decode, Basics, Debug, Result, Tuple, etc")>]
-[<assembly: AssemblyVersionAttribute("1.0.27")>]
-[<assembly: AssemblyFileVersionAttribute("1.0.27")>]
+[<assembly: AssemblyVersionAttribute("1.0.28")>]
+[<assembly: AssemblyFileVersionAttribute("1.0.28")>]
 [<assembly: AssemblyConfigurationAttribute("Release")>]
 do ()
 
 module internal AssemblyVersionInformation =
     let [<Literal>] AssemblyTitle = "EdIlyin.FSharp.Elm.Core"
     let [<Literal>] AssemblyProduct = "EdIlyin.FSharp.Elm.Core"
     let [<Literal>] AssemblyDescription = "Brings to the F# Elm language core package modules like Json.Encode, Json.Decode, Basics, Debug, Result, Tuple, etc"
-    let [<Literal>] AssemblyVersion = "1.0.27"
-    let [<Literal>] AssemblyFileVersion = "1.0.27"
+    let [<Literal>] AssemblyVersion = "1.0.28"
+    let [<Literal>] AssemblyFileVersion = "1.0.28"
     let [<Literal>] AssemblyConfiguration = "Release"
diff --git a/src/EdIlyin.FSharp.Elm.Core/Decode.fs b/src/EdIlyin.FSharp.Elm.Core/Decode.fs
@@ -189,6 +189,29 @@ module Decode =
                 (getLabel decoder8)
 
 
+    let map9 func decoder1 decoder2 decoder3 decoder4 decoder5 decoder6 decoder7 decoder8 decoder9 =
+        succeed func
+            <*> decoder1
+            <*> decoder2
+            <*> decoder3
+            <*> decoder4
+            <*> decoder5
+            <*> decoder6
+            <*> decoder7
+            <*> decoder8
+            <*> decoder9
+            <?> sprintf "{ %s, %s, %s, %s, %s, %s, %s, %s, %s }"
+                (getLabel decoder1)
+                (getLabel decoder2)
+                (getLabel decoder3)
+                (getLabel decoder4)
+                (getLabel decoder5)
+                (getLabel decoder6)
+                (getLabel decoder7)
+                (getLabel decoder8)
+                (getLabel decoder9)
+
+
     let fromResult result =
         Result.unpack failed succeed result