Skip to content

Instantly share code, notes, and snippets.

bartsokol /
Created Jul 17, 2018
Props to make Type Providers compile from dotnet build
<?xml version="1.0" encoding="utf-8"?>
<!-- Type providers currently can't run inside the .NET Core 2.0 hosted compiler, see -->
<IsWindows Condition="'$(OS)' == 'Windows_NT'">true</IsWindows>
<IsOSX Condition="'$([System.Runtime.InteropServices.RuntimeInformation]::IsOSPlatform($([System.Runtime.InteropServices.OSPlatform]::OSX)))' == 'true'">true</IsOSX>
<IsLinux Condition="'$([System.Runtime.InteropServices.RuntimeInformation]::IsOSPlatform($([System.Runtime.InteropServices.OSPlatform]::Linux)))' == 'true'">true</IsLinux>
<PropertyGroup Condition="'$(IsWindows)' == 'true' AND Exists('C:\Program Files (x86)\Microsoft SDKs\F#\4.1\Framework\v4.0\fsc.exe')">
<FscToolPath>C:\Program Files (x86)\Microsoft SDKs\F#\4.1\Framework\v4.0</FscToolPath>
bartsokol / EventStore.fs
Last active Jul 5, 2017
Register F# DU (Discriminated Union) cases as event types in Marten event store
View EventStore.fs
module EventStore =
open Marten
open Microsoft.FSharp.Reflection
open System.Reflection
type Events =
| Event1 of string
| Event2 of int
let registerUnionCasesAsEvents<'a> (opts: StoreOptions) =
View SampleTests1.fs
namespace TestLib
open NUnit.Framework
// Only module visible in VS, no test results reported by ReSharper
module Tests =
open FsUnit