*** empty log message ***
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@2215 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
@@ -5,7 +5,7 @@
|
||||
|
||||
Copyright: R. Rocha and NCC - University of Porto, Portugal
|
||||
File: opt.init.c
|
||||
version: $Id: opt.init.c,v 1.15 2007-04-26 14:11:08 ricroc Exp $
|
||||
version: $Id: opt.init.c,v 1.16 2008-04-11 16:26:18 ricroc Exp $
|
||||
|
||||
**********************************************************************/
|
||||
|
||||
@@ -146,6 +146,7 @@ void Yap_init_global(int max_table_size, int n_workers, int sch_loop, int delay_
|
||||
GLOBAL_last_sg_fr = NULL;
|
||||
GLOBAL_check_sg_fr = NULL;
|
||||
#endif /* LIMIT_TABLING */
|
||||
GLOBAL_root_dep_fr = NULL;
|
||||
for (i = 0; i < MAX_TABLE_VARS; i++) {
|
||||
CELL *pt = GLOBAL_table_var_enumerator_addr(i);
|
||||
RESET_VARIABLE(pt);
|
||||
@@ -219,7 +220,8 @@ void make_root_frames(void) {
|
||||
|
||||
#ifdef TABLING
|
||||
/* root dependency frame */
|
||||
new_dependency_frame(GLOBAL_root_dep_fr, FALSE, NULL, NULL, NULL, NULL, NULL);
|
||||
if (!GLOBAL_root_dep_fr)
|
||||
new_dependency_frame(GLOBAL_root_dep_fr, FALSE, NULL, NULL, NULL, NULL, NULL);
|
||||
#endif /* TABLING */
|
||||
}
|
||||
|
||||
|
@@ -5,7 +5,7 @@
|
||||
|
||||
Copyright: R. Rocha and NCC - University of Porto, Portugal
|
||||
File: opt.preds.c
|
||||
version: $Id: opt.preds.c,v 1.28 2008-03-25 16:45:53 vsc Exp $
|
||||
version: $Id: opt.preds.c,v 1.29 2008-04-11 16:26:19 ricroc Exp $
|
||||
|
||||
**********************************************************************/
|
||||
|
||||
@@ -191,6 +191,7 @@ Int p_start_yapor(void) {
|
||||
BITMAP_clear(GLOBAL_bm_pruning_workers);
|
||||
#endif /* TABLING_INNER_CUTS */
|
||||
make_root_choice_point();
|
||||
GLOBAL_performance_mode &= ~PERFORMANCE_IN_EXECUTION;
|
||||
GLOBAL_execution_time = current_time();
|
||||
BITMAP_clear(GLOBAL_bm_finished_workers);
|
||||
PUT_IN_EXECUTING(worker_id);
|
||||
@@ -423,9 +424,7 @@ void show_answers(void) {
|
||||
}
|
||||
fprintf(Yap_stderr, " (in %f seconds) ]\n\n", GLOBAL_execution_time);
|
||||
|
||||
if (GLOBAL_performance_mode & PERFORMANCE_IN_EXECUTION) {
|
||||
GLOBAL_performance_mode &= ~PERFORMANCE_IN_EXECUTION;
|
||||
} else if (GLOBAL_performance_mode == PERFORMANCE_ON) {
|
||||
if (GLOBAL_performance_mode == PERFORMANCE_ON) {
|
||||
for (i = GLOBAL_number_goals; i > 0; i--) {
|
||||
if (GLOBAL_best_times(i) > GLOBAL_execution_time) {
|
||||
if (i + 1 < MAX_BEST_TIMES)
|
||||
|
Reference in New Issue
Block a user