YAP would always say the system has tabling!
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1979 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
parent
9174f32eb5
commit
925639eccc
10
C/cdmgr.c
10
C/cdmgr.c
@ -11,8 +11,11 @@
|
||||
* File: cdmgr.c *
|
||||
* comments: Code manager *
|
||||
* *
|
||||
* Last rev: $Date: 2007-11-07 09:25:27 $,$Author: vsc $ *
|
||||
* Last rev: $Date: 2007-11-08 09:53:01 $,$Author: vsc $ *
|
||||
* $Log: not supported by cvs2svn $
|
||||
* Revision 1.210 2007/11/07 09:25:27 vsc
|
||||
* speedup meta-calls
|
||||
*
|
||||
* Revision 1.209 2007/11/06 17:02:11 vsc
|
||||
* compile ground terms away.
|
||||
*
|
||||
@ -625,11 +628,6 @@ static Term BlobTermAdjust(Term t)
|
||||
#endif
|
||||
}
|
||||
|
||||
static void
|
||||
RestoreDBTerm(DBTerm *dbr)
|
||||
{
|
||||
}
|
||||
|
||||
#include "rclause.h"
|
||||
|
||||
#ifdef DEBUG
|
||||
|
@ -542,7 +542,7 @@ yap_flag(system_options,X) :-
|
||||
'$system_options'(readline) :-
|
||||
'$has_readline'.
|
||||
'$system_options'(tabling) :-
|
||||
\+ '$undefined'('$do_table'(_,_), prolog).
|
||||
\+ '$undefined'('$c_table'(_,_), prolog).
|
||||
'$system_options'(threads) :-
|
||||
\+ '$no_threads'.
|
||||
'$system_options'(wam_profiler) :-
|
||||
|
Reference in New Issue
Block a user