diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fix trouble with B=NULL for compiler

Browse Source 
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@828 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
vsc 2003-05-19 16:47:58 +00:00
parent bd383b7e3f
commit d22fe2107c
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
C/compiler.c
View File

@ -2675,7 +2675,6 @@ Yap_cclause(Term inp_clause, int NOfArgs, int mod)
{ /* compile a prolog clause, copy of clause myst be in ARG1 */ { /* compile a prolog clause, copy of clause myst be in ARG1 */
/* returns address of code for clause */ /* returns address of code for clause */
Term head, body; Term head, body;
CELL *SaveH;
yamop *acode; yamop *acode;
volatile int maxvnum = 512; volatile int maxvnum = 512;
@ -2808,7 +2807,9 @@ Yap_cclause(Term inp_clause, int NOfArgs, int mod)
} }
reset_vars(); reset_vars();
H = HB; H = HB;
HB = B->cp_h; if (B != NULL) {
HB = B->cp_h;
}
if (Yap_ErrorMessage) if (Yap_ErrorMessage)
return (0); return (0);
#ifdef DEBUG #ifdef DEBUG