Diff for /gforth/engine/main.c between versions 1.4 and 1.5

version 1.4, 1997/07/31 16:17:26 version 1.5, 1997/09/01 23:08:42
Line 194  Address verbose_malloc(Cell size) Line 194  Address verbose_malloc(Cell size)
   
 Address my_alloc(Cell size)  Address my_alloc(Cell size)
 {  {
   #if HAVE_MMAP
   static Address next_address=0;    static Address next_address=0;
   Address r;    Address r;
   
 #if HAVE_MMAP  
 #if defined(MAP_ANON)  #if defined(MAP_ANON)
   if (debug)    if (debug)
     fprintf(stderr,"try mmap($%lx, $%lx, ..., MAP_ANON, ...); ", (long)next_address, (long)size);      fprintf(stderr,"try mmap($%lx, $%lx, ..., MAP_ANON, ...); ", (long)next_address, (long)size);
Line 292  Address loader(FILE *imagefile, char* fi Line 292  Address loader(FILE *imagefile, char* fi
        )         )
     { fprintf(stderr,"This image is %d bit %s-endian, whereas the machine is %d bit %s-endian.\n",       { fprintf(stderr,"This image is %d bit %s-endian, whereas the machine is %d bit %s-endian.\n", 
               ((magic[7]-'0')&~1)*8, endianstring[magic[7]&1],                ((magic[7]-'0')&~1)*8, endianstring[magic[7]&1],
               sizeof(Cell)*8, endianstring[                (int) sizeof(Cell)*8, endianstring[
 #ifdef WORDS_BIGENDIAN  #ifdef WORDS_BIGENDIAN
                       0                        0
 #else  #else
Line 327  Address loader(FILE *imagefile, char* fi Line 327  Address loader(FILE *imagefile, char* fi
   pagesize=PAGESIZE; /* in limits.h according to Gallmeister's POSIX.4 book */    pagesize=PAGESIZE; /* in limits.h according to Gallmeister's POSIX.4 book */
 #endif  #endif
   if (debug)    if (debug)
     fprintf(stderr,"pagesize=%d\n",pagesize);      fprintf(stderr,"pagesize=%ld\n",(unsigned long) pagesize);
   
   image = dict_alloc(preamblesize+dictsize+data_offset)+data_offset;    image = dict_alloc(preamblesize+dictsize+data_offset)+data_offset;
   rewind(imagefile);  /* fseek(imagefile,0L,SEEK_SET); */    rewind(imagefile);  /* fseek(imagefile,0L,SEEK_SET); */

Removed from v.1.4  
changed lines
  Added in v.1.5


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>