layoutEndsWith :: Parser ()
layoutEndsWith = Parser $ \s -> runParser (views parserLayout go s) s where
  go (BracedLayout _ p _ _:_) = p
  go (IndentedLayout _ : xs)  = go xs
  go []                       = eof
layoutEndsWith :: Parser ()
layoutEndsWith = Parser $ \s -> runParser (views parserLayout go s) s where
  go (BracedLayout _ p _ _:_) = p
  go (IndentedLayout _ : xs)  = go xs
  go []                       = eof
layoutEndsWith = Parser $ \s -> runParser (views parserLayout go s) s where
  go (BracedLayout _ p _ _:_) = p
  go (IndentedLayout _ : xs)  = go xs
  go []                       = eof