&& test with FUNC_UNCLUDED .t. and .f. #define FUNC_UNCLUDED .T. function Test() local i, s set proc to #if !FUNC_UNCLUDED set proc to .... additive #endif s = seconds() && 3 sec and .3 sec is too small, try to get at 30 sec and 3.0 sec for i = 1 to 30000 && I multiplied your value by 10. && testing can be done with 6000 or so to give an indication = function('aa', 'cc', 'cc') endfor ? seconds() -s endfunc *---- #if FUNC_UNCLUDED && copy the function here #endif