Math.NET Numerics
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 

40 lines
1.3 KiB

// (c) Microsoft Corporation. All rights reserved
module Microsoft.FSharp.Compiler.AbstractIL.Extensions.ILX.Msilxlib
open Internal.Utilities
open Microsoft.FSharp.Compiler.AbstractIL
open Microsoft.FSharp.Compiler.AbstractIL.IL
open Microsoft.FSharp.Compiler.AbstractIL.Internal
open Microsoft.FSharp.Compiler.AbstractIL.Extensions.ILX
open Ilxsettings
let compiling_msilxlib_ref = ref false
let publickey = PublicKeyToken(Bytes.of_intarray [|103;241;202;169;071;205;028;035|])
let version = IL.parse_version Ilxconfig.version
let ilxLibraryAssemRef = ref (None : ILAssemblyRef option)
(* How are closures implemented? *)
let call_implementation = ref Ilxconfig.default_call_implementation
let tailcall_implementation = ref Ilxconfig.default_tailcall_implementation
let entrypoint_implementation = ref Ilxconfig.default_entrypoint_implementation
let assref nm = ILAssemblyRef.Create(nm, None, Some publickey,false, Some version, None)
let scoref () =
if !compiling_msilxlib_ref then ScopeRef_local
else
ScopeRef_assembly
(match !ilxLibraryAssemRef with
| Some o -> o
| None -> assref "FSharp.Core" (* failwith "ilxLibraryAssemRef is not set" *) )
let ilxNamespace () = "Microsoft.FSharp.Core"
let minCLIMetadataVersion () = IL.parse_version "2.0.0"