Right
    [ TokenProlog
        ( Prolog
            { prologXmlDeclaration = Just
                ( XMLDeclaration "1.0" ( Just "utf-8" ) Nothing )
            , prologInstructions = []
            , prologDoctype = Nothing
            }
        )
    , TokenTag
        ( QName
            { namePrefix = ""
            , nameLocal = "feed"
            }
        )
        ( fromList
            [
                ( QName
                    { namePrefix = ""
                    , nameLocal = "xmlns"
                    }
                , "http://www.w3.org/2005/Atom"
                )
            ]
        )
        [ TokenTag
            ( QName
                { namePrefix = ""
                , nameLocal = "title"
                }
            )
            ( fromList
                [
                    ( QName
                        { namePrefix = ""
                        , nameLocal = "type"
                        }
                    , "text"
                    )
                ]
            ) [ TokenTextContent "<em>Example</em> Feed" ]
        , TokenTag
            ( QName
                { namePrefix = ""
                , nameLocal = "link"
                }
            )
            ( fromList
                [
                    ( QName
                        { namePrefix = ""
                        , nameLocal = "href"
                        }
                    , "http://example.org/"
                    )
                ]
            ) []
        , TokenTag
            ( QName
                { namePrefix = ""
                , nameLocal = "updated"
                }
            ) ( fromList [] ) [ TokenTextContent "2003-12-13T18:30:02Z" ]
        , TokenTag
            ( QName
                { namePrefix = ""
                , nameLocal = "author"
                }
            ) ( fromList [] )
            [ TokenTag
                ( QName
                    { namePrefix = ""
                    , nameLocal = "name"
                    }
                ) ( fromList [] ) [ TokenTextContent "John Doe" ]
            , TokenTextContent "
        "
            ]
        , TokenTag
            ( QName
                { namePrefix = ""
                , nameLocal = "id"
                }
            ) ( fromList [] ) [ TokenTextContent "urn:uuid:60a76c80-d399-11d9-b93C-0003939e0af6" ]
        , TokenTag
            ( QName
                { namePrefix = ""
                , nameLocal = "entry"
                }
            ) ( fromList [] )
            [ TokenTag
                ( QName
                    { namePrefix = ""
                    , nameLocal = "title"
                    }
                ) ( fromList [] ) [ TokenTextContent "Atom-Powered Robots Run Amok" ]
            , TokenTag
                ( QName
                    { namePrefix = ""
                    , nameLocal = "link"
                    }
                )
                ( fromList
                    [
                        ( QName
                            { namePrefix = ""
                            , nameLocal = "href"
                            }
                        , "http://example.org/2003/12/13/atom03"
                        )
                    ]
                ) []
            , TokenTag
                ( QName
                    { namePrefix = ""
                    , nameLocal = "id"
                    }
                ) ( fromList [] ) [ TokenTextContent "urn:uuid:1225c695-cfb8-4ebb-aaaa-80da344efa6a" ]
            , TokenTag
                ( QName
                    { namePrefix = ""
                    , nameLocal = "updated"
                    }
                ) ( fromList [] ) [ TokenTextContent "2003-12-13T18:30:02Z" ]
            , TokenTag
                ( QName
                    { namePrefix = ""
                    , nameLocal = "summary"
                    }
                ) ( fromList [] ) [ TokenTextContent "Some text." ]
            , TokenTextContent "
        "
            ]
        , TokenTextContent ""
        ]
    , TokenTextContent ""
    ]