Skip to content

Commit

Permalink
3.1.5
Browse files Browse the repository at this point in the history
  • Loading branch information
TeamSPoon committed Jan 26, 2024
1 parent 57688d2 commit 91c3628
Show file tree
Hide file tree
Showing 2 changed files with 4 additions and 3 deletions.
2 changes: 1 addition & 1 deletion pack.pl
Original file line number Diff line number Diff line change
@@ -1,5 +1,5 @@
name(logicmoo_utils).
version('3.1.4').
version('3.1.5').
title('Common predicates that are used throughout LogicMOO Software').
keywords([local_scoping,utilities,debugging,loop_checking]).
author( 'Douglas Miles', 'http://www.linkedin.com/in/logicmoo' ).
Expand Down
5 changes: 3 additions & 2 deletions prolog/logicmoo_startup.pl
Original file line number Diff line number Diff line change
Expand Up @@ -899,7 +899,7 @@
init_why(Phase, Why):-
%wemsg("%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%%"),
%wemsg("%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%%"),
wemsg(init_why(Phase, Why)),
%wemsg(init_why(Phase, Why)),
set_prolog_flag(current_phase, Phase),
%wemsg("%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%%"),
%wemsg("%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%~%%%%"),!,
Expand Down Expand Up @@ -1981,12 +1981,13 @@
%=======================================

% These are mainly so we can later understand the restore phasing
/*
:- initialization(nop(wemsg(init_phase(program))),program).
:- initialization((wemsg(init_phase(after_load))),after_load).
:- initialization(nop(wemsg(init_phase(restore))),restore).
:- initialization((wemsg(init_phase(restore_state))),restore_state).
:- initialization(nop(wemsg(init_phase(prepare_state))),prepare_state).

*/

%= Register a hook after restore
:- initialization(nop(init_why(during_boot,restore)),restore).
Expand Down

0 comments on commit 91c3628

Please sign in to comment.