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

fixed a few compile-time warnings.

This commit is contained in:
Abdulaziz Ghuloum 2008-11-16 04:43:30 -05:00
parent abeaa5d561
commit c5a2026472
2 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
scheme/last-revision
View File

@ -1 +1 @@
1684 1685

8
src/ikarus-runtime.c
View File

@ -210,9 +210,9 @@ ik_mmap_mixed(unsigned long int size, ikpcb* pcb){
ikptr ikptr
ik_mmap(unsigned long int size){ ik_mmap(unsigned long int size){
int pages = (size + pagesize - 1) / pagesize; unsigned long int pages = (size + pagesize - 1) / pagesize;
total_allocated_pages += pages; total_allocated_pages += pages;
int mapsize = pages * pagesize; unsigned long int mapsize = pages * pagesize;
assert(size == mapsize); assert(size == mapsize);
#ifndef __CYGWIN__ #ifndef __CYGWIN__
char* mem = mmap( char* mem = mmap(
@ -255,8 +255,8 @@ ik_munmap(ikptr mem, unsigned long int size){
win_munmap((char*)mem, mapsize); win_munmap((char*)mem, mapsize);
#endif #endif
#ifndef NDEBUG #ifndef NDEBUG
fprintf(stderr, "UNMAP 0x%08x .. 0x%08x\n", (int)mem, fprintf(stderr, "UNMAP 0x%016lx .. 0x%016lx\n", (long int)mem,
((int)(mem))+mapsize-1); ((long int)(mem))+mapsize-1);
#endif #endif
} }