Update Fabulous Ast [1.0.0-pre16]

Author: TheAngryByrd

tools/MetaModelGenerator/GenerateTypes.fs

@@ -28,21 +28,6 @@ module GenerateTypes =
     )
     |> String.concat ""
 
-  type ModuleOrNamespaceExtensions =
-    /// Allows Anonymous Module components to be yielded directly into a Module
-    /// Useful since there's no common holder of declarations or generic WidgetBuilder than can be used
-    /// when yielding different types of declarations
-    [<Extension>]
-    static member inline Yield(_: CollectionBuilder<'parent, ModuleDecl>, x: WidgetBuilder<AnonymousModuleNode>) =
-      let node = Gen.mkOak x
-
-      let ws =
-        node.Declarations
-        |> List.map (fun x -> Ast.EscapeHatch(x).Compile())
-        |> List.toArray
-        |> MutStackArray1.fromArray
-
-      { Widgets = ws }
 
   let JToken = LongIdent(nameof JToken)
 
@@ -440,7 +425,7 @@ module GenerateTypes =
     interfaceStructures
     |> Array.map (fun s ->
       let widget =
-        Interface($"I{s.Name}") {
+        TypeDefn($"I{s.Name}") {
           let properties = s.PropertiesSafe
 
           for p in properties do
@@ -453,7 +438,7 @@ module GenerateTypes =
                 p.Type
                 p
 
-            let ap = AbstractProperty(fi.Name, fi.TypeInfo)
+            let ap = AbstractSlot(fi.Name, fi.TypeInfo)
 
             yield
               fi.StructuredDocs

tools/MetaModelGenerator/MetaModelGenerator.fsproj

@@ -6,7 +6,7 @@
   <ItemGroup>
     <PackageReference Include="Argu" Version="*" />
     <PackageReference Include="Newtonsoft.Json" Version="13.0.1" />
-    <PackageReference Include="Fabulous.AST" Version="[1.0.0-pre12]" />
+    <PackageReference Include="Fabulous.AST" Version="[1.0.0-pre16]" />
   </ItemGroup>
   <ItemGroup>
     <Compile Include="../../src/OptionConverter.fs" />