Removing option from Tuple active pattern (#6772)

fsharp · May 24, 2019 · 25560f4 · 25560f4
1 parent 4f50cd6
commit 25560f4
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/src/fsharp/symbols/SymbolPatterns.fs b/src/fsharp/symbols/SymbolPatterns.fs
@@ -132,8 +132,8 @@ module Symbol =
 #endif
     let (|Enum|_|) (entity: FSharpEntity) = if entity.IsEnum then Some() else None
 
-    let (|Tuple|_|) (ty: FSharpType option) = 
-        ty |> Option.bind (fun ty -> if ty.IsTupleType then Some() else None)
+    let (|Tuple|_|) (ty: FSharpType) =
+        if ty.IsTupleType then Some() else None
 
     let (|RefCell|_|) (ty: FSharpType) = 
         match getAbbreviatedType ty with

diff --git a/src/fsharp/symbols/SymbolPatterns.fsi b/src/fsharp/symbols/SymbolPatterns.fsi
@@ -37,7 +37,7 @@ module public Symbol =
     val (|ProvidedAndErasedType|_|) : FSharpEntity -> unit option
 #endif
     val (|Enum|_|) : FSharpEntity -> unit option
-    val (|Tuple|_|) : FSharpType option -> unit option
+    val (|Tuple|_|) : FSharpType -> unit option
     val (|RefCell|_|) : FSharpType -> unit option
     val (|FunctionType|_|) : FSharpType -> unit option
     val (|Pattern|_|) : FSharpSymbol -> unit option