anchor.diff:     doc.Blocks
      |> should equal  [SceneHeading [Literal "EXT. BRICK'S PATIO - DAY"]; Action [HardLineBreak; Literal "Some Action"; HardLineBreak; HardLineBreak; Literal "Some More Action"]]
   
  +[<Test>]
  +let ``Action with line breaks and no heading`` () =
  +   let doc = "Natalie looks around at the group, TIM, ROGER, NATE, and VEEK.\n
  +TIM, is smiling broadly." |> Fountain.Parse
  +   doc.Blocks
  +   |> should equal [Action [Literal "Natalie looks around at the group, TIM, ROGER, NATE, and VEEK."; HardLineBreak; HardLineBreak; Literal "TIM, is smiling broadly."]]
  +
  +
  +
   
   //===== Synopses
   
  
positive.code: 
  [<Test>]
  let ``Line Breaks`` () =
     let doc = """Murtaugh, springing...\n\nAn explosion of sound...\nAs it rises like an avenging angel ...\nHovers, shattering the air \n\nScreaming, chaos, frenzy.\nThree words that apply to this scene.""" |> Fountain.Parse
     doc.Blocks
     |> should equal [Action [Literal "Murtaugh, springing...\n\nAn explosion of sound...\nAs it rises like an avenging angel ...\nHovers, shattering the air \n\nScreaming, chaos, frenzy.\nThree words that apply to this scene."]]
  
  
  //===== Notes
  
negative.code: // TODO: are line breaks being recognized properly here? i think not. i think i need more line break cases
  [<Test>]
  let ``Emphasis - between line breaks`` () =
     let doc = "As he rattles off the long list, Brick and Steel *share a look.\r\n\
               \r\n\
               This is going to be BAD.*" |> Fountain.Parse
     doc.Blocks
     |> should equal [Action [Literal @"As he rattles off the long list, Brick and Steel *share a look.\r\n\"]; Action [Literal @"\r\n\"]; Action [Literal "This is going to be BAD.*"]]
  
  