private Statement tryResolveTemplate(MacroStatement macro, string tagname, IEnumerable<Expression> argsource){
MacroStatement bml = macro.findMacroContainer("bml");
IDictionary<string, MacroStatement> templates = null;
if (bml.ContainsAnnotation("templates")){
templates = bml.get<IDictionary<string, MacroStatement>>("templates");
}
if (templates != null && templates.ContainsKey(tagname)){
MacroStatement targetmacro = templates[tagname].CloneNode();
bindParameters(macro,targetmacro, argsource);
return targetmacro.Body;
}
return null;
}
protected override Statement ExpandImpl(MacroStatement macro){
macro.findMacroContainer("foreach").set("onempty", macro);
return null;
}
public override void OnMacroStatement(MacroStatement node){
exceptions = exceptions ?? new List<string>();
MacroStatement x = node;
var name = node.Name;
var simplename = name.Replace("_","");
var _bml = node.findMacroContainer("bml");
var bml = _bml!= null;
//set templates as exceptions
if (bml && node.Name == "template"){
var templatename = node.Arguments[0].ToCodeString();
exceptions.Add(templatename);
var templates = GetTemplates(_bml);
templates[templatename] = node;
//node.ReplaceBy(null);
}
else if (bml &&
(allowall && (!exceptions.Contains(simplename)))
||
(!allowall && exceptions.Contains(simplename)))
{
//if (node.findMacroContainer("template") == null){
x = new MacroStatement("bmlelement");
x.Arguments.Add(new ReferenceExpression(simplename));
if(name==simplename||name.EndsWith("_")){
x.Arguments.Add(new ReferenceExpression("___start"));
}
if(name==simplename||name.StartsWith("_")){
x.Arguments.Add(new ReferenceExpression("___end"));
}
foreach (Expression argument in node.Arguments){
x.Arguments.Add(argument.CloneNode());
}
x.Body = node.Body.CloneNode();
Visit(x.Body);
gradeReferencesAndStringsToBeWriteout(x.Body);
node.ReplaceBy(x);
//}
}
else if (node.Name == "bml"){
bmlelements.Add(node);
allowall = false;
exceptions = new List<string>(BmlMacro.SupportedElements);
if (null != node.Arguments.OfType<ReferenceExpression>().FirstOrDefault(n => n.ToCodeString() == "all")){
allowall = true;
exceptions = null;
}
BinaryExpression _exc_def = null;
if (null !=
(_exc_def =
node.Arguments.OfType<BinaryExpression>().FirstOrDefault(n => n.Left.ToCodeString() == "ex"))){
var _ex = _exc_def.Right as ArrayLiteralExpression;
IList<string> _newexceptions = new List<string>();
foreach (Expression item in _ex.Items){
_newexceptions.Add(item.ToCodeString());
}
exceptions = _newexceptions.ToList();
}
}
Visit(x.Body.Statements);
}