Skip to content

Commit

Permalink
Changes following PR comments :-
Browse files Browse the repository at this point in the history
match styling change.
added open module to remove fully qualified path
removed unnecessary comment  "//need to hide"  added during prototyping
  • Loading branch information
xepaul authored and forki committed Jan 15, 2015
1 parent 0b2381f commit 848cacf
Showing 1 changed file with 6 additions and 4 deletions.
10 changes: 6 additions & 4 deletions src/fsharp/typrelns.fs
Original file line number Diff line number Diff line change
Expand Up @@ -25,6 +25,7 @@ open Microsoft.FSharp.Compiler.Lib
open Microsoft.FSharp.Compiler.Infos
open Microsoft.FSharp.Compiler.PrettyNaming
open Microsoft.FSharp.Compiler.Infos.AccessibilityLogic
open Microsoft.FSharp.Compiler.Nameres

#if EXTENSIONTYPING
open Microsoft.FSharp.Compiler.ExtensionTyping
Expand Down Expand Up @@ -1727,10 +1728,11 @@ type CalledMeth<'T>
let pminst = freshenMethInfo m pminfo
Choice1Of2(AssignedItemSetter(id,AssignedPropSetter(pinfo,pminfo, pminst), e))
| _ ->
let epinfos = match nameEnv with
| Some(ne) -> Microsoft.FSharp.Compiler.Nameres.ExtensionPropInfosOfTypeInScope infoReader ne (Some(nm), ad) m returnedObjTy
| _ -> []
match epinfos with // need to hide ?
let epinfos =
match nameEnv with
| Some(ne) -> ExtensionPropInfosOfTypeInScope infoReader ne (Some(nm), ad) m returnedObjTy
| _ -> []
match epinfos with
| [pinfo] when pinfo.HasSetter && not pinfo.IsIndexer ->
let pminfo = pinfo.SetterMethod
let pminst = freshenMethInfo m pminfo
Expand Down

0 comments on commit 848cacf

Please sign in to comment.