- ::findTag now creates sub nodes.
This commit is contained in:
Paul Beckingham
2014-05-20 18:24:21 -04:00
parent 922b80a5be
commit 5f6230da3a

View File

@@ -853,8 +853,19 @@ void A3t::findTag ()
{ {
(*i)->unTag ("?"); (*i)->unTag ("?");
(*i)->tag ("TAG"); (*i)->tag ("TAG");
(*i)->tag ("EXPANDED");
(*i)->attribute ("sign", sign); (*i)->attribute ("sign", sign);
(*i)->attribute ("tag", tag); (*i)->attribute ("tag", tag);
Tree* branch = (*i)->addBranch (new Tree ("argTag"));
branch->attribute ("value", "tags");
branch = (*i)->addBranch (new Tree ("argTag"));
branch->attribute ("value", (sign == "+" ? "_hastag_" : "_notag_"));
branch->tag ("OP");
branch = (*i)->addBranch (new Tree ("argTag"));
branch->attribute ("value", tag);
} }
} }
} }