(note: replace ORGANIZATION and PROJECT)
git clone git clone [email protected]:ORGANIZATION/PROJECT.git my-repository
| open System | |
| open System.Threading | |
| open Akkling | |
| open Akkling.Persistence | |
| let system = System.create "persistent-system" (Configuration.defaultConfig()) | |
| type Event = | |
| | Added of int | |
| | Removed of int |
| // Step 0. Boilerplate to get the paket.exe tool | |
| open System | |
| open System.IO | |
| Environment.CurrentDirectory <- __SOURCE_DIRECTORY__ | |
| if not (File.Exists "paket.exe") then | |
| let url = "https://github.com/fsprojects/Paket/releases/download/0.31.5/paket.exe" | |
| use wc = new Net.WebClient() | |
| let tmp = Path.GetTempFileName() |
(note: replace ORGANIZATION and PROJECT)
git clone git clone [email protected]:ORGANIZATION/PROJECT.git my-repository
| using Funq.Collections.Common; | |
| using System; | |
| namespace Funq.Collections.Implementation { | |
| static partial class FingerTree<TValue> { | |
| abstract partial class FTree<TChild> { | |
| internal sealed partial class Digit { | |
| public override TExpected Apply<TExpected, TValue2>(int nesting, Func<TValue, TValue2> selector, Lineage lin) { | |
| switch (nesting) { | |
| case 0: | |
| return (TExpected)(object)ApplyTo<Leaf<TValue2>, TValue2>(nesting, selector, lin); |
| function ConvertFrom-JsonToCsv { | |
| param( | |
| [Parameter(ValueFromPipeline)] | |
| $json | |
| ) | |
| Process { | |
| ($json | ConvertFrom-Json) | ConvertTo-Csv -NoTypeInformation | |
| } | |
| } |
| [CmdletBinding()] | |
| [OutputType([System.Management.Automation.PSModuleInfo])] | |
| param( | |
| # The name of the module to install from GitHub. | |
| [Parameter(Position=0, Mandatory=$true)] | |
| [ValidateNotNullOrEmpty()] | |
| [System.String[]] | |
| $ModuleName, | |
| # The scope from which the module should be discoverable. |
| namespace Newtonsoft.Json.Converters | |
| open Microsoft.FSharp.Reflection | |
| open Newtonsoft.Json | |
| open System | |
| type IdiomaticDuConverter() = | |
| inherit JsonConverter() | |
| [<Literal>] |
| package shapeless.examples | |
| import shapeless.PolyDefns._ | |
| import shapeless._ | |
| import shapeless.ops.hlist.At | |
| import scala.math.Ordering | |
| /** |
Instructions for setting up a git server on a Synology NAS with Diskstation. Specifically, I am using a DS414 with DSM 5.0.
gituser via Diskstation interface (with File Station and WebDAV privilages)git (located at /volume1/git) with read/write access for gituser and admin. This folder will hold all the repos.| import scala.concurrent.duration._ | |
| import scala.concurrent.ExecutionContext | |
| import scala.concurrent.Future | |
| import akka.pattern.after | |
| import akka.actor.Scheduler | |
| /** | |
| * Given an operation that produces a T, returns a Future containing the result of T, unless an exception is thrown, | |
| * in which case the operation will be retried after _delay_ time, if there are more possible retries, which is configured through | |
| * the _retries_ parameter. If the operation does not succeed and there is no retries left, the resulting Future will contain the last failure. |