@@ -2809,7 +2809,11 @@ type TcConfig private (data : TcConfigBuilder,validate:bool) =
28092809yield tcConfig.MakePathAbsolute x
28102810
28112811| None->
2812+ #if FSI_ TODO_ NETCORE// there is no really good notion of runtime directory on .NETCore
2813+ let runtimeRoot = Path.GetDirectoryName( typeof< System.Object>. Assembly.Location)
2814+ #else
28122815let runtimeRoot = System.Runtime.InteropServices.RuntimeEnvironment.GetRuntimeDirectory()
2816+ #endif
28132817let runtimeRootWithoutSlash = runtimeRoot.TrimEnd( '/' , '\\' )
28142818let runtimeRootFacades = Path.Combine( runtimeRootWithoutSlash, " Facades" )
28152819let runtimeRootWPF = Path.Combine( runtimeRootWithoutSlash, " WPF" )
@@ -2826,6 +2830,7 @@ type TcConfig private (data : TcConfigBuilder,validate:bool) =
28262830yield runtimeRootWPF// PresentationCore.dll is in C:\Windows\Microsoft.NET\Framework\v4.0.30319\WPF
28272831
28282832| ResolutionEnvironment.EditingOrCompilation_ ->
2833+ #if ENABLE_ MONO_ SUPPORT
28292834if runningOnMonothen
28302835// Default compilation-time references on Mono
28312836//
@@ -2844,6 +2849,7 @@ type TcConfig private (data : TcConfigBuilder,validate:bool) =
28442849if Directory.Exists( runtimeRootApiFacades) then
28452850yield runtimeRootApiFacades
28462851else
2852+ #endif
28472853// Default compilation-time references on .NET Framework
28482854//
28492855// This is the normal case for "fsc.exe a.fs". We refer to the reference assemblies folder.