Diff for /gforth/prim between versions 1.257 and 1.260

version 1.257, 2010/12/31 18:09:02 version 1.260, 2011/11/21 19:05:01
Line 1804  if (a_addr1==NULL) Line 1804  if (a_addr1==NULL)
 else  else
   a_addr2 = (Cell *)realloc(a_addr1, u);    a_addr2 = (Cell *)realloc(a_addr1, u);
 wior = IOR(a_addr2==NULL);      /* !! Define a return code */  wior = IOR(a_addr2==NULL);      /* !! Define a return code */
   if (a_addr2==NULL)
     a_addr2 = a_addr1;
   
 strerror        ( n -- c_addr u )       gforth  strerror        ( n -- c_addr u )       gforth
 c_addr = (Char *)strerror(n);  c_addr = (Char *)strerror(n);
Line 2031  duser = timeval2us(&time1); Line 2033  duser = timeval2us(&time1);
 dsystem = DZERO;  dsystem = DZERO;
 #endif  #endif
   
   ntime   ( -- dtime )    gforth
   ""Report the current time in nanoseconds since some epoch.""
   struct timespec time1;
   clock_gettime(CLOCK_REALTIME,&time1);
   dtime = timespec2ns(&time1);
   
 \+  \+
   
 \+floating  \+floating

Removed from v.1.257  
changed lines
  Added in v.1.260


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