before-main? ( -- ? )


Vocabulary
xml.private

Definition
USING: combinators.short-circuit kernel namespaces sequences
xml.data xml.state ;

IN: xml.private

: before-main? ( -- ? )
xml-stack get
{ [ length 1 = ] [ first second [ tag? ] any? not ] } 1&& ;