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

more fixes

Browse Source 
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@827 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
vsc
2003-05-19 13:04:09 +00:00
parent 77b1c99030
commit bd383b7e3f
21 changed files with 150 additions and 105 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
C/amasm.c
View File

@@ -2337,8 +2337,9 @@ do_pass(void)
}
if (!pass_no) {
if (CellPtr(label_offset+cpc->rnd1) > ASP-256) {
Yap_Error_Size = 256+((char *)(label_offset+cpc->rnd1) - (char *)H);
save_machine_regs();
longjmp(Yap_CompilerBotch,3);
longjmp(Yap_CompilerBotch, 3);
}
if ( (char *)(label_offset+cpc->rnd1) > freep)
@@ -2537,7 +2538,7 @@ Yap_assemble(int mode)
size = (CELL)code_p;
}
while ((code_addr = (yamop *) Yap_AllocCodeSpace(size)) == NULL) {
if (!Yap_growheap(TRUE)) {
if (!Yap_growheap(TRUE, size)) {
Yap_Error_TYPE = SYSTEM_ERROR;
return NULL;
}