time/1 uses the message infrastructure to print the result. You can hook
that using message_hook/3, but using statistics is a bit easier. The
bottom line is simply
my_time(Goal) :-
statistics(cputime, T0),
Goal,
statistics(cputime, T1),
T is T1-T0,
format('Used ~3f seconds~n', [T]).
Cheers --- Jan
P.s. Attached is a little library I've used several times to create
a LaTeX table.
>
> Regards,
> Chris
>
> --
> You received this message because you are subscribed to the Google
> Groups "SWI-Prolog" group.
> To unsubscribe from this group and stop receiving emails from it, send
> an email to
swi-prolog+...@googlegroups.com
> <mailto:
swi-prolog+...@googlegroups.com>.
> Visit this group at
http://groups.google.com/group/swi-prolog.
> For more options, visit
https://groups.google.com/d/optout.