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 *
|
* File: cdmgr.c *
|
||||||
* comments: Code manager *
|
* 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 $
|
* $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
|
* Revision 1.209 2007/11/06 17:02:11 vsc
|
||||||
* compile ground terms away.
|
* compile ground terms away.
|
||||||
*
|
*
|
||||||
@ -625,11 +628,6 @@ static Term BlobTermAdjust(Term t)
|
|||||||
#endif
|
#endif
|
||||||
}
|
}
|
||||||
|
|
||||||
static void
|
|
||||||
RestoreDBTerm(DBTerm *dbr)
|
|
||||||
{
|
|
||||||
}
|
|
||||||
|
|
||||||
#include "rclause.h"
|
#include "rclause.h"
|
||||||
|
|
||||||
#ifdef DEBUG
|
#ifdef DEBUG
|
||||||
|
@ -542,7 +542,7 @@ yap_flag(system_options,X) :-
|
|||||||
'$system_options'(readline) :-
|
'$system_options'(readline) :-
|
||||||
'$has_readline'.
|
'$has_readline'.
|
||||||
'$system_options'(tabling) :-
|
'$system_options'(tabling) :-
|
||||||
\+ '$undefined'('$do_table'(_,_), prolog).
|
\+ '$undefined'('$c_table'(_,_), prolog).
|
||||||
'$system_options'(threads) :-
|
'$system_options'(threads) :-
|
||||||
\+ '$no_threads'.
|
\+ '$no_threads'.
|
||||||
'$system_options'(wam_profiler) :-
|
'$system_options'(wam_profiler) :-
|
||||||
|
Reference in New Issue
Block a user