String enums containing a - should be escaped with backtick

Fix #44

Author: MangelMaxime

CHANGELOG.md

@@ -12,10 +12,11 @@ and this project adheres to [Semantic Versioning](https://semver.org/spec/v2.0.0
 * Transform `Promise` to `JS.Promise` (by @nojaf) ([GH-33](https://github.com/glutinum-org/cli/pull/33))
 * Optional argument of F# Method are prefixed with `?` instead of suffixing them with `option`
 * Sanitize names coming from TypeScript by removing surrounding quotes (`"`, `'`)
+* String enums containing a `-` should be escaped with backtick ([GH-44](https://github.com/glutinum-org/cli/issues/44))
 
 ### Added
 
-* Add support for `MethodSignature` on interface ([GH-28](https://github.com/glutinum-org/cli/issues/28]))
+* Add support for `MethodSignature` on interface ([GH-28](https://github.com/glutinum-org/cli/issues/28))
 * Ignore `ExportAssignment` as we don't know what to do with it yet
 * Add support for literal type alias ([GH-45](https://github.com/glutinum-org/cli/issues/45))
 

src/Glutinum.Converter/Utils/Naming.fs

@@ -20,7 +20,7 @@ let nameNotEqualsDefaultFableValue (name: string) (value: string) : bool =
     not (nameEqualsDefaultFableValue name value)
 
 let escapeName (name: string) : string =
-    if Keywords.fsharp.Contains name then
+    if Keywords.fsharp.Contains name || name.Contains("-") then
         $"``%s{name}``"
     else
         name

tests/specs/enums/literalStringEnumWithDash.d.ts

@@ -0,0 +1,2 @@
+export type GPUTextureViewDimension =
+    | "cube-array"

tests/specs/enums/literalStringEnumWithDash.fsx

@@ -0,0 +1,13 @@
+module rec Glutinum
+
+open Fable.Core
+open System
+
+[<RequireQualifiedAccess>]
+[<StringEnum(CaseRules.None)>]
+type GPUTextureViewDimension =
+    | ``cube-array``
+
+(***)
+#r "nuget: Fable.Core"
+(***)