Merge pull request #1131 from triska/cpu_time

walltime --> CPU time
This commit is contained in:
Mark Thom
2021-12-07 20:30:00 -07:00
committed by GitHub

View File

@@ -1,5 +1,5 @@
/* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - /* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
Written 2020 by Markus Triska (triska@metalevel.at) Written 2020, 2021 by Markus Triska (triska@metalevel.at)
Part of Scryer Prolog. Part of Scryer Prolog.
This library provides predicates for reasoning about time. This library provides predicates for reasoning about time.
@@ -109,7 +109,7 @@ time(Goal) :-
time_true(ID) :- time_true(ID) :-
report_time(ID). report_time(ID).
time_true(ID) :- time_true(ID) :-
% on backtracking, update the stored walltime for this ID % on backtracking, update the stored CPU time for this ID
retract(time_state(ID, _)), retract(time_state(ID, _)),
'$cpu_now'(T0), '$cpu_now'(T0),
asserta(time_state(ID, T0)), asserta(time_state(ID, T0)),