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
module FSharpSandbox2.Main | |
open System | |
open System.Runtime.InteropServices | |
/// Vector3 | |
#if MATH_RECORD_TYPES | |
[<StructLayout (LayoutKind.Sequential)>] | |
type Vector3 = | |
{ X: single; Y: single; Z: single } |
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
(* | |
Copyright (c) 2013 William F. Smith | |
Permission is hereby granted, free of charge, to any person obtaining a copy | |
of this software and associated documentation files (the "Software"), to deal | |
in the Software without restriction, including without limitation the rights | |
to use, copy, modify, merge, publish, distribute, sublicense, and/or sell | |
copies of the Software, and to permit persons to whom the Software is | |
furnished to do so, subject to the following conditions: |
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
(* | |
Copyright (c) 2013 William F. Smith | |
Permission is hereby granted, free of charge, to any person obtaining a copy | |
of this software and associated documentation files (the "Software"), to deal | |
in the Software without restriction, including without limitation the rights | |
to use, copy, modify, merge, publish, distribute, sublicense, and/or sell | |
copies of the Software, and to permit persons to whom the Software is | |
furnished to do so, subject to the following conditions: |
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
module WadParser | |
open System | |
open System.IO | |
open System.Text | |
open System.Text.RegularExpressions | |
open FParsec | |
[<AutoOpen>] | |
module FParsec = |
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
module FParsec.Binary | |
open System | |
open System.Text | |
open System.Text.RegularExpressions | |
open FParsec | |
[<RequireQualifiedAccess>] | |
module File = | |
let readAllString path = |
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
module FSharp.BitMatch.TypeProvider | |
open System | |
open System.IO | |
open System.Reflection | |
open System.Windows.Input | |
open Microsoft.FSharp.Core.CompilerServices | |
open Microsoft.FSharp.Reflection | |
open Microsoft.FSharp.Quotations |
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 Styles | |
// Style 1; OCaml Style | |
module Basketball = | |
type T = | |
{ | |
Weight: int | |
} |
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
class Benchmark | |
{ | |
[Test] | |
public void RunTypes() | |
{ | |
var cache = typeof(string).Assembly.GetTypes().ToDictionary(x => x, x => x.Name.Length); | |
var sum = 0; | |
var sw = Stopwatch.StartNew(); | |
var n = 1000000; | |
for (var i = 0; i < n; i++) |
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
Tool /Library/Frameworks/Mono.framework/Versions/5.0.0/lib/mono/fsharp/fsc.exe execution started with arguments: -o:obj/Debug/AndroidFSharpSandbox.dll | |
-g | |
--debug:full | |
--noframework | |
--define:DEBUG | |
--define:__XAMARIN_ANDROID_v1_0__ | |
--define:__MOBILE__ | |
--define:__ANDROID__ | |
--define:__ANDROID_1__ | |
--define:__ANDROID_2__ |
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
/Library/Frameworks/Mono.framework/Versions/5.0.0/lib/mono/fsharp/fsc.exe -o:obj/Debug/AndroidFSharpSandbox.dll | |
-g | |
--debug:full | |
--noframework | |
--define:DEBUG | |
--define:__XAMARIN_ANDROID_v1_0__;__MOBILE__;__ANDROID__;__ANDROID_1__;__ANDROID_2__;__ANDROID_3__;__ANDROID_4__;__ANDROID_5__;__ANDROID_6__;__ANDROID_7__;__ANDROID_8__;__ANDROID_9__;__ANDROID_10__;__ANDROID_11__;__ANDROID_12__;__ANDROID_13__;__ANDROID_14__;__ANDROID_15__;__ANDROID_16__;__ANDROID_17__;__ANDROID_18__;__ANDROID_19__;__ANDROID_20__;__ANDROID_21__;__ANDROID_22__;__ANDROID_23__;__ANDROID_24__;__ANDROID_25__ | |
--optimize- | |
--tailcalls- | |
-r:/Users/williamsmith/Projects/AndroidFSharpSandbox/packages/FSharp.Core.4.1.17/lib/netstandard1.6/FSharp.Core.dll | |
-r:/Library/Frameworks/Mono.framework/External/xbuild-frameworks/MonoAndroid/v1.0/Java.Interop.dll |
OlderNewer