Pandoc
  Meta { unMeta = fromList [] }
  [ Header
      1
      ( "a-chapter" , [] , [] )
      [ Span ( "anchor" , [] , [] ) [] , Str "A chapter" ]
  , Para [ Str "Some text." ]
  , Header
      1 ( "another-chapter" , [] , [] ) [ Str "Another chapter" ]
  , Para [ Str "A reference to ." ]
  , Para
      [ Str "A reference to "
      , Link
          ( "" , [] , [] ) [ Str "A chapter" ] ( "#anchor" , "" )
      , Str "."
      ]
  ]