feat: support export assignment of typeLiteral

[converter]

Fix #77

Author: MangelMaxime

src/Glutinum.Converter/Reader/Node.fs

@@ -35,6 +35,16 @@ let readNode (reader: ITypeScriptReader) (node: Ts.Node) : GlueType =
         // Should be handled in the future
         GlueType.Discard
 
+    | Ts.SyntaxKind.TypeLiteral ->
+        let typeLiteralNode = node :?> Ts.TypeLiteralNode
+
+        let members =
+            typeLiteralNode.members
+            |> Seq.toList
+            |> List.map reader.ReadDeclaration
+
+        ({ Members = members }: GlueTypeLiteral) |> GlueType.TypeLiteral
+
     | unsupported ->
         let warning =
             Utils.generateReaderError

tests/specs/references/typeLiteral/variableExport.d.ts

@@ -0,0 +1,8 @@
+declare const supportsColor: {
+	stdout: ColorInfo;
+	stderr: ColorInfo;
+};
+
+type ColorInfo = string;
+
+export default supportsColor;

tests/specs/references/typeLiteral/variableExport.fsx

@@ -0,0 +1,32 @@
+module rec Glutinum
+
+open Fable.Core
+open Fable.Core.JsInterop
+open System
+
+[<Erase>]
+type Exports =
+    [<ImportAll("module")>]
+    static member inline supportsColor: Exports.supportsColor = nativeOnly
+
+
+type ColorInfo =
+    string
+
+module Exports =
+
+    [<Global>]
+    [<AllowNullLiteral>]
+    type supportsColor
+        [<ParamObject; Emit("$0")>]
+        (
+            stdout: ColorInfo,
+            stderr: ColorInfo
+        ) =
+
+        member val stdout : ColorInfo = nativeOnly with get, set
+        member val stderr : ColorInfo = nativeOnly with get, set
+
+(***)
+#r "nuget: Fable.Core"
+(***)