Skip to content

Commit 196b946

Browse files
author
7sharp9
committed
Addressing code issues:
Removed isOut/param/optional Changed to list comprehension to a simple map Remove match statement using type argument as is.
1 parent 0408959 commit 196b946

File tree

1 file changed

+2
-9
lines changed

1 file changed

+2
-9
lines changed

src/fsharp/vs/Symbols.fs

Lines changed: 2 additions & 9 deletions
Original file line numberDiff line numberDiff line change
@@ -1407,15 +1407,8 @@ and FSharpMemberOrFunctionOrValue(cenv, d:FSharpMemberOrValData, item) =
14071407
then tryDestTupleTy cenv.g typ
14081408
else [typ]
14091409
yield
1410-
[for typ in allArguments do
1411-
match typ with
1412-
| TType_var tp ->
1413-
let isParamArrayArg = HasFSharpAttribute cenv.g cenv.g.attrib_ParamArrayAttribute tp.Attribs
1414-
let isOutArg = HasFSharpAttribute cenv.g cenv.g.attrib_OutAttribute tp.Attribs && isByrefTy cenv.g typ
1415-
let isOptionalArg = HasFSharpAttribute cenv.g cenv.g.attrib_OptionalArgumentAttribute tp.Attribs
1416-
let argInfo : ArgReprInfo = { Name=None; Attribs= [] }
1417-
yield FSharpParameter(cenv, tp.AsType, argInfo, x.DeclarationLocationOpt, isParamArrayArg, isOutArg, isOptionalArg)
1418-
| _ -> () ]
1410+
allArguments
1411+
|> List.map (fun arg -> FSharpParameter(cenv, arg, { Name=None; Attribs= [] }, x.DeclarationLocationOpt, false, false, false))
14191412
|> makeReadOnlyCollection ]
14201413
|> makeReadOnlyCollection
14211414
else

0 commit comments

Comments
 (0)