44module internal FSharp.Compiler.DependencyManagerIntegration
55
66open System
7+ open System.Collections .Generic
78open System.IO
89open System.Reflection
910open FSharp.Compiler .DotNetFrameworkDependencies
@@ -64,8 +65,9 @@ type internal IDependencyManagerProvider =
6465 abstract Name: string
6566 abstract Key: string
6667 abstract ResolveDependencies: scriptDir : string * mainScriptName : string * scriptName : string * scriptExt : string * packageManagerTextLines : string seq * tfm : string -> bool * string list * string list
68+
6769 abstract DependencyAdding: IEvent < string * string >
68- abstract DependencyAdded: IEvent < string * string * string list * string list * string list >
70+ abstract DependencyAdded: IEvent < string * string * IEnumerable < string > * IEnumerable < string > * IEnumerable < string > >
6971 abstract DependencyFailed: IEvent < string * string >
7072
7173[<RequireQualifiedAccess>]
@@ -79,9 +81,9 @@ type ReflectionDependencyManagerProvider(theType: Type, nameProperty: PropertyIn
7981 let nameProperty = nameProperty.GetValue >> string
8082 let keyProperty = keyProperty.GetValue >> string
8183
82- let dependencyAddingEvent = Event<_ >()
83- let dependencyAddedEvent = Event<_ >()
84- let dependencyFailedEvent = Event<_ >()
84+ let dependencyAddingEvent = Event< string * string >()
85+ let dependencyAddedEvent = Event< string * string * IEnumerable < string > * IEnumerable < string > * IEnumerable < string > >()
86+ let dependencyFailedEvent = Event< string * string >()
8587
8688 static member InstanceMaker ( theType : System.Type , outputDir : string option ) =
8789 match ReflectionHelper.getAttributeNamed theType dependencyManagerAttributeName,
@@ -144,7 +146,7 @@ type ReflectionDependencyManagerProvider(theType: Type, nameProperty: PropertyIn
144146
145147 for prLine in packageManagerTextLines do
146148 if succeeded then
147- dependencyAddedEvent.Trigger( key, prLine, references, generatedScripts, additionalIncludeFolders)
149+ dependencyAddedEvent.Trigger( key, prLine, references |> List.toSeq , generatedScripts |> List.toSeq , additionalIncludeFolders |> List.toSeq )
148150 else
149151 dependencyFailedEvent.Trigger( key, prLine)
150152
0 commit comments