{ FullRelativeName:LongIdent

Qualifier:LongIdent

Namespace:LongIdent option

Name:LongIdent}

Name:LongIdent

LastIdent:string}

overridex.ToString()= sprintf"%A" x

{ FullRelativeName= String.concat"." fullRelativeName//.[0..fullRelativeName.Length - identCount - 1]

Qualifier= String.concat"." qualifier

Namespace= ns

Name=match restIdentswith[|_|]->""|_-> String.concat"." restIdents})

Name=match restIdentswith[|_|]->""|_-> String.concat"." restIdents

LastIdent= Array.tryLast restIdents|> Option.defaultValue""})

| Namespace

assemblyContentProvider: AssemblyContentProvider

inherit CodeFixProvider()

letchecker= checkerProvider.Checker

letfixUnderscoresInMenuText(text:string)= text.Replace("_","__")

openNamespaceFix context ctx name ns multipleNames)

|> Seq.toList

candidates

|> Seq.filter(fun(entity,_)->not(entity.LastIdent.StartsWith"op_"))// Don't include qualified operator names. The resultant codefix won't compile because it won't be an infix operator anymore.

|> Seq.map(fun(entity,_)-> entity.FullRelativeName, entity.Qualifier)

|> Seq.distinct

|> Seq.sort

|> Seq.map(qualifySymbolFix context)

|> Seq.toList

for codeFixin openNamespaceFixes@quilifySymbolFixesdo

for codeFixin openNamespaceFixes@qualifiedSymbolFixesdo

context.RegisterCodeFix(codeFix,(context.Diagnostics|> Seq.filter(fun x-> fixableDiagnosticIds|> List.contains x.Id)).ToImmutableArray())

override__.FixableDiagnosticIds= fixableDiagnosticIds.ToImmutableArray()

longIdent

|> List.map(fun ident->

{ Ident= ident.idText

Resolved=not(ident.idRange= unresolvedIdentRange)})

Resolved=not(ident.idRange= unresolvedIdentRange)})

|> List.toArray)

letcreateEntity= ParsedInput.tryFindInsertionContext unresolvedIdentRange.StartLine parsedInput maybeUnresolvedIdents

return entities|> Seq.map createEntity|> Seq.concat|> Seq.toList|> getSuggestions context