Skip to content
This repository was archived by the owner on Apr 26, 2021. It is now read-only.

Commit b548af0

Browse files
committed
Bump version to 1.0.14
1 parent 694d3ff commit b548af0

File tree

7 files changed

+27
-14
lines changed

7 files changed

+27
-14
lines changed

RELEASE_NOTES.md

Lines changed: 4 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1,3 +1,7 @@
1+
#### 1.0.14 - 05.09.2019
2+
3+
* Fix capitalization of array item type names (regression).
4+
15
#### 1.0.13 - 04.09.2019
26

37
* Fix: generated types should not contain properties with names that equal to parent type name.

docs/articles/release-notes.md

Lines changed: 4 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -1,3 +1,7 @@
1+
#### 1.0.14 - 05.09.2019
2+
3+
* Fix capitalization of array item type names (regression).
4+
15
#### 1.0.13 - 04.09.2019
26

37
* Fix: generated types should not contain properties with names that equal to parent type name.

src/Shared/CodeDom.fs

Lines changed: 5 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -340,6 +340,11 @@ module String =
340340
if not (isValidIdentifier fixedName) then failwithf "Invalid property name `%s`." fixedName
341341
fixedName
342342

343+
member this.Capitalize() =
344+
match this with
345+
| null | "" -> this
346+
| _ -> sprintf "%c%s" (Char.ToUpper(this.[0])) (this.Substring(1))
347+
343348
/// Type abstraction for code generator.
344349
type RuntimeType =
345350
/// Represents anonymous type (xs:any definition).

src/Shared/CodeDomGenerator.fs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -179,7 +179,7 @@ module TypeBuilder =
179179
IsWrappedArray = Some(true) }, [])
180180
| dspec, Definition(def) ->
181181
let itemName = dspec.Name |> Option.get
182-
let suffix = itemName.GetValidIdentifierName()
182+
let suffix = itemName.GetValidIdentifierName().Capitalize()
183183
let typ = Cls.create(name.GetValidIdentifierName() + suffix) |> Cls.addAttr TypeAttributes.Public |> Cls.describe (Attributes.xrdAnonymousType LayoutKind.Sequence)
184184
let runtimeType = ProvidedType(typ, typ.Name)
185185
build context runtimeType def

src/Shared/TypeBuilderContext.fs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -192,7 +192,7 @@ type internal TypeBuilderContext =
192192
CollectionType(this.GetOrCreateType(SchemaType(xn)), itemName, None)
193193
| dspec, Definition(def) ->
194194
let itemName = dspec.Name |> Option.get
195-
let suffix = itemName.GetValidIdentifierName()
195+
let suffix = itemName.GetValidIdentifierName().Capitalize()
196196
let typ = Cls.create(name.XName.LocalName.GetValidIdentifierName() + suffix) |> Cls.addAttr TypeAttributes.Public |> Cls.describe (Attributes.xrdAnonymousType LayoutKind.Sequence)
197197
nstyp |> Cls.addMember typ |> ignore
198198
CollectionType(ProvidedType(typ, providedTypeFullName nstyp.Name typ.Name), itemName, Some(def))

src/XRoadProvider.net40/AssemblyInfo.fs

Lines changed: 6 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -5,15 +5,15 @@ open System.Reflection
55
[<assembly: AssemblyTitleAttribute("XRoadProvider.net40")>]
66
[<assembly: AssemblyProductAttribute("XRoadProvider")>]
77
[<assembly: AssemblyDescriptionAttribute("Type providers for generating types and service interfaces for XRoad producers.")>]
8-
[<assembly: AssemblyVersionAttribute("1.0.13")>]
9-
[<assembly: AssemblyFileVersionAttribute("1.0.13")>]
10-
[<assembly: AssemblyInformationalVersionAttribute("1.0.13")>]
8+
[<assembly: AssemblyVersionAttribute("1.0.14")>]
9+
[<assembly: AssemblyFileVersionAttribute("1.0.14")>]
10+
[<assembly: AssemblyInformationalVersionAttribute("1.0.14")>]
1111
do ()
1212

1313
module internal AssemblyVersionInformation =
1414
let [<Literal>] AssemblyTitle = "XRoadProvider.net40"
1515
let [<Literal>] AssemblyProduct = "XRoadProvider"
1616
let [<Literal>] AssemblyDescription = "Type providers for generating types and service interfaces for XRoad producers."
17-
let [<Literal>] AssemblyVersion = "1.0.13"
18-
let [<Literal>] AssemblyFileVersion = "1.0.13"
19-
let [<Literal>] AssemblyInformationalVersion = "1.0.13"
17+
let [<Literal>] AssemblyVersion = "1.0.14"
18+
let [<Literal>] AssemblyFileVersion = "1.0.14"
19+
let [<Literal>] AssemblyInformationalVersion = "1.0.14"

src/XRoadProvider/AssemblyInfo.fs

Lines changed: 6 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -5,15 +5,15 @@ open System.Reflection
55
[<assembly: AssemblyTitleAttribute("XRoadProvider")>]
66
[<assembly: AssemblyProductAttribute("XRoadProvider")>]
77
[<assembly: AssemblyDescriptionAttribute("Type providers for generating types and service interfaces for XRoad producers.")>]
8-
[<assembly: AssemblyVersionAttribute("1.0.13")>]
9-
[<assembly: AssemblyFileVersionAttribute("1.0.13")>]
10-
[<assembly: AssemblyInformationalVersionAttribute("1.0.13")>]
8+
[<assembly: AssemblyVersionAttribute("1.0.14")>]
9+
[<assembly: AssemblyFileVersionAttribute("1.0.14")>]
10+
[<assembly: AssemblyInformationalVersionAttribute("1.0.14")>]
1111
do ()
1212

1313
module internal AssemblyVersionInformation =
1414
let [<Literal>] AssemblyTitle = "XRoadProvider"
1515
let [<Literal>] AssemblyProduct = "XRoadProvider"
1616
let [<Literal>] AssemblyDescription = "Type providers for generating types and service interfaces for XRoad producers."
17-
let [<Literal>] AssemblyVersion = "1.0.13"
18-
let [<Literal>] AssemblyFileVersion = "1.0.13"
19-
let [<Literal>] AssemblyInformationalVersion = "1.0.13"
17+
let [<Literal>] AssemblyVersion = "1.0.14"
18+
let [<Literal>] AssemblyFileVersion = "1.0.14"
19+
let [<Literal>] AssemblyInformationalVersion = "1.0.14"

0 commit comments

Comments
 (0)