conservatory
/
ikarus
4
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

doubled marks size.

This commit is contained in:
Abdulaziz Ghuloum 2008-02-10 04:48:27 -05:00
parent 4e5121af4e
commit 693ca06902
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/ikarus-fasl.c
View File

@ -273,9 +273,9 @@ static ikptr do_read(ikpcb* pcb, fasl_port* p){
} }
else { else {
/* allocate marks */ /* allocate marks */
p->marks = (ikptr*)(long)ik_mmap(pagesize*sizeof(ikptr*)); p->marks = (ikptr*)(long)ik_mmap(2*pagesize*sizeof(ikptr*));
bzero(p->marks, pagesize*sizeof(ikptr*)); bzero(p->marks, 2*pagesize*sizeof(ikptr*));
p->marks_size = pagesize; p->marks_size = 2*pagesize;
} }
} }
if(c == 'x'){ if(c == 'x'){