patrick/WoofWare.Whippet
1
0
Fork 0
mirror of https://github.com/Smaug123/WoofWare.Whippet synced 2025-10-13 03:38:41 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

Initial import of Fantomas client library (#6)
Some checks failed
.NET / build (Debug) (push) Has been cancelled
Details
.NET / build (Release) (push) Has been cancelled
Details
.NET / analyzers (push) Has been cancelled
Details
.NET / build-nix (push) Has been cancelled
Details
.NET / check-dotnet-format (push) Has been cancelled
Details
.NET / check-nix-format (push) Has been cancelled
Details
.NET / Check links (push) Has been cancelled
Details
.NET / Check flake (push) Has been cancelled
Details
.NET / nuget-pack (push) Has been cancelled
Details
.NET / expected-pack (push) Has been cancelled
Details
.NET / all-required-checks-complete (push) Has been cancelled
Details

Browse Source
This commit is contained in:
Patrick Stevens
2024-10-04 15:13:49 +01:00
committed by GitHub
parent 0dad74819e
commit 8834d885de
41 changed files with 2915 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

33
WoofWare.Whippet.Fantomas/Primitives.fs Normal file
View File

@@ -0,0 +1,33 @@
namespace WoofWare.Whippet.Fantomas
open Fantomas.FCS.Syntax
open Fantomas.FCS.Text.Range
/// Module for manipulating primitive types like `int` or `string`.
[<RequireQualifiedAccess>]
module Primitives =
/// Given e.g. "byte", returns "System.Byte".
let qualifyType (typeName : string) : LongIdent option =
match typeName with
| "float32"
| "single" -> [ "System" ; "Single" ] |> Some
| "float"
| "double" -> [ "System" ; "Double" ] |> Some
| "byte"
| "uint8" -> [ "System" ; "Byte" ] |> Some
| "sbyte"
| "int8" -> [ "System" ; "SByte" ] |> Some
| "int16" -> [ "System" ; "Int16" ] |> Some
| "int"
| "int32" -> [ "System" ; "Int32" ] |> Some
| "int64" -> [ "System" ; "Int64" ] |> Some
| "uint16" -> [ "System" ; "UInt16" ] |> Some
| "uint"
| "uint32" -> [ "System" ; "UInt32" ] |> Some
| "uint64" -> [ "System" ; "UInt64" ] |> Some
| "char" -> [ "System" ; "Char" ] |> Some
| "decimal" -> [ "System" ; "Decimal" ] |> Some
| "string" -> [ "System" ; "String" ] |> Some
| "bool" -> [ "System" ; "Boolean" ] |> Some
| _ -> None
|> Option.map (List.map (fun i -> (Ident (i, range0))))