fix max modules limitation
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1865 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
@@ -3728,6 +3728,8 @@ do_gc(Int predarity, CELL *current_env, yamop *nextop)
|
||||
static int
|
||||
is_gc_verbose(void)
|
||||
{
|
||||
if (Yap_PrologMode == BootMode)
|
||||
return FALSE;
|
||||
#ifdef INSTRUMENT_GC
|
||||
/* always give info when we are debugging gc */
|
||||
return(TRUE);
|
||||
@@ -3746,7 +3748,9 @@ Yap_is_gc_verbose(void)
|
||||
static int
|
||||
is_gc_very_verbose(void)
|
||||
{
|
||||
return(Yap_GetValue(AtomGcVeryVerbose) != TermNil);
|
||||
if (Yap_PrologMode == BootMode)
|
||||
return FALSE;
|
||||
return Yap_GetValue(AtomGcVeryVerbose) != TermNil;
|
||||
}
|
||||
|
||||
Int
|
||||
|
Reference in New Issue
Block a user