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

prettification

Browse Source
This commit is contained in:
Vítor Santos Costa 2016-01-03 01:17:39 +00:00
parent 7a24d3015e
commit 09106b9a6e
1 changed files with 10 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
C/amasm.c
View File

@ -3911,8 +3911,10 @@ Yap_assemble(int mode, Term t, PredEntry *ap, int is_fact, struct intermediates
((LogUpdClause *)(cip->code_addr))->ClSize = size;
Yap_LUClauseSpace += size;
} else {
((StaticClause *)(cip->code_addr))->ClSize = size;
((StaticClause *)(cip->code_addr))->ClFlags = 0;
StaticClause *cl = ((StaticClause *)(cip->code_addr));
cl->usc.ClSource = NULL;
cl->ClSize = size;
cl->ClFlags = 0;
Yap_ClauseSpace += size;
}
} else {