Commita35e535

Vasily Kirichenko

authored and

Vasily Kirichenko

committed

auto open modules

1 parent80dc7d3 commita35e535Copy full SHA for a35e535

File tree

-1

lines changed

-1

lines changed

Lines changed: 9 additions & 1 deletion

Original file line number	Diff line number	Diff line change
`@@ -23,7 +23,8 @@ module UnusedOpens =`
`23`	`23`	`IsGlobal:bool}`
`24`	`24`
`25`	`25`	`memberthis.AllChildSymbols=`
`26`		`-seq{for modulin this.Modulesdo`
	`26`	`+let recgetAllChildSymbolsInModule(modul:FSharpEntity)=`
	`27`	`+seq{`
`27`	`28`	`for entin modul.NestedEntitiesdo`
`28`	`29`	`yield ent:> FSharpSymbol`
`29`	`30`
`@@ -35,8 +36,15 @@ module UnusedOpens =`
`35`	`36`	`for unionCasein ent.UnionCasesdo`
`36`	`37`	`yieldupcast unionCase`
`37`	`38`
	`39`	`+if ent.IsFSharpModule&& hasAttribute<AutoOpenAttribute> ent.Attributesthen`
	`40`	`+yield! getAllChildSymbolsInModule ent`
	`41`	`+`
`38`	`42`	`for fvin modul.MembersFunctionsAndValuesdo`
`39`	`43`	`yieldupcast fv`
	`44`	`+}`
	`45`	`+`
	`46`	`+seq{for modulin this.Modulesdo`
	`47`	`+yield! getAllChildSymbolsInModule modul`
`40`	`48`	`}\|> Seq.cache`
`41`	`49`
`42`	`50`	`letgetOpenStatements(openDeclarations:FSharpOpenDeclaration list):OpenStatement list=`

Comments

(0)