mirror of
https://github.com/Smaug123/WoofWare.Whippet
synced 2025-10-05 15:58:39 +00:00
8834d885de
Some checks failed
.NET / build (Debug) (push) Has been cancelled
.NET / build (Release) (push) Has been cancelled
.NET / analyzers (push) Has been cancelled
.NET / build-nix (push) Has been cancelled
.NET / check-dotnet-format (push) Has been cancelled
.NET / check-nix-format (push) Has been cancelled
.NET / Check links (push) Has been cancelled
.NET / Check flake (push) Has been cancelled
.NET / nuget-pack (push) Has been cancelled
.NET / expected-pack (push) Has been cancelled
.NET / all-required-checks-complete (push) Has been cancelled
27 lines
859 B
Forth
27 lines
859 B
Forth
namespace WoofWare.Whippet.Fantomas
|
|
|
|
open Fantomas.FCS.Syntax
|
|
open Fantomas.FCS.SyntaxTrivia
|
|
open Fantomas.FCS.Xml
|
|
open Fantomas.FCS.Text.Range
|
|
|
|
/// Methods for manipulating SynModuleOrNamespace, which defines a module or namespace definition.
|
|
[<RequireQualifiedAccess>]
|
|
module SynModuleOrNamespace =
|
|
|
|
/// Create a namespace with the given name and with the given declarations inside it.
|
|
let createNamespace (name : LongIdent) (decls : SynModuleDecl list) : SynModuleOrNamespace =
|
|
SynModuleOrNamespace.SynModuleOrNamespace (
|
|
name,
|
|
false,
|
|
SynModuleOrNamespaceKind.DeclaredNamespace,
|
|
decls,
|
|
PreXmlDoc.Empty,
|
|
[],
|
|
None,
|
|
range0,
|
|
{
|
|
LeadingKeyword = SynModuleOrNamespaceLeadingKeyword.Namespace range0
|
|
}
|
|
)
|