anchor.diff:  
       match lines with
       | [] -> DoNotGenerate
  -    | xs -> List.append xs [ PrintStatement (sprintf "%s Loaded" packageName) ] |> Generate
  +    | xs -> Generate xs
   
     let writeFSharpScript scriptFile input =
       let pieces = [
  
positive.code:             |> sprintf """#load "%s" """
            | ReferenceFrameworkAssembly name ->
              sprintf """#r "%s" """ name
            | PrintStatement text -> 
              let escape = 
                // /!\ /!\ /!\ TODO escape text /!\ /!\ /!\
                id
              sprintf @"System.Console.WriteLine(""%s""); " (escape text)
      ]
      
      let text =
  
negative.code:             |> sprintf """#load @"%s" """
            | ReferenceFrameworkAssembly name ->
              sprintf """#r "%s" """ name
      ]
  
      let text =
  