pandoc/test/command/4240.md

```
% pandoc -f rst -s -t native
=====
Title
=====

--------
Subtitle
--------

header1
=======

header2
-------

.. _id:

header3
~~~~~~~

.. _id2:
.. _id3:

header4
~~~~~~~
^D
Pandoc
  ( Meta
    { unMeta = fromList
      [
        ( "subtitle", MetaInlines [ Str "Subtitle" ] )
      ,
        ( "title", MetaInlines [ Str "Title" ] )
      ]
    }
  )
  [ Header 1
    ( "header1", [], [] )
    [ Str "header1" ]
  , Header 2
    ( "header2", [], [] )
    [ Str "header2" ]
  , Header 3
    ( "id", [], [] )
    [ Str "header3" ]
  , Header 3
    ( "id3", [], [] )
    [ Str "header4", Span ( "id2", [], [] ) [] ]
  ]
```