tabling support for 64 bits
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1870 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
@@ -201,13 +201,6 @@ mark_attvar(CELL *orig)
|
||||
Yap_mark_external_reference(&(attv->Atts));
|
||||
}
|
||||
|
||||
#if FROZEN_STACKS
|
||||
static Term
|
||||
CurrentTime(void) {
|
||||
return(MkIntegerTerm(TR-(tr_fr_ptr)Yap_TrailBase));
|
||||
}
|
||||
#endif
|
||||
|
||||
static Term
|
||||
BuildAttTerm(Functor mfun, UInt ar)
|
||||
{
|
||||
|
@@ -51,7 +51,9 @@ STATIC_PROTO(void compact_heap, (void));
|
||||
STATIC_PROTO(void update_relocation_chain, (CELL *, CELL *));
|
||||
STATIC_PROTO(int is_gc_verbose, (void));
|
||||
STATIC_PROTO(int is_gc_very_verbose, (void));
|
||||
#ifdef EASY_SHUNTING
|
||||
STATIC_PROTO(void set_conditionals, (tr_fr_ptr));
|
||||
#endif /* EASY_SHUNTING */
|
||||
|
||||
#include "heapgc.h"
|
||||
|
||||
|
Reference in New Issue
Block a user