anchor.diff:          // printfn "ModulePath: %s" modulePath
           let fileDir = Path.GetDirectoryName modulePath
           let projDir = Path.GetDirectoryName(com.ProjectFile)
  -
           let modulePathname =
               match fileDir with
               | ""
  
positive.code:             modulePathname
                  .Replace(outDir, String.Empty) // Remove outDir from module path
                  .Replace(projDir, String.Empty) // Remove projectDir from module path
  
          let relativePath =
              if commonPrefix.Length > 0 then
                  // Remove any common prefix between module path and project file
                  relativePath.Replace(commonPrefix, String.Empty)
              else
                  relativePath
          // printfn "relativePath: %A" relativePath
          // Cleanup path
          let relativePath = relativePath.Replace("//", "/")
  
          // Relative path from current file (up) to project dir
          let fileRelative =
              let commonPrefix =
                  Path.getCommonBaseDir [ com.CurrentFile
                                          com.ProjectFile ]
  
              Path
                  .GetDirectoryName(com.CurrentFile.Replace(commonPrefix, String.Empty))
  
negative.code:             |> String.concat "/"
              // If empty path, then we're in the same dir
              |> (fun str -> if str.Length = 0 then "." else str)
  
          // printfn "fileRelative: %A" fileRelative
          // printfn "mod, rel: %A" (modulePathname, relativePath)
          match modulePathname, relativePath with
          | "", _
  