[gforth] / gforth / engine / main.c  

gforth: gforth/engine/main.c

Diff for /gforth/engine/main.c between version 1.1 and 1.2

version 1.1, Wed May 21 20:40:10 1997 UTC version 1.2, Sun Jun 15 19:43:49 1997 UTC
Line 24 
Line 24 
 #include <errno.h>  #include <errno.h>
 #include <ctype.h>  #include <ctype.h>
 #include <stdio.h>  #include <stdio.h>
   #include <unistd.h>
 #include <string.h>  #include <string.h>
 #include <math.h>  #include <math.h>
 #include <sys/types.h>  #include <sys/types.h>
Line 400 
Line 401 
 }  }
   
 UCell convsize(char *s, UCell elemsize)  UCell convsize(char *s, UCell elemsize)
 /* converts s of the format [0-9]+[bekM]? (e.g. 25k) into the number  /* converts s of the format [0-9]+[bekMGT]? (e.g. 25k) into the number
    of bytes.  the letter at the end indicates the unit, where e stands     of bytes.  the letter at the end indicates the unit, where e stands
    for the element size. default is e */     for the element size. default is e */
 {  {
Line 416 
Line 417 
       m=1024;        m=1024;
     else if (strcmp(endp,"M")==0)      else if (strcmp(endp,"M")==0)
       m=1024*1024;        m=1024*1024;
       else if (strcmp(endp,"G")==0)
         m=1024*1024*1024;
   #if (SIZEOF_CHAR_P > 4)
       else if (strcmp(endp,"T")==0)
         m=1024*1024*1024*1024;
   #endif
     else if (strcmp(endp,"e")!=0 && strcmp(endp,"")!=0) {      else if (strcmp(endp,"e")!=0 && strcmp(endp,"")!=0) {
       fprintf(stderr,"%s: cannot grok size specification %s: invalid unit \"%s\"\n", progname, s, endp);        fprintf(stderr,"%s: cannot grok size specification %s: invalid unit \"%s\"\n", progname, s, endp);
       exit(1);        exit(1);


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

CVS Admin

Powered by ViewCVS 1.0-dev
(Powered by ViewCVS)

ViewCVS and CVS Help