Merge pull request #149 from njlr/quickfix-fable-hide-system-linq

 * Hide System.Linq from Fable

Author: dsyme

.gitignore

@@ -200,6 +200,11 @@ xunit*.html
 artifacts/
 bin/
 
+# fable
+*.fs.js
+fable_modules
+.fable
+
 # jest/fable directories
 tests/fable/dist/
 tests/fable/node_modules/

src/FSharp.Control.AsyncSeq/AsyncSeq.fs

@@ -10,7 +10,9 @@ open System.Collections.Generic
 open System.Threading
 open System.Threading.Tasks
 open System.Runtime.ExceptionServices
+#if !FABLE_COMPILER
 open System.Linq
+#endif
 
 #nowarn "40" "3218"
 
@@ -1412,6 +1414,7 @@ module AsyncSeq =
       if (buffer.Count > 0) then
           yield buffer.ToArray() }
 
+  #if !FABLE_COMPILER
   let toSortedSeq fn source =
     toArrayAsync source |> Async.map fn |> Async.RunSynchronously
 
@@ -1426,6 +1429,7 @@ module AsyncSeq =
 
   let sortByDescending (projection:'T -> 'Key) (source:AsyncSeq<'T>) : array<'T> when 'Key : comparison =
     toSortedSeq (Array.sortByDescending projection) source
+  #endif
 
   #if !FABLE_COMPILER
   let bufferByCountAndTime (bufferSize:int) (timeoutMs:int) (source:AsyncSeq<'T>) : AsyncSeq<'T[]> =

src/FSharp.Control.AsyncSeq/AsyncSeq.fsi

@@ -437,6 +437,7 @@ module AsyncSeq =
     /// Flattens an AsyncSeq of asynchronous sequences.
     val concat : AsyncSeq<AsyncSeq<'T>> -> AsyncSeq<'T>
 
+#if !FABLE_COMPILER
     /// Yields a sequence ordered by keys.
     /// This function returns a sequence that digests the whole initial sequence as soon as
     /// that sequence is iterated. As a result this function should not be used with
@@ -460,7 +461,8 @@ module AsyncSeq =
     /// that sequence is iterated. As a result this function should not be used with
     /// large or infinite sequences.
     val sortByDescending : projection:('T -> 'Key) -> source:AsyncSeq<'T> -> array<'T> when 'Key : comparison
-
+    #endif
+    
     /// Interleaves two async sequences of the same type into a resulting sequence. The provided
     /// sequences are consumed in lock-step.
     val interleave : source1:AsyncSeq<'T> -> source2:AsyncSeq<'T> -> AsyncSeq<'T>

tests/fable/package.json

@@ -18,7 +18,7 @@
   },
   "dependencies": {},
   "devDependencies": {
-    "@babel/preset-env": "^7.12.1",    
+    "@babel/preset-env": "^7.12.1",
     "@sinonjs/fake-timers": "^6",
     "@testing-library/jest-dom": "^5",
     "fast-check": "^1",