annoying stuff
This commit is contained in:
parent
f8eb163a1d
commit
91d1cf2c52
5
C/save.c
5
C/save.c
@ -1,3 +1,4 @@
|
|||||||
|
|
||||||
/*************************************************************************
|
/*************************************************************************
|
||||||
* *
|
* *
|
||||||
* YAP Prolog *
|
* YAP Prolog *
|
||||||
@ -1569,7 +1570,7 @@ UnmarkTrEntries( USES_REGS1 )
|
|||||||
{
|
{
|
||||||
CELL entry, *Entries;
|
CELL entry, *Entries;
|
||||||
|
|
||||||
/* initialise a choice point */
|
/* initialize a choice point */
|
||||||
B = (choiceptr)LCL0;
|
B = (choiceptr)LCL0;
|
||||||
B--;
|
B--;
|
||||||
B->cp_ap = NOCODE;
|
B->cp_ap = NOCODE;
|
||||||
@ -1680,7 +1681,7 @@ Restore(char *s, char *lib_dir USES_REGS)
|
|||||||
/* restart IO */
|
/* restart IO */
|
||||||
// initIO();
|
// initIO();
|
||||||
/* reset time */
|
/* reset time */
|
||||||
Yap_ReInitWallTime();
|
Yap_ReInitWTime();
|
||||||
#if USE_DL_MALLOC || USE_SYSTEM_MALLOC
|
#if USE_DL_MALLOC || USE_SYSTEM_MALLOC
|
||||||
if (!AuxSp) {
|
if (!AuxSp) {
|
||||||
Yap_InitPreAllocCodeSpace( 0 );
|
Yap_InitPreAllocCodeSpace( 0 );
|
||||||
|
Reference in New Issue
Block a user