Extract some utilities from http-client branch (#260)

2025-10-11 15:08:40 +00:00 · 2024-09-14 23:02:32 +01:00
parent 693b95106a
commit 09b7109c84
11 changed files with 147 additions and 37 deletions
--- a/WoofWare.Myriad.Plugins/CataGenerator.fs
+++ b/WoofWare.Myriad.Plugins/CataGenerator.fs
@@ -564,11 +564,12 @@ module internal CataGenerator =
                    let domain =
                        field.FieldName
                        |> Option.map Ident.lowerFirstLetter
-                        |> SynType.signatureParamOfType place
+                        |> SynType.signatureParamOfType [] place false

                    acc |> SynType.funFromDomain domain
                )
                |> SynMemberDefn.abstractMember
+                    []
                    case.CataMethodIdent
                    None
                    arity