vshapenko

module Shaper=

 open LiteDB
 open System
 open TypeShape.Core
 open TypeShape.Core.Utils
 open LiteDB.FSharp
 type Convert<'t> = {To:'t->BsonValue;From:BsonValue->'t}

Szer

function CleanupRepo {
    param([string]$repo)

    <#work directory should be repo root#>
    cd $repo

    git fetch "origin"
    git reset --hard origin/master

    "getting branch list..."

Szer

type StreamCons<'a> = 
    | Nil
    | Cons of 'a * Stream<'a>
and Stream<'a> = Lazy<StreamCons<'a>>

let inline force (l: Lazy<_>) = l.Force()

let rec toStream l : Stream<_> =
    lazy match l with
         | [] -> Nil

Szer

[<AutoOpen>]
module SingleDuConverter

open Newtonsoft.Json
open Microsoft.FSharp.Reflection
open System
open System.Collections.Generic
open Newtonsoft.Json.Linq

type SingleDuConverter() =

object

1. Yaml configuration section

<?xml version="1.0" encoding="utf-8"?>
<akka.persistence>
  <hocon>
    <![CDATA[
    akka {        
      persistence{
        query.journal.sql {
          max-buffer-size = 10000

maestrow

• Bootstrap Paket