This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
namespace TODOList | |
open WebSharper | |
open WebSharper.JavaScript | |
open WebSharper.JQuery | |
open WebSharper.UI.Next | |
open WebSharper.UI.Next.Client | |
[<JavaScript>] | |
module Code = |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
[12:34:33] *** drs1005 would like to add you on Skype | |
Hi Василий Кириченко, I'd like to add you as a contact. This is Don Syme *** | |
[12:35:04] *** Василий Кириченко has shared contact details with drs1005. *** | |
[15:16:00] drs1005: hey got a moment? | |
[15:16:41] Василий Кириченко: hi, yep | |
[15:16:50] drs1005: I'd like to screen share, I'll call then we can do that. | |
[15:16:55] *** Call to Василий Кириченко *** | |
[15:17:39] Василий Кириченко: I don't have microphone here at work | |
[15:17:44] drs1005: ok, I'llscreen share |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
let inline min (array:_[]) = | |
let mutable acc = array.[0] | |
for i = 1 to array.Length - 1 do | |
let curr = array.[i] | |
if curr < acc then | |
acc <- curr | |
acc | |
let min2 (array:_[]) = |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
type Point = | |
struct | |
val X: float | |
val Y: float | |
new(x: float, y: float) = { X = x; Y = y } | |
new(x: float) = new Point(x, 3.0) | |
end | |
Point(3.0) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
type Point = | |
struct | |
val X: float | |
[<DefaultValue>] val mutable Y: float | |
new(x: float) = { X = x } | |
end | |
let mutable p = Point(3.0) | |
p.Y <- 4.0 |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
open System | |
let run() = | |
for i in 0 .. 10 do | |
let size = 10000000 | |
GC.Collect() | |
let watch = Diagnostics.Stopwatch.StartNew() | |
let mutable arrTuple = Array.init size (fun i -> (i,i)) | |
arrTuple <- [|(0,0)|] |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
source https://www.myget.org/F/dotnet-core/api/v3/index.json | |
source https://api.nuget.org/v3/index.json | |
source https://www.nuget.org/api/v2/ | |
nuget Microsoft.NETCore.Platforms 1.0.1-rc2-23911 | |
nuget NETStandard.Library 1.5.0-rc2-23911 | |
nuget System.Collections.Immutable 1.2.0-rc2-23911 | |
nuget System.Diagnostics.Process 4.1.0-rc2-23911 | |
nuget System.Diagnostics.TraceSource 4.0.0-rc2-23911 |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
C:\misc\repro-54>.paket\paket.exe update | |
Paket version 2.60.2.0 | |
Resolving packages for group Main: | |
- System.Diagnostics.Process is pinned to 4.1.0-rc2-23911 | |
- System.Reflection.TypeExtensions is pinned to 4.1.0-rc2-23911 | |
- System.Runtime.InteropServices is pinned to 4.1.0-rc2-23911 | |
- System.Security.Cryptography.Algorithms is pinned to 4.1.0-rc2-23911 | |
- System.Linq.Expressions is pinned to 4.0.11-rc2-23911 | |
- System.Net.Requests is pinned to 4.0.11-rc2-23911 | |
- System.Threading.ThreadPool is pinned to 4.0.10-rc2-23911 |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
1) Failed : Tests.LanguageService.GotoDefinition.UsingMSBuild.GotoDefinition.Simple.Datatype.UnitTypeTypenameDef | |
Expected string length 21 but was 14. Strings differ at index 0. | |
Expected: "type One = (*loc-16*)" | |
But was: "One (*loc-15*)" | |
-----------^ | |
at Tests.LanguageService.GotoDefinition.UsingMSBuild.GotoDefinitionCheckResultAgainst(FSharpOption`1 exp, OpenFile file, GotoDefinitionResult act) in D:\j\workspace\release_ci_pa---3f142ccc\vsintegration\tests\unittests\Tests.LanguageService.GotoDefinition.fs:line 516 | |
2) Failed : Tests.LanguageService.GotoDefinition.UsingMSBuild.OnTypeDefintion | |
Expected to find the definition of 'One' but GotoDefn failed. | |
at Salsa.VsOpsUtils.CheckGotoDefnResult(FSharpOption`1 expected, OpenFile file, GotoDefinitionResult actual) in D:\j\workspace\release_ci_pa---3f142ccc\vsintegration\tests\Salsa\SalsaUtils.fs:line 333 |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#r @"packages\Eto.Forms.1.3.0\lib\net40\Eto.dll" | |
#r @"packages\Eto.Platform.Windows.1.3.0\lib\net40\Eto.Platform.Windows.dll" | |
open System | |
open Eto.Forms | |
open Eto.Drawing | |