[gforth] / gforth / Attic / main.c  

gforth: gforth/Attic/main.c

Diff for /gforth/Attic/main.c between version 1.19 and 1.20

version 1.19, Tue Nov 29 16:22:42 1994 UTC version 1.20, Mon Dec 12 17:10:42 1994 UTC
Line 14 
Line 14 
 #include <stdlib.h>  #include <stdlib.h>
 #include "forth.h"  #include "forth.h"
 #include "io.h"  #include "io.h"
 #ifdef USE_GETOPT  
 #  include "getopt.h"  #  include "getopt.h"
 #else  
    extern int getopt (int , char * const [], const char *);  
   
    extern char *optarg;  
    extern int optind, opterr;  
 #endif  
   
 #ifndef DEFAULTPATH  #ifndef DEFAULTPATH
 #  define DEFAULTPATH "/usr/local/lib/gforth:."  #  define DEFAULTPATH "/usr/local/lib/gforth:."
Line 227 
Line 220 
   opterr=0;    opterr=0;
   while (1) {    while (1) {
     int option_index=0;      int option_index=0;
 #ifdef USE_GETOPT  
     static struct option opts[] = {      static struct option opts[] = {
       {"image-file", required_argument, NULL, 'i'},        {"image-file", required_argument, NULL, 'i'},
       {"dictionary-size", required_argument, NULL, 'm'},        {"dictionary-size", required_argument, NULL, 'm'},
Line 241 
Line 233 
     };      };
   
     c = getopt_long(argc, argv, "+i:m:d:r:f:l:p:", opts, &option_index);      c = getopt_long(argc, argv, "+i:m:d:r:f:l:p:", opts, &option_index);
 #else  
     c = getopt(argc, argv, "+i:m:d:r:f:l:p:");  
 #endif  
   
     if (c==EOF)      if (c==EOF)
       break;        break;

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

Powered by ViewCVS 1.0-dev 		(Powered by ViewCVS)

ViewCVS and CVS Help