@@ -152,17 +152,18 @@ let catchAll (ie: IEvent<_,_>) : IEvent<_> =
152152 ie.Add( fun x -> try w( x) with err-> ignore( System.Windows.Forms.MessageBox.Show( err.ToString())); ());
153153 e
154154
155+ let fsiExeName () = if SessionsProperties.useAnyCpuVersionthen " fsianycpu.exe" else " fsi.exe"
155156let determineFsiRelativePath () =
156157let thisAssembly : System.Reflection.Assembly = typeof< Microsoft.FSharp.Compiler.Server.Shared.FSharpInteractiveServer>. Assembly
157158let thisAssemblyDirectory = thisAssembly.Location|> Path.GetDirectoryName
158159// Use the quick-development path if available
159- Path.Combine( thisAssemblyDirectory, " fsi.exe " )
160+ Path.Combine( thisAssemblyDirectory, fsiExeName () )
160161
161162let determineFsiPath () =
162163// Use the quick-development path if available
163164let fsiRelativePath = determineFsiRelativePath()
164165let fsbin = match Internal.Utilities.FSharpEnvironment.BinFolderOfDefaultFSharpCompilerwith | Some( s) -> s| None-> " "
165- let fsiRegistryPath = Path.Combine( fsbin, if SessionsProperties.useAnyCpuVersion then " fsianycpu.exe " else " fsi.exe " )
166+ let fsiRegistryPath = Path.Combine( fsbin, fsiExeName () )
166167// Choose relative path, if it exists (for developers), otherwise, the installed path.
167168if File.Exists( fsiRelativePath) then
168169 fsiRelativePath