Skip to content

Instantly share code, notes, and snippets.

View sergey-tihon's full-sized avatar
🦀

Sergey Tihon sergey-tihon

🦀
View GitHub Profile
Binding session to 'D:\Projects\xxxxx\packages\DynamicsCRMProvider\../Microsoft.CrmSdk.CoreAssemblies/lib/net40\Microsoft.Xrm.Sdk.dll'...
CRM.fs(47,20): error FS3033: The type provider 'FSharp.Data.TypeProviders.XrmProvider.XrmTypeProvider' reported an error: Could not load file or assembly 'Microsoft.VisualStudio.Shell.15.0, Version=15.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a' or one of its dependencies. The system cannot find the file specified.
>
@sergey-tihon
sergey-tihon / output.txt
Created January 13, 2017 22:42
paket outdated dependencies of paket =)
Paket version 4.0.0-alpha045
Downloading fsharp/FAKE:749fbad6f6808c569e542ee5eaf3c4cc7275c029 modules/Octokit/Octokit.fsx to d:\GitHub\Paket\paket-files\build\fsharp\FAKE\modules\Octokit\Octokit.fsx
Resolving packages for group Build:
- Octokit 0.23.0
- FAKE 4.48.0
- FSharp.Formatting 2.14.4
- ILRepack 2.0.12
- Microsoft.Net.Http 2.2.29
- FSharpVSPowerTools.Core 2.3.0
- FSharp.Compiler.Service 2.0.0.6
@sergey-tihon
sergey-tihon / gist:ceaf835ef2df2d9bcf8f
Created October 21, 2014 20:28
NuGet download stats
#I @"packages\Nuget.Core.2.8.3\lib\net40-Client"
#r "NuGet.Core.dll"
#r "System.Xml.Linq.dll"
let repository =
NuGet.PackageRepositoryFactory.Default.CreateRepository
"https://nuget.org/api/v2"
type NuGetStat =
{ Id: string; DownloadCount:int}
Microsoft (R) F# Interactive version 14.0.23413.0
Copyright (c) Microsoft Corporation. All Rights Reserved.
For help type #help;;
>
--> Referenced 'D:\GitHub\FsProjectsAdmin\src\../.paket/paket.exe'
type BaseProvidedType() =
static let mutable _host = ""
static member Host
with get() = _host
and set(value) = _host <- value
type ProvidedType() = inherit BaseProvidedType()
ProvidedType.Host <- "1"
BaseProvidedType.Host // = "1"
@sergey-tihon
sergey-tihon / gist:8180076
Created December 30, 2013 10:01
simple shift
let shift (s:string) (k:int) =
System.String(
s.ToCharArray()
|> Array.map (function
| x when 'a' <= x && x <='z' ->
let code = int(x)-int('a')
char(int('a') + (code + k + 26) % 26)
| x -> x )
)
*** Assembly Binder Log Entry (10/30/2013 @ 11:29:27 PM) ***
The operation failed.
Bind result: hr = 0x80070002. The system cannot find the file specified.
Assembly manager loaded from: C:\Windows\Microsoft.NET\Framework\v4.0.30319\clr.dll
Running under executable D:\Program Files (x86)\Microsoft Visual Studio 12.0\Common7\IDE\devenv.exe
--- A detailed error log follows.
=== Pre-bind state information ===
//--------- Sample 1 -------------
/// Factorial
let rec fact n =
if n = 1 then 1
else n*fact(n-1)
/// Tail optimized Factorial
let fact n =
let rec factImpl n acc = // acc = accumulator
@sergey-tihon
sergey-tihon / gist:6467164
Created September 6, 2013 17:41
F# PowerShell Get-Item
#r @"System.Management.Automation.dll"
#r @"PowerShellTypeProvider.dll"
type PS = FSharp.PowerShell.PowerShellTypeProvider< PSSnapIns="", Is64BitRequired=false >
PS.``Get-Item``()
interface I<T>
{}
interface I1<T> : I<T>
{}
interface I2<T> : I<T>
{}
class A : I1<int>, I2<double>
{}