Name: enable_profiling_all/1
assert_them(_,[]). assert_them(Module,[Name/Arity|T]) :- assertz(profiler:profiling_term(Module:Name/Arity,profiler:default_name)), assert_them(Module,T).
Calls:
Name: RECURSIVE_CALL/2
Name: assertz/1
Called:
enable_profiling_all(Module) :- findall(X,Module:current_predicate(X),List), assert_them(Module,List).
Name: assert_them/2
Name: findall/3