Example #1
0
static PT_Tree implode_tree(PT_Tree tree) 
{
  PT_ParseTree pt = PT_makeValidParseTreeFromTree(tree);
  return (PT_Tree)PTPT_liftATerm(PT_implodeParseTree(pt,
						     ATtrue,
						     ATtrue,
						     ATtrue,
						     ATtrue,
						     ATtrue,
						     ATtrue,
						     ATfalse,
						     ATtrue,
						     ATtrue,
						     ATtrue,
						     ATtrue));
}
Example #2
0
ATerm STRSGLR_implode_parsetree(ATerm t)
{
    return PT_implodeParseTree(
               PT_ParseTreeFromTerm(t),
               ATtrue, /* cons */
               ATtrue, /* layout */
               ATtrue, /* literals */
               ATtrue, /* injections */
               ATtrue, /* parsetree */
               ATtrue, /* implode lexicals */
               ATfalse, /* don't keep annotations */
               ATtrue, /* alt */
               ATtrue, /* seq */
               ATtrue, /* opt */
               ATfalse /* layout placeholder */
           );
}