Commite9bfa81

committed

Fix 34 - extension member duplicate check (3)

1 parent8d85332 commite9bfa81Copy full SHA for e9bfa81

File tree

-3

lines changed

-3

lines changed

Lines changed: 3 additions & 3 deletions

Original file line number	Diff line number	Diff line change
`@@ -1073,7 +1073,7 @@ let CheckTopBinding cenv env (TBind(v,e,_) as bind) =`
`1073`	`1073`
`1074`	`1074`	`letcheck skipValCheck nm=`
`1075`	`1075`	`ifnot skipValCheck&&`
`1076`		`- v.IsModuleBinding&&`
	`1076`	`+ v.IsModuleBinding&&`
`1077`	`1077`	`tcref.ModuleOrNamespaceType.AllValsByLogicalName.ContainsKey(nm)&&`
`1078`	`1078`	`not(valEq tcref.ModuleOrNamespaceType.AllValsByLogicalName.[nm] v)then`
`1079`	`1079`
`@@ -1205,9 +1205,9 @@ let CheckEntityDefn cenv env (tycon:Entity) =`
`1205`	`1205`
`1206`	`1206`	`letimmediateProps= GetImmediateIntrinsicPropInfosOfType(None,AccessibleFromSomewhere) cenv.g cenv.amap m typ`
`1207`	`1207`
`1208`		`-letgetHash(hash:Dictionary<string,_>)nm=`
	`1208`	`+letgetHash(hash:Dictionary<string,_>)nm=`
`1209`	`1209`	`if hash.ContainsKey(nm)then hash.[nm]else[]`
`1210`		`-`
	`1210`	`+`
`1211`	`1211`	`// precompute methods grouped by MethInfo.LogicalName`
`1212`	`1212`	`lethashOfImmediateMeths=`
`1213`	`1213`	`leth=new Dictionary<string,_>()`

Comments

(0)