anchor.diff:  | SnippetWholeFile
   | SnippetLinesBounded of startLine : int * endLine : int
   | SnippetStartingWith of start : string
  +
  +let formatSnip = function
  +| file, _ -> sprintf "`%s`" file
   
   let snipId = function
   | file, SnippetWholeFile -> file
  
positive.code: let repo = getBuildParamOrDefault "repo" __SOURCE_DIRECTORY__
  let githubAccount = "theimowski"
  let githubRepo = "SuaveMusicStore"
  let branch = "v2.0_src"
  
  let write (path, lines: list<String>) =
    if not (File.Exists path && File.ReadAllLines path |> Array.toList = lines) then
  
negative.code:     |> Seq.toList
      |> List.zip snippetOrder
      |> List.sortBy fst
      |> List.map changeLineNums
  
    let tips =
      html.Root.XPathSelectElements "div[@class='tip']"
  