Liste Nasıl Aritmetik Taşma Atmak İçin Azaltılır

Question

Yani, bir kodlama alıştırmasının parçası olarak bazı F # kodları üzerinde çalışırken, başka bir geliştirici ilginç bir şey işaret etti. Bir listeyi toplamak için sadece hızlı bir kod parçası yapıyorduk. Ben yaparsanız: eğer yaparsam, Ancak

System.OverflowException: Arithmetic operation resulted in an overflow. 
    at <StartupCode$FSI_0003>.$FSI_0003.main@() 
Stopped due to error 

:

[1..100000] |> Seq.sum 

aşağıdaki hatayı alıyorum

[1..100000] |> List.reduce (+) 

alıyorum:

val it : int = 705082704 

Ben her ne kadar fark Bu iki kod parçası aynı payı gerçekleştirmelidir çok farklı olduklarını düşünün. Ben sadece meraklı bir cevap vermek yerine OverflowException atmak için List.reduce almak için bir yol var mı merak ediyorum?

Answer 1

Bir kontrol operatörünü kullanabilirsiniz. F # kaynak kodu

[<CompiledName("Sum")>] 
let inline sum (source: seq< (^a) >) : ^a = 
    use e = source.GetEnumerator() 
    let mutable acc = LanguagePrimitives.GenericZero< (^a) > 
    while e.MoveNext() do 
     acc <- Checked.(+) acc e.Current 
    acc 

Bildirim İşaretli (operatör) aritmetik için bu kontroller taşıyor itibaren

[1..100000] |> List.reduce (Checked.(+)) 

Answer 2

...

http://msdn.microsoft.com/en-us/library/vstudio/ee340296.aspx