main.pas line3300 add begin macroError('not supported or wrong number of parameters'); if cbData = NIL then exit; md:=cbData; name:=trim(name); if name = '' then exit; //[rejetto] if (name='special end') and specialend then begin result=p; exit; end; //[/rejetto] if (name [ 1 ] = '%') and (name [ length(name) ] = '%') then begin handleSymbol(); exit; end; ************************************************ main.pas line 3650 add ....... var i: integer; //[rejetto] var specialend:boolean; //[/rejetto] begin //[rejetto] specialend=false; //[/rejetto] result:=''; if (folder = NIL) or not ...... ************************************************ main.pas line 3740 add result:=result+diffTpl['']; md.f:=NIL; tryApplyMacrosAndSymbols(result, @md, table); //[rejetto] specialend=true; // ici est activé le traitement des macros type {{special end| .....;.}} tryApplyMacrosAndSymbols(result, @md, table); //conversion des dernières macros[/color] //[rejetto] applySequential(); // ensure this is the last symbol to be translated result:=xtpl(result, [ '\n', CRLF,[/quote]