[gforth] / gforth / engine / main.c  

gforth: gforth/engine/main.c

Diff for /gforth/engine/main.c between version 1.149 and 1.150

version 1.149, Tue Apr 26 19:25:43 2005 UTC version 1.150, Thu Apr 28 18:14:30 2005 UTC
Line 524 
Line 524 
   
 #if defined(HAVE_MMAP)  #if defined(HAVE_MMAP)
   if (offset==0) {    if (offset==0) {
     Address image1;  
     image=alloc_mmap(dictsize);      image=alloc_mmap(dictsize);
       if (image != (Address)MAP_FAILED) {
         Address image1;
     debugp(stderr,"try mmap($%lx, $%lx, ..., MAP_FIXED|MAP_FILE, imagefile, 0); ", (long)image, (long)imagesize);      debugp(stderr,"try mmap($%lx, $%lx, ..., MAP_FIXED|MAP_FILE, imagefile, 0); ", (long)image, (long)imagesize);
     image1 = mmap(image, imagesize, PROT_EXEC|PROT_READ|PROT_WRITE, MAP_FIXED|MAP_FILE|MAP_PRIVATE, fileno(file), 0);      image1 = mmap(image, imagesize, PROT_EXEC|PROT_READ|PROT_WRITE, MAP_FIXED|MAP_FILE|MAP_PRIVATE, fileno(file), 0);
     after_alloc(image1,dictsize);      after_alloc(image1,dictsize);
     if (image != (Address)MAP_FAILED && image1 == (Address)MAP_FAILED)        if (image1 == (Address)MAP_FAILED)
       goto read_image;        goto read_image;
   }    }
     }
 #endif /* defined(HAVE_MMAP) */  #endif /* defined(HAVE_MMAP) */
   if (image == (Address)MAP_FAILED) {    if (image == (Address)MAP_FAILED) {
     image = my_alloc(dictsize+offset)+offset;      image = my_alloc(dictsize+offset)+offset;

Generate output suitable for use with a patch program
Legend:
Removed from v.1.149  
changed lines
  Added in v.1.150
CVS Admin

Powered by ViewCVS 1.0-dev 		(Powered by ViewCVS)

ViewCVS and CVS Help