brianrourkeboll

#r "nuget: FSharp.Compiler.Service"

open FSharp.Compiler.Syntax
open FSharp.Compiler.SyntaxTrivia
open FSharp.Compiler.Xml

type Node =
    { Data     : Data
      Children : Node list }

baronfel

Core Idea

Allow templates to easily orchestrate the invocation of other templates by name/id, making multi-project and multi-item templates easier to keep up to date, and factoring out subsets of currently-giant templates into maintainable chunks.

Motivating Examples

• A JS API with a corresponding .NET Backend
• A Library project, a console project, and a test project

BennieCopeland

#r "nuget:FsCheck.Xunit"

// Domain types from production code
module Types =
    open System
    
    type EmailAddress = private EmailAddress of string
    module EmailAddress =
        let fromString str =
            if not <| String.IsNullOrWhiteSpace str

ProgrammingFire

-- Read the docs: https://www.lunarvim.org/docs/configuration
-- Video Tutorials: https://www.youtube.com/watch?v=sFA9kX-Ud_c&list=PLhoH5vyxr6QqGu0i7tt_XoVK9v-KvZ3m6
-- Forum: https://www.reddit.com/r/lunarvim/
-- Discord: https://discord.com/invite/Xb9B4Ny
local dap = require("dap")

lvim.plugins = {
  {
    "catppuccin/nvim",
    name = "catppuccin"

karenpayneoregon

<PropertyGroup>
    <PathMap>$([System.IO.Path]::GetFullPath('$(MSBuildThisFileDirectory)'))=./</PathMap>
</PropertyGroup>

pblasucci

(*
This is free and unencumbered software released into the public domain.
Anyone is free to copy, modify, publish, use, compile, sell, or
distribute this software, either in source code form or as a compiled
binary, for any purpose, commercial or non-commercial, and by any
means.
In jurisdictions that recognize copyright laws, the author or authors
of this software dedicate any and all copyright interest in the
software to the public domain. We make this dedication for the benefit
of the public at large and to the detriment of our heirs and

ImaginaryDevelopment

// clone project structure/some files
let src = @"C:\projects\YourProject\"
// assuming existing folder
let target = @"C:\projects\ReproFolder"
let wipeTarget = true
if wipeTarget then
    // assumes deleting the dir and recreating it won't blow away permissions
    if Directory.Exists target then
        Directory.Delete(target,true)
        Directory.CreateDirectory target |> ignore

cartermp

using OpenTelemetry;
using OpenTelemetry.Logs;
using OpenTelemetry.Resources;
using OpenTelemetry.Trace;

var builder = WebApplication.CreateBuilder(args);
var app = builder.Build();

var appResourceBuilder = ResourceBuilder.CreateDefault()
    .AddService(serviceName: Telemetry.ServiceName, serviceVersion: Telemetry.ServiceVersion);

edgarfgp

let (|IsOneOf|_|) x y = if x = y then Some() else None

type SomeRecord =
    { ExternalEnum: int
      SomeStringData: string }

let toProcess =
    [ { ExternalEnum = 1
        SomeStringData = "I contain xml" }
      { ExternalEnum = 2

dsyme

open System

let transfers = [| Some 2,1 |]

let FetchInternalTransfers (includeConfirmeds: int) =
    task {

        let! mapPrioritiesTransfers = 
            task {
                if includeConfirmeds > 1 then