anchor.diff:  let directorySeparator = Path.DirectorySeparatorChar.ToString()
   
   /// Convert the given windows path to a path in the current system
  -let convertWindowsToCurrentPath (windowsPath : string) =
  +let convertWindowsToCurrentPath (windowsPath : string) = 
       if (windowsPath.Length > 2 && windowsPath.[1] = ':' && windowsPath.[2] = '\\') then windowsPath
       else windowsPath.Replace(@"\", directorySeparator)
   
   /// Contains the IO encoding which is given via build parameter "encoding" or the default encoding if no encoding was specified.
  -let encoding =
  +let encoding = 
       match getBuildParamOrDefault "encoding" "default" with
       | "default" -> Text.Encoding.Default
       | enc -> Text.Encoding.GetEncoding(enc)
   
   /// Returns a sequence with all installed .NET framework versions
  -let getInstalledDotNetFrameworks() =
  +let getInstalledDotNetFrameworks() = 
       let frameworks = new ResizeArray<_>()
  -    try
  -        let matches =
  -            Registry.LocalMachine.OpenSubKey(@"SOFTWARE\Microsoft\NET Framework Setup\NDP").GetSubKeyNames()
  +    try 
  +        let matches = 
  +            Registry.LocalMachine.OpenSubKey(@"SOFTWARE\Microsoft\NET Framework Setup\NDP").GetSubKeyNames() 
               |> Seq.filter (fun keyname -> Regex.IsMatch(keyname, @"^v\d"))
           for item in matches do
               match item with
               | "v4.0" -> ()
  -            | "v4" ->
  +            | "v4" -> 
                   let key = @"SOFTWARE\Microsoft\NET Framework Setup\NDP\" + item
  -                Registry.LocalMachine.OpenSubKey(key).GetSubKeyNames()
  -                |> Seq.iter (fun subkey ->
  +                Registry.LocalMachine.OpenSubKey(key).GetSubKeyNames() 
  +                |> Seq.iter (fun subkey -> 
                          let key = @"SOFTWARE\Microsoft\NET Framework Setup\NDP\" + item + @"\" + subkey
                          let version = Registry.LocalMachine.OpenSubKey(key).GetValue("Version").ToString()
                          frameworks.Add(String.Format("{0} ({1})", version, subkey)))
               | "v1.1.4322" -> frameworks.Add item
  -            | _ ->
  +            | _ -> 
                   let key = @"SOFTWARE\Microsoft\NET Framework Setup\NDP\" + item
                   frameworks.Add(Registry.LocalMachine.OpenSubKey(key).GetValue("Version").ToString())
           frameworks :> seq<_>
       with e -> frameworks :> seq<_> //Probably a new unrecognisable version
   
   /// A record which allows to display lots of machine specific information like machine name, processor count etc.
  -type MachineDetails =
  +type MachineDetails = 
       { ProcessorCount : int
         Is64bit : bool
         OperatingSystem : string
  
positive.code: let getEnvironmentVarAsBool varName = getEnvironmentVarAsBoolOrDefault varName false
  
  /// Retrieves the environment variable or None if no value was set
  let environVarOrNone name =
      let var = environVar name
      if String.IsNullOrEmpty var then None
      else Some var
  
negative.code: let inline (</>) path1 path2 = combinePathsNoTrim path1 path2
  
  // Normalizes path for different OS
  let inline normalizePath (path : string) = 
      path.Replace('\\', Path.DirectorySeparatorChar).Replace('/', Path.DirectorySeparatorChar)
  
  /// Retrieves all environment variables from the given target
  let environVars target = 
      [ for e in Environment.GetEnvironmentVariables target -> 
            let e1 = e :?> Collections.DictionaryEntry
            e1.Key, e1.Value ]
  
  