[gforth] / gforth / engine / main.c  

gforth: gforth/engine/main.c

Diff for /gforth/engine/main.c between version 1.86 and 1.87

version 1.86, Tue Dec 31 15:05:58 2002 UTC version 1.87, Thu Jan 2 16:48:12 2003 UTC
Line 894 
Line 894 
   }    }
   assert(priminfos[i].start = prim);    assert(priminfos[i].start = prim);
 #ifdef ALIGN_CODE  #ifdef ALIGN_CODE
   ALIGN_CODE;    /*  ALIGN_CODE;*/
 #endif  #endif
   assert(prim==priminfos[i].start);    assert(prim==priminfos[i].start);
   old_code_here = append_prim(i);    old_code_here = append_prim(i);
Line 1229 
Line 1229 
 extern const char reloc_bits[];  extern const char reloc_bits[];
 #endif  #endif
   
 DCell double2ll(Float r)  
 {  
 #ifndef BUGGY_LONG_LONG  
   return (DCell)(r);  
 #else  
   DCell d;  
   d.hi = ldexp(r,-(int)(CELL_BITS)) - (r<0);  
   d.lo = r-ldexp((Float)d.hi,CELL_BITS);  
   return d;  
 #endif  
 }  
   
 int main(int argc, char **argv, char **env)  int main(int argc, char **argv, char **env)
 {  {
 #ifdef HAS_OS  #ifdef HAS_OS


Generate output suitable for use with a patch program
Legend:
Removed from v.1.86  
changed lines
  Added in v.1.87

CVS Admin

Powered by ViewCVS 1.0-dev
(Powered by ViewCVS)

ViewCVS and CVS Help