← Back to branch summary

~ubuntu-branches/ubuntu/trusty/fsharp/trusty

« back to all changes in this revision

Viewing changes to src/fsharp/FSharp.Core/local.fs

  • Committer: Package Import Robot
  • Author(s): Christopher James Halse Rogers
  • Date: 2014-02-13 16:55:16 UTC
  • mfrom: (3.1.2 trusty)
  • Revision ID: package-import@ubuntu.com-20140213165516-o51ftovy7pu2d0rk
Tags: 3.0.34+dfsg-3ubuntu1
* Make DEP-8 test depend on only fsharp package to pick up any dependency breakage
* Add missing libmono-compilerservices-symbolwriter4.0-cil dependency to fsharp
* Add fsharpc/fsharpi manpages
* Strip executable bit from xbuild .Targets files; now lintian clean!

Show diffs side-by-side

added added

removed removed

Lines of Context:
src/fsharp/FSharp.Core/local.fs
541
541
            | _,_ when valuesExist && (keys.Length <> values.Length) -> raise (ArgumentException())
542
542
            | _,_ ->   
543
543
            qsort(keys,values,0,keys.Length-1,LanguagePrimitives.FastGenericComparer<'Key>)
 
544
(*
544
545
        static member Sort<'Key,'Value when 'Key : comparison>(keys : 'Key[], values : 'Value[], start : int, last : int) =
545
546
            match keys with
546
547
            | null -> raise (ArgumentNullException())
547
548
            | _ ->        
548
549
            qsort(keys,values,start,last,LanguagePrimitives.FastGenericComparer<'Key>)
549
 
        static member Sort<'Key,'Value when 'Key : comparison>(keys : 'Key[], values : 'Value[], start : int, last : int, comparer : IComparer<'Key>) =
 
550
*)
 
551
        static member Sort<'Key,'Value when 'Key : comparison>(keys : 'Key[], values : 'Value[], start : int, length : int, comparer : IComparer<'Key>) =
550
552
            match keys with
551
553
            | null -> raise (ArgumentNullException())
552
554
            | _ ->        
553
555
            let comparer = match comparer with null -> LanguagePrimitives.FastGenericComparer<'Key> | _ -> comparer
554
 
            qsort(keys,values,start,last,comparer)
 
556
            qsort(keys,values,start,start+length-1,comparer)
555
557
#else
556
558
#endif
557
559