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

This commit is contained in:
Patrick Stevens
2024-09-14 23:02:32 +01:00
committed by GitHub
parent 693b95106a
commit 09b7109c84
11 changed files with 147 additions and 37 deletions

View File

@@ -44,7 +44,7 @@ module internal SynUnionCase =
SynUnionCase.SynUnionCase (
SynAttributes.ofAttrs case.Attributes,
SynIdent.SynIdent (case.Name, None),
SynIdent.createI case.Name,
SynUnionCaseKind.Fields fields,
case.XmlDoc |> Option.defaultValue PreXmlDoc.Empty,
case.Access,