diff options
author | MichalMoskal <unknown> | 2010-02-18 23:14:09 +0000 |
---|---|---|
committer | MichalMoskal <unknown> | 2010-02-18 23:14:09 +0000 |
commit | de621e5b3814b5b7e0fc908809d9e9c19e38dec6 (patch) | |
tree | df85cb2383583f4d7736ac6f67fd13c342be76ad | |
parent | 2e03ed114503dfa16547c06766fa683c690f9052 (diff) |
Update to F# 1.9.9.9.
-rw-r--r-- | Binaries/FSharp.Core.dll | bin | 1660232 -> 937816 bytes | |||
-rw-r--r-- | Binaries/FSharp.PowerPack.dll | bin | 1032096 -> 711680 bytes | |||
-rw-r--r-- | Source/Basetypes/BigNum.ssc | 4 | ||||
-rw-r--r-- | Source/Basetypes/Rational.ssc | 8 |
4 files changed, 6 insertions, 6 deletions
diff --git a/Binaries/FSharp.Core.dll b/Binaries/FSharp.Core.dll Binary files differindex 38269ff6..bb62c285 100644 --- a/Binaries/FSharp.Core.dll +++ b/Binaries/FSharp.Core.dll diff --git a/Binaries/FSharp.PowerPack.dll b/Binaries/FSharp.PowerPack.dll Binary files differindex e3a57afb..0b5e207e 100644 --- a/Binaries/FSharp.PowerPack.dll +++ b/Binaries/FSharp.PowerPack.dll diff --git a/Source/Basetypes/BigNum.ssc b/Source/Basetypes/BigNum.ssc index fe7c7e0d..b8ebcde0 100644 --- a/Source/Basetypes/BigNum.ssc +++ b/Source/Basetypes/BigNum.ssc @@ -70,7 +70,7 @@ namespace Microsoft.Basetypes { // Convert to int, without checking whether overflows occur
public int ToInt {
get {
- return BIM.ToInt32(val);
+ return (int)val;
}
}
@@ -148,7 +148,7 @@ namespace Microsoft.Basetypes { System.Numerics.BigInteger rem = this.Abs.val;
while (rem > BIM.Zero) {
- res = BIM.ToInt32(rem %BI_2_TO_24).ToString(format) + res;
+ res = ((int)(rem %BI_2_TO_24)).ToString(format) + res;
rem = rem / BI_2_TO_24;
}
diff --git a/Source/Basetypes/Rational.ssc b/Source/Basetypes/Rational.ssc index 08485cdc..ca87b223 100644 --- a/Source/Basetypes/Rational.ssc +++ b/Source/Basetypes/Rational.ssc @@ -8,7 +8,7 @@ using Microsoft.Contracts; namespace Microsoft.Basetypes
{
- using BNM = Microsoft.FSharp.Math.BigNum;
+ using BNM = Microsoft.FSharp.Math.BigRational;
/// <summary>
/// The representation of a rational number.
@@ -19,9 +19,9 @@ namespace Microsoft.Basetypes public static readonly Rational ONE = new Rational ((!)BNM.One);
public static readonly Rational MINUS_ONE = new Rational ((!)(-BNM.One));
- private readonly Microsoft.FSharp.Math.BigNum _val;
+ private readonly Microsoft.FSharp.Math.BigRational _val;
- private Microsoft.FSharp.Math.BigNum! val {
+ private Microsoft.FSharp.Math.BigRational! val {
get {
if (_val == null)
return (!)BNM.Zero;
@@ -48,7 +48,7 @@ namespace Microsoft.Basetypes return new Rational(x);
}
- private Rational(Microsoft.FSharp.Math.BigNum! val) {
+ private Rational(Microsoft.FSharp.Math.BigRational! val) {
this._val = val;
}
|