USING: accessors combinators html.templates.chloe.syntax kernel
xml.data ;

IN: html.templates.chloe.compiler

: chloe-tag? ( tag -- ? )
dup xml? [ body>> ] when {
{ [ dup tag? not ] [ f ] }
{ [ dup chloe-name? not ] [ f ] }
[ t ]
} cond nip ;